**********00010825 * FORTRAN 77 00020825 FM825 00030825 * YDSINH - (198) 00040825 00050825 **********00060825 * GENERAL PURPOSE ANS REF 00070825 TEST INTRINSIC FUNCTION DSINH, DCOSH 15.3 00080825 * TABLE 5 00090825 BB* **** BBCCOMNT *****00100825 00110825 1978 FORTRAN COMPILER VALIDATION SYSTEM 00120825 VERSION 2.1 00130825 00140825 00150825 SUGGESTIONS AND COMMENTS SHOULD BE FORWARDED TO 00160825 NATIONAL INSTITUTE OF STANDARDS AND TECHNOLOGY 00170825 SOFTWARE STANDARDS VALIDATION GROUP 00180825 BUILDING 225 RM A266 00190825 GAITHERSBURG, MD 20899 00200825 00210825 00220825 00230825 BE **** BBCCOMNT ******00240825 00250825 * S P E C I F I C A T I O N S SEGMENT 198 00260825 THE FOLLOWING 9 COMMENT LINES (CZ01, CZ02, ...) CAN BE REPLACED 00440825 FOR IDENTIFYING THE TEST ENVIRONMENT 00450825 00460825 Z01 ZVERS = 'VERSION OF THE COMPILER VALIDATION SYSTEM' 00470825 Z02 ZVERSD = 'CREATION DATE/TIME OF THE COMPILER VALIDATION SYSTEM' 00480825 Z03 ZPROG = 'PROGRAM NAME' 00490825 Z04 ZDATE = 'DATE OF TEST' 00500825 Z05 ZCOMPL = 'COMPILER IDENTIFICATION' 00510825 Z06 ZPROJ = 'PROJECT NUMBER/IDENTIFICATION' 00520825 Z07 ZNAME = 'NAME OF USER' 00530825 Z08 ZTAPE = 'TAPE OWNER/ID' 00540825 Z09 ZTAPED = 'DATE TAPE COPIED' 00550825 00560825 00850825 WRITE REPORT TITLE 00860825 00870825 00950825 * HEADER FOR SEGMENT 198 00960825 WRITE DETAIL REPORT HEADERS 01020825 01030825 01100825 * 01130825 T001 TEST 1 TEST AT ZERO (0.0D0) 01140825 02010825 * 02050825 02080825 T008 TEST 8 TEST AT ZERO (0.0D0) 02090825 * TO BOTH FUNCTIONS IN AN EXPRESSION 02970825 TO BOTH FUNCTIONS IN AN EXPRESSION 03120825 * 03240825 BB* **** BBCSUM0 *****03250825 WRITE OUT TEST SUMMARY 03260825 03270825 WRITE OUT REPORT FOOTINGS 03390825 03400825 FORMATS FOR TEST DETAIL LINES 03460825 03470825 FORMATS FOR TEST DETAIL LINES - FULL LANGUAGE 03670825 03680825 FORMAT STATEMENTS FOR PAGE HEADERS 03820825 03830825 03960825 FORMAT STATEMENTS FOR REPORT FOOTINGS 03970825 03980825 04030825 FORMAT STATEMENTS FOR RUN SUMMARY 04040825 04050825 04120825 * END OF TEST SEGMENT 198 04130825
| Type | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|
| double precision | :: | AVD | * 00280825 BB* **** BBCINITA *****00290825 SPECIFICATION STATEMENTS 00300825 *** 00310825 |
|||
| double precision | :: | BVD | * 00280825 BB* **** BBCINITA *****00290825 SPECIFICATION STATEMENTS 00300825 *** 00310825 |
|||
| double precision | :: | CVD | * 00280825 BB* **** BBCINITA *****00290825 SPECIFICATION STATEMENTS 00300825 *** 00310825 |
|||
| double precision | :: | DVCORR | * 00280825 BB* **** BBCINITA *****00290825 SPECIFICATION STATEMENTS 00300825 *** 00310825 |
|||
| character | :: | REMRKS*31 | *** INITIALIZE SECTION 00360825 |
|||
| character | :: | ZCOMPL*20 | *** INITIALIZE SECTION 00360825 |
|||
| character | :: | ZDATE*17 | *** INITIALIZE SECTION 00360825 |
|||
| character | :: | ZNAME*20 | *** INITIALIZE SECTION 00360825 |
|||
| character | :: | ZPROG*5 | *** INITIALIZE SECTION 00360825 |
|||
| character | :: | ZPROJ*13 | *** INITIALIZE SECTION 00360825 |
|||
| character | :: | ZTAPE*10 | *** INITIALIZE SECTION 00360825 |
|||
| character | :: | ZTAPED*13 | *** INITIALIZE SECTION 00360825 |
|||
| character | :: | ZVERS*13 | *** INITIALIZE SECTION 00360825 |
|||
| character | :: | ZVERSD*17 | *** INITIALIZE SECTION 00360825 |