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