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

* comments are now recognized by IO even when they do not appear at the beginning of the line 

* no need for the zero entries in the material.config anymore
This commit is contained in:
Christoph Kords 2011-05-30 09:09:19 +00:00
parent bbf75f3fb5
commit 9a64f3dd85
2 changed files with 15 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
code/IO.f90
View File

@ -676,6 +676,9 @@ endfunction
do while (verify(line(right+1:),sep)>0) do while (verify(line(right+1:),sep)>0)
left = right + verify(line(right+1:),sep) left = right + verify(line(right+1:),sep)
right = left + scan(line(left:),sep) - 2 right = left + scan(line(left:),sep) - 2
if ( line(left:left) == '#' ) then
exit
endif
if ( IO_stringPos(1)<N ) then if ( IO_stringPos(1)<N ) then
IO_stringPos(1+IO_stringPos(1)*2+1) = left IO_stringPos(1+IO_stringPos(1)*2+1) = left
IO_stringPos(1+IO_stringPos(1)*2+2) = right IO_stringPos(1+IO_stringPos(1)*2+2) = right

22
code/config/material.config
View File

@ -221,25 +221,25 @@ constitution nonlocal
(output) d_upper_screw (output) d_upper_screw
lattice_structure fcc lattice_structure fcc
Nslip 12 0 0 0 # number of slip systems Nslip 12 # number of slip systems
c11 106.75e9 # elastic constants c11 106.75e9 # elastic constants
c12 60.41e9 c12 60.41e9
c44 28.34e9 c44 28.34e9
burgers 2.86e-10 0 0 0 # Burgers vector in m burgers 2.86e-10 # Burgers vector in m
rhoSglEdgePos0 0.25e10 0 0 0 # Initial positive edge single dislocation density per slip system in m/m**3 rhoSglEdgePos0 0.25e10 # Initial positive edge single dislocation density per slip system in m/m**3
rhoSglEdgeNeg0 0.25e10 0 0 0 # Initial negative edge single dislocation density per slip system in m/m**3 rhoSglEdgeNeg0 0.25e10 # Initial negative edge single dislocation density per slip system in m/m**3
rhoSglScrewPos0 0.25e10 0 0 0 # Initial positive screw single dislocation density per slip system in m/m**3 rhoSglScrewPos0 0.25e10 # Initial positive screw single dislocation density per slip system in m/m**3
rhoSglScrewNeg0 0.25e10 0 0 0 # Initial negative screw single dislocation density per slip system in m/m**3 rhoSglScrewNeg0 0.25e10 # Initial negative screw single dislocation density per slip system in m/m**3
rhoDipEdge0 1e8 0 0 0 # Initial edge dipole dislocation density in m/m**3 rhoDipEdge0 1e8 # Initial edge dipole dislocation density in m/m**3
rhoDipScrew0 1e8 0 0 0 # Initial screw dipole dislocation density in m/m**3 rhoDipScrew0 1e8 # Initial screw dipole dislocation density in m/m**3
rhoSglScatter 0 # standard deviation of scatter in initial single dislocation density rhoSglScatter 0 # standard deviation of scatter in initial single dislocation density
r 1e-3 # cutoff radius for dislocation stress in m r 1e-3 # cutoff radius for dislocation stress in m
vs 3500 # maximum dislocation velocity (velocity of sound) in m/s vs 3500 # maximum dislocation velocity (velocity of sound) in m/s
dDipMinEdge 2e-9 0 0 0 # minimum distance for stable edge dipoles in m dDipMinEdge 2e-9 # minimum distance for stable edge dipoles in m
dDipMinScrew 2e-9 0 0 0 # minimum distance for stable screw dipoles in m dDipMinScrew 2e-9 # minimum distance for stable screw dipoles in m
lambda0 80 0 0 0 # prefactor for mean free path lambda0 80 # prefactor for mean free path
atomicVolume 1.7e-29 # atomic volume in m**3 atomicVolume 1.7e-29 # atomic volume in m**3
Dsd0 1e-4 # prefactor for self-diffusion coefficient in m**2/s Dsd0 1e-4 # prefactor for self-diffusion coefficient in m**2/s
Qsd 2.3e-19 # activation enthalpy for seld-diffusion in J Qsd 2.3e-19 # activation enthalpy for seld-diffusion in J