Symbol Description Uses
kHi last vertical level (of array fldRL/RS) to read-in 81


File Line number Procedure Code
./pkg/mdsio/mdsio_read_field.F 139 MDS_READ_FIELD 
      nNz = 1 + kHi - kLo
./pkg/mdsio/mdsio_read_field.F 14 MDS_READ_FIELD 
     I   kSize,kLo,kHi,
./pkg/mdsio/mdsio_read_field.F 180 MDS_READ_FIELD 
      IF ( kLo.LT.1 .OR. kHi.GT.kSize ) THEN
./pkg/mdsio/mdsio_read_field.F 187 MDS_READ_FIELD 
     &    ' , kLo=', kLo, ' , kHi=', kHi
./pkg/mdsio/mdsio_read_field.F 291 MDS_READ_FIELD 
       DO k=kLo,kHi
./pkg/mdsio/mdsio_read_field.F 430 MDS_READ_FIELD 
           DO k=kLo,kHi
./pkg/mdsio/mdsio_read_field.F 86 MDS_READ_FIELD 
      INTEGER kSize, kLo, kHi
./pkg/mdsio/mdsio_write_field.F 100 MDS_WRITE_FIELD 
      INTEGER kSize, kLo, kHi
./pkg/mdsio/mdsio_write_field.F 15 MDS_WRITE_FIELD 
     I   kSize,kLo,kHi,
./pkg/mdsio/mdsio_write_field.F 165 MDS_WRITE_FIELD 
      nNz = 1 + kHi - kLo
./pkg/mdsio/mdsio_write_field.F 208 MDS_WRITE_FIELD 
      IF ( kLo.LT.1 .OR. kHi.GT.kSize ) THEN
./pkg/mdsio/mdsio_write_field.F 215 MDS_WRITE_FIELD 
     &    ' , kLo=', kLo, ' , kHi=', kHi
./pkg/mdsio/mdsio_write_field.F 259 MDS_WRITE_FIELD 
     &      kSize, kLo, kHi, ' file=', pfName(1:pIL)
./pkg/mdsio/mdsio_write_field.F 288 MDS_WRITE_FIELD 
       DO k=kLo,kHi
./pkg/mdsio/mdsio_write_field.F 477 MDS_WRITE_FIELD 
           DO k=kLo,kHi
./pkg/obcs/obcs_apply_ptracer.F 105 OBCS_APPLY_PTRACER 
         DO k = kLo,kHi
./pkg/obcs/obcs_apply_ptracer.F 120 OBCS_APPLY_PTRACER 
         DO k = kLo,kHi
./pkg/obcs/obcs_apply_ptracer.F 52 OBCS_APPLY_PTRACER 
      INTEGER k, kLo, kHi
./pkg/obcs/obcs_apply_ptracer.F 59 OBCS_APPLY_PTRACER 
        kHi = Nr
./pkg/obcs/obcs_apply_ptracer.F 63 OBCS_APPLY_PTRACER 
        kHi = kArg
./pkg/obcs/obcs_apply_ptracer.F 74 OBCS_APPLY_PTRACER 
         DO k = kLo,kHi
./pkg/obcs/obcs_apply_ptracer.F 89 OBCS_APPLY_PTRACER 
         DO k = kLo,kHi
./pkg/obcs/obcs_apply_ts.F 100 OBCS_APPLY_TS 
            DO k = kLo,kHi
./pkg/obcs/obcs_apply_ts.F 119 OBCS_APPLY_TS 
            DO k = kLo,kHi
./pkg/obcs/obcs_apply_ts.F 134 OBCS_APPLY_TS 
            DO k = kLo,kHi
./pkg/obcs/obcs_apply_ts.F 154 OBCS_APPLY_TS 
            DO k = kLo,kHi
./pkg/obcs/obcs_apply_ts.F 169 OBCS_APPLY_TS 
            DO k = kLo,kHi
./pkg/obcs/obcs_apply_ts.F 188 OBCS_APPLY_TS 
            DO k = kLo,kHi
./pkg/obcs/obcs_apply_ts.F 203 OBCS_APPLY_TS 
            DO k = kLo,kHi
./pkg/obcs/obcs_apply_ts.F 49 OBCS_APPLY_TS 
      INTEGER k, kLo, kHi
./pkg/obcs/obcs_apply_ts.F 66 OBCS_APPLY_TS 
        kHi = Nr
./pkg/obcs/obcs_apply_ts.F 69 OBCS_APPLY_TS 
        kHi = kArg
./pkg/obcs/obcs_apply_ts.F 85 OBCS_APPLY_TS 
            DO k = kLo,kHi
./pkg/obcs/obcs_apply_uv.F 103 OBCS_APPLY_UV 
           DO k = kLo,kHi
./pkg/obcs/obcs_apply_uv.F 119 OBCS_APPLY_UV 
           DO k = kLo,kHi
./pkg/obcs/obcs_apply_uv.F 133 OBCS_APPLY_UV 
           DO k = kLo,kHi
./pkg/obcs/obcs_apply_uv.F 150 OBCS_APPLY_UV 
           DO k = kLo,kHi
./pkg/obcs/obcs_apply_uv.F 167 OBCS_APPLY_UV 
           DO k = kLo,kHi
./pkg/obcs/obcs_apply_uv.F 186 OBCS_APPLY_UV 
           DO k = kLo,kHi
./pkg/obcs/obcs_apply_uv.F 203 OBCS_APPLY_UV 
           DO k = kLo,kHi
./pkg/obcs/obcs_apply_uv.F 50 OBCS_APPLY_UV 
      INTEGER k, kLo, kHi
./pkg/obcs/obcs_apply_uv.F 72 OBCS_APPLY_UV 
        kHi = Nr
./pkg/obcs/obcs_apply_uv.F 75 OBCS_APPLY_UV 
        kHi = kArg
./pkg/obcs/obcs_apply_uv.F 89 OBCS_APPLY_UV 
           DO k = kLo,kHi
./pkg/obcs/obcs_apply_w.F 109 OBCS_APPLY_W 
           DO k = kLo,kHi
./pkg/obcs/obcs_apply_w.F 128 OBCS_APPLY_W 
           DO k = kLo,kHi
./pkg/obcs/obcs_apply_w.F 47 OBCS_APPLY_W 
      INTEGER kLo, kHi
./pkg/obcs/obcs_apply_w.F 57 OBCS_APPLY_W 
          kHi = Nr
./pkg/obcs/obcs_apply_w.F 70 OBCS_APPLY_W 
           DO k = kLo,kHi
./pkg/obcs/obcs_apply_w.F 89 OBCS_APPLY_W 
           DO k = kLo,kHi
./pkg/obcs/obcs_save_uv_n.F 101 OBCS_SAVE_UV_N 
         DO k = kLo,kHi
./pkg/obcs/obcs_save_uv_n.F 115 OBCS_SAVE_UV_N 
         DO k = kLo,kHi
./pkg/obcs/obcs_save_uv_n.F 53 OBCS_SAVE_UV_N 
      INTEGER k, kLo, kHi
./pkg/obcs/obcs_save_uv_n.F 60 OBCS_SAVE_UV_N 
        kHi = Nr
./pkg/obcs/obcs_save_uv_n.F 63 OBCS_SAVE_UV_N 
        kHi = kArg
./pkg/obcs/obcs_save_uv_n.F 72 OBCS_SAVE_UV_N 
         DO k = kLo,kHi
./pkg/obcs/obcs_save_uv_n.F 86 OBCS_SAVE_UV_N 
         DO k = kLo,kHi
./pkg/rw/read_mflds.F 371 READ_MFLDS_LEV_RL 
     I                fPrec, kSiz, kLo, kHi, myIter, myThid )
./pkg/rw/read_mflds.F 402 READ_MFLDS_LEV_RL 
      INTEGER kSiz, kLo, kHi
./pkg/rw/read_mflds.F 482 READ_MFLDS_LEV_RL 
     I                       fType, kSiz, kLo, kHi,
./pkg/rw/read_mflds.F 500 READ_MFLDS_LEV_RS 
     I                fPrec, kSiz, kLo, kHi, myIter, myThid )
./pkg/rw/read_mflds.F 531 READ_MFLDS_LEV_RS 
      INTEGER kSiz, kLo, kHi
./pkg/rw/read_mflds.F 611 READ_MFLDS_LEV_RS 
     I                       fType, kSiz, kLo, kHi,
./pkg/rw/read_rec.F 388 READ_REC_LEV_RS 
     I                           fName, fPrec, kSiz, kLo, kHi,
./pkg/rw/read_rec.F 410 READ_REC_LEV_RS 
      INTEGER kSiz, kLo, kHi
./pkg/rw/read_rec.F 441 READ_REC_LEV_RS 
     I                     fType, kSiz, kLo, kHi,
./pkg/rw/read_rec.F 453 READ_REC_LEV_RL 
     I                           fName, fPrec, kSiz, kLo, kHi,
./pkg/rw/read_rec.F 475 READ_REC_LEV_RL 
      INTEGER kSiz, kLo, kHi
./pkg/rw/read_rec.F 506 READ_REC_LEV_RL 
     I                     fType, kSiz, kLo, kHi,
./pkg/rw/write_rec.F 473 WRITE_REC_LEV_RS 
     I                            fName, fPrec, kSiz, kLo, kHi, field,
./pkg/rw/write_rec.F 494 WRITE_REC_LEV_RS 
      INTEGER kSiz, kLo, kHi
./pkg/rw/write_rec.F 529 WRITE_REC_LEV_RS 
     I                      fType, kSiz, kLo, kHi, dummyRL, field,
./pkg/rw/write_rec.F 540 WRITE_REC_LEV_RL 
     I                            fName, fPrec, kSiz, kLo, kHi, field,
./pkg/rw/write_rec.F 561 WRITE_REC_LEV_RL 
      INTEGER kSiz, kLo, kHi
./pkg/rw/write_rec.F 596 WRITE_REC_LEV_RL 
     I                      fType, kSiz, kLo, kHi, field, dummyRS,
./eesupp/src/print.F 1114 PRINT_MAPRL 
     I        iLo,   iHi,   jLo,   jHi,  kLo,  kHi, nBx, nBy,
./eesupp/src/print.F 1171 PRINT_MAPRL 
      INTEGER kLo, kHi
./eesupp/src/print.F 1173 PRINT_MAPRL 
      _RL fld(iLo:iHi,jLo:jHi,kLo:kHi,nBx,nBy)
./eesupp/src/print.F 681 PRINT_MAPRS 
     I        iLo,   iHi,   jLo,   jHi,  kLo,  kHi, nBx, nBy,
./eesupp/src/print.F 738 PRINT_MAPRS 
      INTEGER kLo, kHi
./eesupp/src/print.F 740 PRINT_MAPRS 
      _RS fld(iLo:iHi,jLo:jHi,kLo:kHi,nBx,nBy)