* 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 |