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

removed forgotten debug statement

This commit is contained in:
Martin Diehl 2018-10-08 23:34:05 +02:00
parent 50f0362aa1
commit 05aae4f7eb
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/IO.f90
View File

@ -236,7 +236,6 @@ recursive function IO_recursiveRead(fileName,cnt) result(fileContent)
fileContent = [ fileContent(1:l-1_pInt), includedContent, [(dummy,i=1,missingLines)] ] ! add content and grow array fileContent = [ fileContent(1:l-1_pInt), includedContent, [(dummy,i=1,missingLines)] ] ! add content and grow array
l = l - 1_pInt + size(includedContent) l = l - 1_pInt + size(includedContent)
else recursion else recursion
write(6,*) fileName, l, line;flush(6)
fileContent(l) = line fileContent(l) = line
endif recursion endif recursion