File |
Line number |
Procedure |
Code |
./pkg/mnc/mnc_var.F |
381 |
MNC_VAR_ADD_ATTR_ANY |
I atype, cs,len,dv,rv,iv, |
./pkg/mnc/mnc_var.F |
399 |
MNC_VAR_ADD_ATTR_ANY |
integer iv(*) |
./pkg/mnc/mnc_var.F |
436 |
MNC_VAR_ADD_ATTR_ANY |
err = NF_PUT_ATT_INT(fid, vid, atname, NF_INT, len, iv) |
./pkg/mnc/mnc_var.F |
571 |
MNC_VAR_WRITE_ANY |
I iv, |
./pkg/mnc/mnc_var.F |
584 |
MNC_VAR_WRITE_ANY |
integer iv(*) |
./pkg/mnc/mnc_var.F |
643 |
MNC_VAR_WRITE_ANY |
err = NF_PUT_VARA_INT(fid, vid, vstart, vcount, iv) |
./pkg/mnc/mnc_file.F |
237 |
MNC_FILE_ADD_ATTR_ANY |
I atype, sv, len,dv,rv,iv, |
./pkg/mnc/mnc_file.F |
250 |
MNC_FILE_ADD_ATTR_ANY |
integer myThid, atype, len, iv |
./pkg/mnc/mnc_file.F |
298 |
MNC_FILE_ADD_ATTR_ANY |
err = NF_PUT_ATT_INT(fid, NF_GLOBAL, s1, NF_INT, len, iv) |
./pkg/mnc/mnc_file.F |
650 |
MNC_FILE_TRY_READ |
integer dlen, id, xtype, nat, nff,nlf, iv |
./pkg/mnc/mnc_file.F |
727 |
MNC_FILE_TRY_READ |
iv = 2 + 3*mnc_fv_ids(indf,1) |
./pkg/mnc/mnc_file.F |
728 |
MNC_FILE_TRY_READ |
mnc_fv_ids(indf,iv) = indv |
./pkg/mnc/mnc_file.F |
729 |
MNC_FILE_TRY_READ |
mnc_fv_ids(indf,iv+1) = id |
./pkg/mnc/mnc_file.F |
734 |
MNC_FILE_TRY_READ |
mnc_fv_ids(indf,iv+2) = j |
./pkg/diagnostics/diagstats_global.F |
113 |
DIAGSTATS_GLOBAL |
DO i=0,iv |
./pkg/diagnostics/diagstats_global.F |
123 |
DIAGSTATS_GLOBAL |
DO i=0,iv |
./pkg/diagnostics/diagstats_global.F |
140 |
DIAGSTATS_GLOBAL |
DO i=0,iv |
./pkg/diagnostics/diagstats_global.F |
154 |
DIAGSTATS_GLOBAL |
DO i=0,iv |
./pkg/diagnostics/diagstats_global.F |
172 |
DIAGSTATS_GLOBAL |
DO i=1,iv |
./pkg/diagnostics/diagstats_global.F |
176 |
DIAGSTATS_GLOBAL |
qtmp1(iv,k) = qtmp1(iv,k) - qtmp1(1,k)*qtmp1(1,k) |
./pkg/diagnostics/diagstats_global.F |
178 |
DIAGSTATS_GLOBAL |
IF (qtmp1(iv,k).GT.0.) qtmp1(iv,k) = SQRT(qtmp1(iv,k)) |
./pkg/diagnostics/diagstats_global.F |
192 |
DIAGSTATS_GLOBAL |
DO i=1,iv |
./pkg/diagnostics/diagstats_global.F |
196 |
DIAGSTATS_GLOBAL |
DO i=1,iv |
./pkg/diagnostics/diagstats_global.F |
201 |
DIAGSTATS_GLOBAL |
qtmp1(iv,k) = qtmp1(iv,k) - qtmp1(1,k)*qtmp1(1,k) |
./pkg/diagnostics/diagstats_global.F |
203 |
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 |
80 |
DIAGSTATS_GLOBAL |
DO i=0,iv |
./pkg/diagnostics/diagstats_global.F |
97 |
DIAGSTATS_GLOBAL |
DO i=0,iv |
./pkg/diagnostics/diagstats_mnc_out.F |
52 |
DIAGSTATS_MNC_OUT |
INTEGER im, ix, iv, ist |
./pkg/diagnostics/diagstats_mnc_out.F |
53 |
DIAGSTATS_MNC_OUT |
PARAMETER ( iv = nStats - 2 , im = nStats - 1 , ix = nStats ) |
./pkg/diagnostics/diagstats_local.F |
222 |
DIAGSTATS_LOCAL |
DO i=0,iv |
./pkg/diagnostics/diagstats_local.F |
78 |
DIAGSTATS_LOCAL |
INTEGER im, ix, iv |
./pkg/diagnostics/diagstats_local.F |
79 |
DIAGSTATS_LOCAL |
PARAMETER ( iv = nStats - 2 , im = nStats - 1 , ix = nStats ) |
./pkg/diagnostics/diagstats_ascii_out.F |
41 |
DIAGSTATS_ASCII_OUT |
INTEGER im, ix, iv |
./pkg/diagnostics/diagstats_ascii_out.F |
42 |
DIAGSTATS_ASCII_OUT |
PARAMETER ( iv = nStats - 2 , im = nStats - 1 , ix = nStats ) |