* 00090911 SUBROUTINE USED WITH SEGMENT DIRAF2 (411) TO SUPPLY VALUES 00100911 * TO ARRAYS THRU THE DUMMY ARGUMENT LIST 00110911 00120911 * 00480911 00570911 *** 00660911
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer | :: | LW1I | ||||
| integer | :: | NW1I | ||||
| real | :: | FW1S(10) | ||||
| real | :: | HW1S(15) | ||||
| logical | :: | CW1B(10) | ||||
| logical | :: | EW1B(15) | ||||
| double precision | :: | DW1D(10) | ||||
| double precision | :: | BW1D(15) | ||||
| complex | :: | CW1C(10) | ||||
| complex | :: | DW1C(15) | ||||
| character(len=4) | :: | A4W1K(10) | **** 00190911 |
|||
| character(len=4) | :: | C4W1K(15) | **** 00190911 |