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 |
251 |
MNC_FILE_ADD_ATTR_ANY |
integer myThid, atype, len, iv |
./pkg/mnc/mnc_file.F |
300 |
MNC_FILE_ADD_ATTR_ANY |
err = NF_PUT_ATT_INT(fid, NF_GLOBAL, s1, NF_INT, len, iv) |
./pkg/mnc/mnc_file.F |
659 |
MNC_FILE_TRY_READ |
integer dlen, id, xtype, nat, nff,nlf, iv |
./pkg/mnc/mnc_file.F |
738 |
MNC_FILE_TRY_READ |
iv = 2 + 3*mnc_fv_ids(indf,1) |
./pkg/mnc/mnc_file.F |
739 |
MNC_FILE_TRY_READ |
mnc_fv_ids(indf,iv) = indv |
./pkg/mnc/mnc_file.F |
740 |
MNC_FILE_TRY_READ |
mnc_fv_ids(indf,iv+1) = id |
./pkg/mnc/mnc_file.F |
745 |
MNC_FILE_TRY_READ |
mnc_fv_ids(indf,iv+2) = j |
./pkg/mnc/mnc_var.F |
412 |
MNC_VAR_ADD_ATTR_ANY |
I atype, cs,len,dv,rv,iv, |
./pkg/mnc/mnc_var.F |
431 |
MNC_VAR_ADD_ATTR_ANY |
INTEGER iv(*) |
./pkg/mnc/mnc_var.F |
470 |
MNC_VAR_ADD_ATTR_ANY |
err = NF_PUT_ATT_INT(fid, vid, atname, NF_INT, len, iv) |
./pkg/mnc/mnc_var.F |
659 |
MNC_VAR_WRITE_ANY |
I iv, |
./pkg/mnc/mnc_var.F |
673 |
MNC_VAR_WRITE_ANY |
INTEGER iv(*) |
./pkg/mnc/mnc_var.F |
732 |
MNC_VAR_WRITE_ANY |
err = NF_PUT_VARA_INT(fid, vid, vstart, vcount, iv) |
./pkg/diagnostics/diagstats_ascii_out.F |
40 |
DIAGSTATS_ASCII_OUT |
INTEGER im, ix, iv |
./pkg/diagnostics/diagstats_ascii_out.F |
41 |
DIAGSTATS_ASCII_OUT |
PARAMETER ( iv = nStats - 2 , im = nStats - 1 , ix = nStats ) |
./pkg/diagnostics/diagstats_global.F |
113 |
DIAGSTATS_GLOBAL |
DO i=0,iv |
./pkg/diagnostics/diagstats_global.F |
145 |
DIAGSTATS_GLOBAL |
DO i=0,iv |
./pkg/diagnostics/diagstats_global.F |
178 |
DIAGSTATS_GLOBAL |
DO i=1,iv |
./pkg/diagnostics/diagstats_global.F |
182 |
DIAGSTATS_GLOBAL |
qtmp1(iv,k) = qtmp1(iv,k) - qtmp1(1,k)*qtmp1(1,k) |
./pkg/diagnostics/diagstats_global.F |
184 |
DIAGSTATS_GLOBAL |
IF (qtmp1(iv,k).GT.0.) qtmp1(iv,k) = SQRT(qtmp1(iv,k)) |
./pkg/diagnostics/diagstats_global.F |
198 |
DIAGSTATS_GLOBAL |
DO i=1,iv |
./pkg/diagnostics/diagstats_global.F |
202 |
DIAGSTATS_GLOBAL |
DO i=1,iv |
./pkg/diagnostics/diagstats_global.F |
207 |
DIAGSTATS_GLOBAL |
qtmp1(iv,k) = qtmp1(iv,k) - qtmp1(1,k)*qtmp1(1,k) |
./pkg/diagnostics/diagstats_global.F |
209 |
DIAGSTATS_GLOBAL |
IF (qtmp1(iv,k).GT.0.) qtmp1(iv,k) = SQRT(qtmp1(iv,k)) |
./pkg/diagnostics/diagstats_global.F |
47 |
DIAGSTATS_GLOBAL |
INTEGER im, ix, iv |
./pkg/diagnostics/diagstats_global.F |
48 |
DIAGSTATS_GLOBAL |
PARAMETER ( iv = nStats - 2 , im = nStats - 1 , ix = nStats ) |
./pkg/diagnostics/diagstats_global.F |
81 |
DIAGSTATS_GLOBAL |
DO i=0,iv |
./pkg/diagnostics/diagstats_local.F |
241 |
DIAGSTATS_LOCAL |
DO i=0,iv |
./pkg/diagnostics/diagstats_local.F |
245 |
DIAGSTATS_LOCAL |
DO i=1,iv |
./pkg/diagnostics/diagstats_local.F |
87 |
DIAGSTATS_LOCAL |
INTEGER im, ix, iv |
./pkg/diagnostics/diagstats_local.F |
88 |
DIAGSTATS_LOCAL |
PARAMETER ( iv = nStats - 2 , im = nStats - 1 , ix = nStats ) |
./pkg/diagnostics/diagstats_mnc_out.F |
53 |
DIAGSTATS_MNC_OUT |
INTEGER im, ix, iv, ist |
./pkg/diagnostics/diagstats_mnc_out.F |
54 |
DIAGSTATS_MNC_OUT |
PARAMETER ( iv = nStats - 2 , im = nStats - 1 , ix = nStats ) |