* 00090408 SUBROUTINE USED WITH SEGMENT FM408 TO SUPPLY VALUES 00100408 * TO ARRAYS THRU THE DUMMY ARGUMENT LIST 00110408 00120408 * 00310408 * 00430408
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer | :: | LW1I | ||||
integer | :: | KW1I | ||||
integer | :: | MW1I | ||||
real | :: | FW1S(10) | ||||
real | :: | GW1S(10) | ||||
logical | :: | CW1B(10) | ||||
logical | :: | DW1B(10) | ||||
character(len=4) | :: | A4W1K(10) | **** 00170408 |
|||
character(len=4) | :: | B4W1K(10) | **** 00170408 |