File |
Line number |
Procedure |
Code |
./pkg/mnc/mnc_init.F |
27 |
MNC_INIT |
character blank*(MNC_MAX_CHAR) |
./pkg/mnc/mnc_init.F |
31 |
MNC_INIT |
blank(i:i) = ' ' |
./pkg/mnc/mnc_init.F |
33 |
MNC_INIT |
mnc_blank_name(1:MNC_MAX_CHAR) = blank(1:MNC_MAX_CHAR) |
./pkg/mnc/mnc_init.F |
37 |
MNC_INIT |
mnc_f_names(i)(1:MNC_MAX_CHAR) = blank(1:MNC_MAX_CHAR) |
./pkg/mnc/mnc_init.F |
38 |
MNC_INIT |
mnc_g_names(i)(1:MNC_MAX_CHAR) = blank(1:MNC_MAX_CHAR) |
./pkg/mnc/mnc_init.F |
39 |
MNC_INIT |
mnc_v_names(i)(1:MNC_MAX_CHAR) = blank(1:MNC_MAX_CHAR) |
./pkg/mnc/mnc_init.F |
40 |
MNC_INIT |
mnc_d_names(i)(1:MNC_MAX_CHAR) = blank(1:MNC_MAX_CHAR) |
./pkg/mnc/mnc_init.F |
51 |
MNC_INIT |
mnc_cw_gname(g)(1:MNC_MAX_CHAR) = blank(1:MNC_MAX_CHAR) |
./pkg/mnc/mnc_init.F |
52 |
MNC_INIT |
mnc_cw_vname(g)(1:MNC_MAX_CHAR) = blank(1:MNC_MAX_CHAR) |
./pkg/mnc/mnc_init.F |
55 |
MNC_INIT |
mnc_cw_fgnm(g)(1:MNC_MAX_CHAR) = blank(1:MNC_MAX_CHAR) |
./pkg/mnc/mnc_init.F |
60 |
MNC_INIT |
mnc_cw_dn(i,g)(1:MNC_MAX_CHAR) = blank(1:MNC_MAX_CHAR) |
./pkg/mnc/mnc_init.F |
61 |
MNC_INIT |
mnc_cw_vtnm(i,g)(1:MNC_MAX_CHAR) = blank(1:MNC_MAX_CHAR) |
./pkg/mnc/mnc_init.F |
62 |
MNC_INIT |
mnc_cw_vinm(i,g)(1:MNC_MAX_CHAR) = blank(1:MNC_MAX_CHAR) |
./pkg/mnc/mnc_init.F |
63 |
MNC_INIT |
mnc_cw_vdnm(i,g)(1:MNC_MAX_CHAR) = blank(1:MNC_MAX_CHAR) |
./pkg/mnc/mnc_init.F |
64 |
MNC_INIT |
mnc_cw_vtat(i,g)(1:MNC_MAX_CHAR) = blank(1:MNC_MAX_CHAR) |