don't open closed units (MPI)
This commit is contained in:
parent
7beed17a39
commit
3ad63cb966
|
@ -82,7 +82,7 @@ subroutine DAMASK_interface_init
|
||||||
|
|
||||||
print'(/,a)', ' <<<+- DAMASK_interface init -+>>>'
|
print'(/,a)', ' <<<+- DAMASK_interface init -+>>>'
|
||||||
|
|
||||||
open(OUTPUT_unit, encoding='UTF-8') ! for special characters in output
|
if(worldrank == 0) open(OUTPUT_UNIT, encoding='UTF-8') ! for special characters in output
|
||||||
|
|
||||||
! http://patorjk.com/software/taag/#p=display&f=Lean&t=DAMASK%203
|
! http://patorjk.com/software/taag/#p=display&f=Lean&t=DAMASK%203
|
||||||
#ifdef DEBUG
|
#ifdef DEBUG
|
||||||
|
|
Loading…
Reference in New Issue