Viscoplastic self consistent code