FM377 Program

**********00010377 * FORTRAN 77 00020377 FM377 00030377 * XSINH - (197) 00040377 00050377 **********00060377 * GENERAL PURPOSE SUBSET REF 00070377 TEST INTRINSIC FUNCTION SINH, COSH 15.3 00080377 * TABLE 5 00090377 00100377 BB *** BBCCOMNT ******00110377 00120377 1978 FORTRAN COMPILER VALIDATION SYSTEM 00130377 VERSION 2.1 00140377 00150377 00160377 SUGGESTIONS AND COMMENTS SHOULD BE FORWARDED TO 00170377 NATIONAL INSTITUTE OF STANDARDS AND TECHNOLOGY 00180377 SOFTWARE STANDARDS VALIDATION GROUP 00190377 BUILDING 225 RM A266 00200377 GAITHERSBURG, MD 20899 00210377 00220377 00230377 00240377 BE *** BBCCOMNT ******00250377 BB *** BBCINITA ******00260377 SPECIFICATION STATEMENTS 00270377 00280377 THE FOLLOWING 9 COMMENT LINES (CZ01, CZ02, ...) CAN BE REPLACED 00410377 FOR IDENTIFYING THE TEST ENVIRONMENT 00420377 00430377 Z01 ZVERS = 'VERSION OF THE COMPILER VALIDATION SYSTEM' 00440377 Z02 ZVERSD = 'CREATION DATE/TIME OF THE COMPILER VALIDATION SYSTEM' 00450377 Z03 ZPROG = 'PROGRAM NAME' 00460377 Z04 ZDATE = 'DATE OF TEST' 00470377 Z05 ZCOMPL = 'COMPILER IDENTIFICATION' 00480377 Z06 ZPROJ = 'PROJECT NUMBER/IDENTIFICATION' 00490377 Z07 ZNAME = 'NAME OF USER' 00500377 Z08 ZTAPE = 'TAPE OWNER/ID' 00510377 Z09 ZTAPED = 'DATE TAPE COPIED' 00520377 00530377 00820377 WRITE REPORT TITLE 00830377 00840377 00920377 * HEADER FOR SEGMENT 197 00930377 WRITE DETAIL REPORT HEADERS 00990377 01000377 01070377 * 01100377 T001 TEST 1 TEST AT ZERO (0.0) 01110377 01980377 * 02020377 02050377 T008 TEST 8 ZERO (0.0) 02060377 * TO BOTH FUNCTIONS IN AN EXPRESSION 02940377 * 03060377 BB *** BBCSUM0 ******03070377 WRITE OUT TEST SUMMARY 03080377 03090377 WRITE OUT REPORT FOOTINGS 03210377 03220377 FORMATS FOR TEST DETAIL LINES 03280377 03290377 FORMAT STATEMENTS FOR PAGE HEADERS 03490377 03500377 03630377 FORMAT STATEMENTS FOR REPORT FOOTINGS 03640377 03650377 03700377 FORMAT STATEMENTS FOR RUN SUMMARY 03710377 03720377 03790377 **** END OF TEST SEGMENT 197 03800377