Lines Matching full:10001
172 WRITE( *, FMT = 10001 )
385 10001 FORMAT( ' ROW-MAJOR DATA LAYOUT IS TESTED' )
669 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC
690 10001 FORMAT( ' ', A12,' PASSED THE ROW-MAJOR COMPUTATIONAL TESTS',
982 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC
1003 10001 FORMAT( ' ', A12,' PASSED THE ROW-MAJOR COMPUTATIONAL TESTS',
1329 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC
1350 10001 FORMAT( ' ', A12,' PASSED THE ROW-MAJOR COMPUTATIONAL TESTS',
1650 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC
1675 10001 FORMAT( ' ', A12,' PASSED THE ROW-MAJOR COMPUTATIONAL TESTS',
2006 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC
2031 10001 FORMAT( ' ', A12,' PASSED THE ROW-MAJOR COMPUTATIONAL TESTS',
