Searched defs:GEOMEA (Results 1 – 1 of 1) sorted by relevance
7031 CHARACTER*4 IWRITE7032 CHARACTER*4 IBUGA37061 51 FORMAT('***** AT THE BEGINNING OF GEOMEA--') argument7067 53 FORMAT('N = ',I8)7092 111 FORMAT('***** ERROR IN GEOMEA--') argument7101 114 FORMAT(' THE GEOMEA IS TO BE COMPUTED') argument7135 211 FORMAT('***** ERROR FROM GEOMEA') argument7147 200 CONTINUE7177 9011 FORMAT('***** AT THE END OF GEOMEA--') argument7183 9013 FORMAT('N = ',I8)[all …]