File |
Line number |
Procedure |
Code |
./pkg/compon_communic/mitcplr_char2dbl.F |
14 |
MITCPLR_CHAR2DBL |
character*(MAXLEN_COMP_NAME) cbuftmp |
./pkg/compon_communic/mitcplr_char2dbl.F |
18 |
MITCPLR_CHAR2DBL |
cbuftmp = carg |
./pkg/compon_communic/mitcplr_char2dbl.F |
22 |
MITCPLR_CHAR2DBL |
rarg(j)= ichar( cbuftmp(j:j) ) |
./pkg/compon_communic/mitcplr_char2int.F |
14 |
MITCPLR_CHAR2INT |
character*(MAXLEN_COMP_NAME) cbuftmp |
./pkg/compon_communic/mitcplr_char2int.F |
18 |
MITCPLR_CHAR2INT |
cbuftmp = carg |
./pkg/compon_communic/mitcplr_char2int.F |
22 |
MITCPLR_CHAR2INT |
iarg(j)=ichar( cbuftmp(j:j) ) |
./pkg/compon_communic/mitcplr_char2real.F |
14 |
MITCPLR_CHAR2REAL |
character*(MAXLEN_COMP_NAME) cbuftmp |
./pkg/compon_communic/mitcplr_char2real.F |
18 |
MITCPLR_CHAR2REAL |
cbuftmp = carg |
./pkg/compon_communic/mitcplr_char2real.F |
22 |
MITCPLR_CHAR2REAL |
rarg(j)=float( ichar( cbuftmp(j:j) ) ) |