File |
Line number |
Procedure |
Code |
./pkg/mnc/mnc_file.F |
238 |
MNC_FILE_ADD_ATTR_ANY |
I atype, sv, len,dv,rv,iv, |
./pkg/mnc/mnc_file.F |
254 |
MNC_FILE_ADD_ATTR_ANY |
REAL*4 rv |
./pkg/mnc/mnc_file.F |
295 |
MNC_FILE_ADD_ATTR_ANY |
err = NF_PUT_ATT_REAL(fid, NF_GLOBAL, s1, NF_FLOAT, len, rv) |
./pkg/mnc/mnc_var.F |
412 |
MNC_VAR_ADD_ATTR_ANY |
I atype, cs,len,dv,rv,iv, |
./pkg/mnc/mnc_var.F |
430 |
MNC_VAR_ADD_ATTR_ANY |
Real*4 rv(*) |
./pkg/mnc/mnc_var.F |
468 |
MNC_VAR_ADD_ATTR_ANY |
err = NF_PUT_ATT_REAL(fid, vid, atname, NF_FLOAT, len, rv) |
./pkg/mnc/mnc_var.F |
658 |
MNC_VAR_WRITE_ANY |
I rv, |
./pkg/mnc/mnc_var.F |
672 |
MNC_VAR_WRITE_ANY |
Real*4 rv(*) |
./pkg/mnc/mnc_var.F |
730 |
MNC_VAR_WRITE_ANY |
err = NF_PUT_VARA_REAL(fid, vid, vstart, vcount, rv) |
./pkg/openad/seawater.F |
117 |
SW_TEMP |
_RL rv |
./pkg/openad/seawater.F |
123 |
SW_TEMP |
CALL SW_PTMP (S,T,PR,P,rv) |
./pkg/openad/seawater.F |
133 |
SW_ADTG |
SUBROUTINE SW_ADTG (S,T,P, rv) |
./pkg/openad/seawater.F |
152 |
SW_ADTG |
_RL rv |
./pkg/openad/seawater.F |
181 |
SW_ADTG |
rv = a0 + (a1 + (a2 + a3*T)*T)*T |
./pkg/openad/seawater.F |
18 |
SW_PTMP |
SUBROUTINE SW_PTMP (S,T,P,PR, rv) |
./pkg/openad/seawater.F |
45 |
SW_PTMP |
_RL rv |
./pkg/openad/seawater.F |
77 |
SW_PTMP |
rv = th + (del_th - two*q)/(two*three) |
./pkg/openad/seawater.F |
86 |
SW_TEMP |
SUBROUTINE SW_TEMP( S, T, P, PR, rv) |