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

checking for existing file

This commit is contained in:
Martin Diehl 2018-07-16 20:08:31 +02:00
parent a1ad18c88a
commit fb1265db3d
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/config.f90
View File

@ -125,6 +125,8 @@ subroutine config_init()
if(jobSpecificConfig) then if(jobSpecificConfig) then
fileContent = IO_recursiveRead(trim(getSolverJobName())//'.'//material_localFileExt) fileContent = IO_recursiveRead(trim(getSolverJobName())//'.'//material_localFileExt)
else else
inquire(file='material.config',exist=jobSpecificConfig)
if(.not. jobSpecificConfig) call IO_error(0_pInt)
fileContent = IO_recursiveRead('material.config') fileContent = IO_recursiveRead('material.config')
endif endif