Initialize to J2 bevavior
This commit is contained in:
parent
1b22b6e4ee
commit
9cfadb251a
|
@ -55,7 +55,7 @@ module plastic_isotropic
|
||||||
tausat_SinhFitC, &
|
tausat_SinhFitC, &
|
||||||
tausat_SinhFitD
|
tausat_SinhFitD
|
||||||
logical :: &
|
logical :: &
|
||||||
dilatation
|
dilatation = .false.
|
||||||
end type
|
end type
|
||||||
|
|
||||||
type(tParameters), dimension(:), allocatable, private :: param !< containers of constitutive parameters (len Ninstance)
|
type(tParameters), dimension(:), allocatable, private :: param !< containers of constitutive parameters (len Ninstance)
|
||||||
|
|
Loading…
Reference in New Issue