* 00090913 SUBROUTINE USED WITH SEGMENT DIRAF3 (412) TO SUPPLY VALUES 00100913 * TO ARRAYS THRU THE DUMMY ARGUMENT LIST 00110913 00120913 * 00290913 00300913 * 00310913 00420913 * 00430913 * 00440913
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real | :: | FW1S(5) | ||||
real | :: | GW1S(5) | ||||
logical | :: | CW1B(5) | ||||
logical | :: | DW1B(5) | ||||
double precision | :: | DW1D(5) | ||||
double precision | :: | BW1D(5) | ||||
character(len=20) | :: | A20W1K(5) | ||||
character(len=20) | :: | B20W1K(5) |