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