From 9cfadb251adbec996e5d531d8d03ace48c995175 Mon Sep 17 00:00:00 2001 From: Martin Diehl Date: Tue, 22 Mar 2016 15:40:21 +0100 Subject: [PATCH] Initialize to J2 bevavior --- code/plastic_isotropic.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/code/plastic_isotropic.f90 b/code/plastic_isotropic.f90 index da4198007..563952122 100644 --- a/code/plastic_isotropic.f90 +++ b/code/plastic_isotropic.f90 @@ -55,7 +55,7 @@ module plastic_isotropic tausat_SinhFitC, & tausat_SinhFitD logical :: & - dilatation + dilatation = .false. end type type(tParameters), dimension(:), allocatable, private :: param !< containers of constitutive parameters (len Ninstance)