no more dropping of comments in Abaqus input file assembly
This commit is contained in:
parent
8e22e766c7
commit
dbeac18df6
|
@ -1501,7 +1501,7 @@ recursive function abaqus_assembleInputFile(unit1,unit2) result(createSuccess)
|
||||||
createSuccess=.false.
|
createSuccess=.false.
|
||||||
return
|
return
|
||||||
endif
|
endif
|
||||||
else if (line(1:2) /= '**') then
|
else
|
||||||
write(unit1,'(A)') trim(line)
|
write(unit1,'(A)') trim(line)
|
||||||
endif
|
endif
|
||||||
enddo
|
enddo
|
||||||
|
|
Loading…
Reference in New Issue