FM826 Program

**********00010826 * FORTRAN 77 00020826 FM826 00030826 * YDTANH - (200) 00040826 00050826 **********00060826 * GENERAL PURPOSE ANS REF 00070826 TEST INTRINSIC FUNCTION DTANH 15.3 00080826 * TABLE 5 00090826 00100826 BB *** BBCCOMNT ******00110826 00120826 1978 FORTRAN COMPILER VALIDATION SYSTEM 00130826 VERSION 2.1 00140826 00150826 00160826 SUGGESTIONS AND COMMENTS SHOULD BE FORWARDED TO 00170826 NATIONAL INSTITUTE OF STANDARDS AND TECHNOLOGY 00180826 SOFTWARE STANDARDS VALIDATION GROUP 00190826 BUILDING 225 RM A266 00200826 GAITHERSBURG, MD 20899 00210826 00220826 00230826 00240826 BE *** BBCCOMNT ******00250826 00260826 * S P E C I F I C A T I O N S SEGMENT 200 00270826 THE FOLLOWING 9 COMMENT LINES (CZ01, CZ02, ...) CAN BE REPLACED 00450826 FOR IDENTIFYING THE TEST ENVIRONMENT 00460826 00470826 Z01 ZVERS = 'VERSION OF THE COMPILER VALIDATION SYSTEM' 00480826 Z02 ZVERSD = 'CREATION DATE/TIME OF THE COMPILER VALIDATION SYSTEM' 00490826 Z03 ZPROG = 'PROGRAM NAME' 00500826 Z04 ZDATE = 'DATE OF TEST' 00510826 Z05 ZCOMPL = 'COMPILER IDENTIFICATION' 00520826 Z06 ZPROJ = 'PROJECT NUMBER/IDENTIFICATION' 00530826 Z07 ZNAME = 'NAME OF USER' 00540826 Z08 ZTAPE = 'TAPE OWNER/ID' 00550826 Z09 ZTAPED = 'DATE TAPE COPIED' 00560826 00570826 00860826 WRITE REPORT TITLE 00870826 00880826 00960826 * HEADER FOR SEGMENT 200 00970826 WRITE DETAIL REPORT HEADERS 01030826 01040826 01110826 T001 TEST 1 TEST AT ZERO (0.0) 01120826 * 02260826 BB* **** BBCSUM0 *****02270826 WRITE OUT TEST SUMMARY 02280826 02290826 WRITE OUT REPORT FOOTINGS 02410826 02420826 FORMATS FOR TEST DETAIL LINES 02480826 02490826 FORMATS FOR TEST DETAIL LINES - FULL LANGUAGE 02690826 02700826 FORMAT STATEMENTS FOR PAGE HEADERS 02840826 02850826 02980826 FORMAT STATEMENTS FOR REPORT FOOTINGS 02990826 03000826 03050826 FORMAT STATEMENTS FOR RUN SUMMARY 03060826 03070826 03140826 * END OF TEST SEGMENT 200 03150826