[Fortran 77] Segmentation fault

Version imprimable