bug fix on commit 2424 that caused compilation errors

This commit is contained in:
Pratheek Shanthraj 2013-05-22 09:40:23 +00:00
parent e758ee32be
commit 399a0218c7
1 changed files with 2 additions and 2 deletions

View File

@ -30,8 +30,8 @@ implicit none
!* Lists of states and physical parameters
character(len=*), parameter, public :: constitutive_dislotwin_label = 'dislotwin'
character(len=18), dimension(3), parameter:: constitutive_dislotwin_listBasicSlipStates = (/'rhoEdge ', &
'rhoEdgeDip', &
character(len=18), dimension(3), parameter:: constitutive_dislotwin_listBasicSlipStates = (/'rhoEdge ', &
'rhoEdgeDip ', &
'accshearslip'/)
character(len=18), dimension(2), parameter:: constitutive_dislotwin_listBasicTwinStates = (/'twinFraction', &
'accsheartwin'/)