FORTRAN/EXTEND/NOLINE/OBJ:O: S:CALCUL MACRO/OBJ:O: S:CALC2 UNPROTECT SY:CALCUL.SAV R LINK SY:CALCUL=O:CALCUL,CALC2,SY:GONLIB,SYSLIB,FORSIM/I $SHORT ^C