FM406 Program

**********00010406 * FORTRAN 77 00020406 FM406 00030406 * INTER2 - (391) 00040406 00050406 **********00060406 * TESTING OF INTERNAL FILES - SUBSET REF00070406 USING WRITE 12.2.5 00080406 * 00090406 BB* **** BBCCOMNT *****00100406 00110406 1978 FORTRAN COMPILER VALIDATION SYSTEM 00120406 VERSION 2.1 00130406 00140406 00150406 SUGGESTIONS AND COMMENTS SHOULD BE FORWARDED TO 00160406 NATIONAL INSTITUTE OF STANDARDS AND TECHNOLOGY 00170406 SOFTWARE STANDARDS VALIDATION GROUP 00180406 BUILDING 225 RM A266 00190406 GAITHERSBURG, MD 20899 00200406 00210406 00220406 00230406 BE **** BBCCOMNT ******00240406 00250406 * S P E C I F I C A T I O N S SEGMENT 391 00260406 00270406 THE FOLLOWING 9 COMMENT LINES (CZ01, CZ02, ...) CAN BE REPLACED 00470406 FOR IDENTIFYING THE TEST ENVIRONMENT 00480406 00490406 Z01 ZVERS = 'VERSION OF THE COMPILER VALIDATION SYSTEM' 00500406 Z02 ZVERSD = 'CREATION DATE/TIME OF THE COMPILER VALIDATION SYSTEM' 00510406 Z03 ZPROG = 'PROGRAM NAME' 00520406 Z04 ZDATE = 'DATE OF TEST' 00530406 Z05 ZCOMPL = 'COMPILER IDENTIFICATION' 00540406 Z06 ZPROJ = 'PROJECT NUMBER/IDENTIFICATION' 00550406 Z07 ZNAME = 'NAME OF USER' 00560406 Z08 ZTAPE = 'TAPE OWNER/ID' 00570406 Z09 ZTAPED = 'DATE TAPE COPIED' 00580406 00590406 00880406 WRITE REPORT TITLE 00890406 00900406 * 00980406 00990406 * HEADER FOR SEGMENT 391 01000406 01010406 WRITE DETAIL REPORT HEADERS 01060406 01070406 * CHARACTER AND HOLLERITH STRINGS 03380406 04030406 BB *** BBCSUM0 ******04040406 WRITE OUT TEST SUMMARY 04050406 04060406 WRITE OUT REPORT FOOTINGS 04180406 04190406 FORMATS FOR TEST DETAIL LINES 04250406 04260406 FORMAT STATEMENTS FOR PAGE HEADERS 04460406 04470406 04600406 FORMAT STATEMENTS FOR REPORT FOOTINGS 04610406 04620406 04670406 FORMAT STATEMENTS FOR RUN SUMMARY 04680406 04690406 * 04760406 * END OF TEST SEGMENT 391 04770406