223031012
/
DAMASK_EICMD
mirror of https://github.com/achalhp/DAMASK_EICMD.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

need to read in variable before it is used

This commit is contained in:
Martin Diehl 2020-02-29 06:39:16 +01:00
parent 5350f3950f
commit 53bd9f9b64
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/kinematics_cleavage_opening.f90
View File

@ -73,10 +73,12 @@ subroutine kinematics_cleavage_opening_init
prm%sdot0 = config%getFloat('anisobrittle_sdot0') prm%sdot0 = config%getFloat('anisobrittle_sdot0')
prm%n = config%getFloat('anisobrittle_ratesensitivity') prm%n = config%getFloat('anisobrittle_ratesensitivity')
prm%Ncleavage = config%getInts('ncleavage',defaultVal=emptyIntArray)
prm%critDisp = config%getFloats('anisobrittle_criticaldisplacement',requiredSize=size(prm%Ncleavage)) prm%critDisp = config%getFloats('anisobrittle_criticaldisplacement',requiredSize=size(prm%Ncleavage))
prm%critLoad = config%getFloats('anisobrittle_criticalload',requiredSize=size(prm%Ncleavage)) prm%critLoad = config%getFloats('anisobrittle_criticalload',requiredSize=size(prm%Ncleavage))
prm%Ncleavage = config%getInts('ncleavage',defaultVal=emptyIntArray)
prm%totalNcleavage = sum(prm%Ncleavage) prm%totalNcleavage = sum(prm%Ncleavage)
prm%cleavage_systems = lattice_SchmidMatrix_cleavage (prm%Ncleavage,config%getString('lattice_structure'),& prm%cleavage_systems = lattice_SchmidMatrix_cleavage (prm%Ncleavage,config%getString('lattice_structure'),&
config%getFloat('c/a',defaultVal=0.0_pReal)) config%getFloat('c/a',defaultVal=0.0_pReal))