| 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 |