89 |
|
} |
90 |
|
strcpy( checkPointMsg, |
91 |
|
"File \"idealCrystal.in\" opened successfully for reading." ); |
92 |
< |
MPIcheckPoint(); |
92 |
> |
errorCheckPoint(); |
93 |
|
#endif |
94 |
|
|
95 |
|
return; |
107 |
|
} |
108 |
|
strcpy( checkPointMsg, |
109 |
|
"File idealCrystal.in (and .zang0 if present) closed successfully." ); |
110 |
< |
MPIcheckPoint(); |
110 |
> |
errorCheckPoint(); |
111 |
|
#endif |
112 |
|
|
113 |
|
return; |
543 |
|
} |
544 |
|
|
545 |
|
strcpy( checkPointMsg, "zAngle file opened successfully for reading." ); |
546 |
< |
MPIcheckPoint(); |
546 |
> |
errorCheckPoint(); |
547 |
|
#endif |
548 |
|
|
549 |
|
#ifndef IS_MPI |