Symbol Description Uses
err Measure of current residual of Ax - b, usually the norm. 190



File Line number Procedure Code
./pkg/fizhi/update_ocean_exports.F 717 BCHEADER
      read(iunit,rec=nrec,err=500) cname, cdscrip,
./pkg/fizhi/update_ocean_exports.F 730 BCHEADER
      read(iunit,rec=nrec,err=500) dummy112,
./pkg/mnc/mnc_cw_cvars.F 412 MNC_CW_WRITE_CVAR
        err = NF_DEF_VAR(fid, cvname, NF_DOUBLE,
./pkg/mnc/mnc_cw_cvars.F 415 MNC_CW_WRITE_CVAR
        err = NF_DEF_VAR(fid, cvname, NF_FLOAT,
./pkg/mnc/mnc_cw_cvars.F 421 MNC_CW_WRITE_CVAR
        CALL MNC_HANDLE_ERR(err, msgbuf, myThid)
./pkg/mnc/mnc_cw_cvars.F 425 MNC_CW_WRITE_CVAR
         err = NF_PUT_ATT_TEXT(fid, vid, 'long_name', ia, long_name)
./pkg/mnc/mnc_cw_cvars.F 429 MNC_CW_WRITE_CVAR
         CALL MNC_HANDLE_ERR(err, msgbuf, myThid)
./pkg/mnc/mnc_cw_cvars.F 433 MNC_CW_WRITE_CVAR
         err = NF_PUT_ATT_TEXT(fid, vid, 'units', ia, units)
./pkg/mnc/mnc_cw_cvars.F 437 MNC_CW_WRITE_CVAR
         CALL MNC_HANDLE_ERR(err, msgbuf, myThid)
./pkg/mnc/mnc_cw_cvars.F 441 MNC_CW_WRITE_CVAR
         err = NF_PUT_ATT_TEXT(fid, vid, 'positive', ia, positive)
./pkg/mnc/mnc_cw_cvars.F 445 MNC_CW_WRITE_CVAR
         CALL MNC_HANDLE_ERR(err, msgbuf, myThid)
./pkg/mnc/mnc_cw_cvars.F 450 MNC_CW_WRITE_CVAR
        err = NF_PUT_VARA_DOUBLE(fid, vid,
./pkg/mnc/mnc_cw_cvars.F 453 MNC_CW_WRITE_CVAR
        err = NF_PUT_VARA_REAL(fid, vid,
./pkg/mnc/mnc_cw_cvars.F 458 MNC_CW_WRITE_CVAR
        CALL MNC_HANDLE_ERR(err, msgbuf, myThid)
./pkg/mnc/mnc_cw_cvars.F 46 MNC_CW_WRITE_CVAR
      integer i, vid, nnf, nnl, doit, err
./pkg/mnc/mnc_dim.F 145 MNC_DIM_INIT_ALL_CV
        err = NF_DEF_DIM(mnc_f_info(indf,2), dname(dnf:dnl), tlen, idd)
./pkg/mnc/mnc_dim.F 148 MNC_DIM_INIT_ALL_CV
        CALL MNC_HANDLE_ERR(err, msgbuf, myThid)
./pkg/mnc/mnc_dim.F 194 MNC_DIM_UNLIM_SIZE
      integer i,j, nf, indf, fid, unlimid, err
./pkg/mnc/mnc_dim.F 218 MNC_DIM_UNLIM_SIZE
          err = NF_INQ_DIMLEN(fid, unlimid, unlim_sz)
./pkg/mnc/mnc_dim.F 221 MNC_DIM_UNLIM_SIZE
          CALL MNC_HANDLE_ERR(err, msgbuf, myThid)
./pkg/mnc/mnc_dim.F 89 MNC_DIM_INIT_ALL_CV
      integer ntmp, idd, err, tlen
./pkg/mnc/mnc_file.F 258 MNC_FILE_ADD_ATTR_ANY
      integer n, nf, err, fid, ind, n1, lens
./pkg/mnc/mnc_file.F 285 MNC_FILE_ADD_ATTR_ANY
        err = NF_PUT_ATT_TEXT(fid, NF_GLOBAL, s1, lens, sv)
./pkg/mnc/mnc_file.F 286 MNC_FILE_ADD_ATTR_ANY
        CALL MNC_HANDLE_ERR(err,
./pkg/mnc/mnc_file.F 290 MNC_FILE_ADD_ATTR_ANY
        err = NF_PUT_ATT_DOUBLE(fid, NF_GLOBAL, s1, NF_DOUBLE, len, dv)
./pkg/mnc/mnc_file.F 291 MNC_FILE_ADD_ATTR_ANY
        CALL MNC_HANDLE_ERR(err,
./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_file.F 296 MNC_FILE_ADD_ATTR_ANY
        CALL MNC_HANDLE_ERR(err,
./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 301 MNC_FILE_ADD_ATTR_ANY
        CALL MNC_HANDLE_ERR(err,
./pkg/mnc/mnc_file.F 339 MNC_FILE_CLOSE
      integer i,j,k,n, err, fid, indf, nf
./pkg/mnc/mnc_file.F 356 MNC_FILE_CLOSE
      err = NF_CLOSE(fid)
./pkg/mnc/mnc_file.F 358 MNC_FILE_CLOSE
      CALL MNC_HANDLE_ERR(err, msgbuf, myThid)
./pkg/mnc/mnc_file.F 512 MNC_FILE_REDEF
      integer ind, fid, def, err, n
./pkg/mnc/mnc_file.F 532 MNC_FILE_REDEF
        err = NF_REDEF(fid)
./pkg/mnc/mnc_file.F 533 MNC_FILE_REDEF
        CALL MNC_HANDLE_ERR(err, 
./pkg/mnc/mnc_file.F 565 MNC_FILE_ENDDEF
      integer ind, fid, def, err, n
./pkg/mnc/mnc_file.F 585 MNC_FILE_ENDDEF
        err = NF_ENDDEF(fid)
./pkg/mnc/mnc_file.F 586 MNC_FILE_ENDDEF
        CALL MNC_HANDLE_ERR(err, 
./pkg/mnc/mnc_file.F 62 MNC_FILE_OPEN
      integer n, err, fid, nf
./pkg/mnc/mnc_file.F 658 MNC_FILE_TRY_READ
      integer i,j,k, fid, err, ndim,nvar,ngat,unlimid
./pkg/mnc/mnc_file.F 672 MNC_FILE_TRY_READ
      err = NF_OPEN(fname, NF_WRITE, fid)
./pkg/mnc/mnc_file.F 674 MNC_FILE_TRY_READ
      IF (err .NE. NF_NOERR) THEN
./pkg/mnc/mnc_file.F 675 MNC_FILE_TRY_READ
        ierr = err
./pkg/mnc/mnc_file.F 684 MNC_FILE_TRY_READ
      err = NF_INQ(fid, ndim, nvar, ngat, unlimid)
./pkg/mnc/mnc_file.F 687 MNC_FILE_TRY_READ
      CALL MNC_HANDLE_ERR(err, msgbuf, myThid)
./pkg/mnc/mnc_file.F 691 MNC_FILE_TRY_READ
        err = NF_INQ_DIM(fid, id, name, dlen)
./pkg/mnc/mnc_file.F 695 MNC_FILE_TRY_READ
        CALL MNC_HANDLE_ERR(err, msgbuf, myThid)
./pkg/mnc/mnc_file.F 718 MNC_FILE_TRY_READ
        err = NF_INQ_VAR(fid, id, name, xtype, ndv, idlist, nat)
./pkg/mnc/mnc_file.F 722 MNC_FILE_TRY_READ
        CALL MNC_HANDLE_ERR(err, msgbuf, myThid)
./pkg/mnc/mnc_file.F 82 MNC_FILE_OPEN
        err = NF_CREATE(fname, NF_CLOBBER, fid)
./pkg/mnc/mnc_file.F 83 MNC_FILE_OPEN
        CALL MNC_HANDLE_ERR(err, msgbuf, myThid)
./pkg/mnc/mnc_var.F 145 MNC_VAR_INIT_ANY
      INTEGER i,j,k, n, nf, indf,indv, fid, nd, ngrid, is,ie, err
./pkg/mnc/mnc_var.F 232 MNC_VAR_INIT_ANY
      err = NF_DEF_VAR(fid, vname, vtype, nd, ids, vid)
./pkg/mnc/mnc_var.F 233 MNC_VAR_INIT_ANY
      IF ( err .NE. NF_NOERR ) THEN
./pkg/mnc/mnc_var.F 245 MNC_VAR_INIT_ANY
        CALL MNC_HANDLE_ERR(err, msgBuf, myThid)
./pkg/mnc/mnc_var.F 440 MNC_VAR_ADD_ATTR_ANY
      INTEGER n, indf,ind_fv_ids, fid,vid, err
./pkg/mnc/mnc_var.F 464 MNC_VAR_ADD_ATTR_ANY
        err = NF_PUT_ATT_TEXT(fid, vid, atname, lens, cs)
./pkg/mnc/mnc_var.F 466 MNC_VAR_ADD_ATTR_ANY
        err = NF_PUT_ATT_DOUBLE(fid, vid, atname, NF_DOUBLE, len, dv)
./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 470 MNC_VAR_ADD_ATTR_ANY
        err = NF_PUT_ATT_INT(fid, vid, atname, NF_INT, len, iv)
./pkg/mnc/mnc_var.F 480 MNC_VAR_ADD_ATTR_ANY
      CALL MNC_HANDLE_ERR(err, msgBuf, myThid)
./pkg/mnc/mnc_var.F 680 MNC_VAR_WRITE_ANY
      INTEGER i,j,k, n, indf,ind_fv_ids, fid,vid,did, ig, err, ds,de
./pkg/mnc/mnc_var.F 715 MNC_VAR_WRITE_ANY
        err = NF_INQ_DIMLEN(fid, did, lend)
./pkg/mnc/mnc_var.F 717 MNC_VAR_WRITE_ANY
        CALL MNC_HANDLE_ERR(err, msgBuf, myThid)
./pkg/mnc/mnc_var.F 728 MNC_VAR_WRITE_ANY
        err = NF_PUT_VARA_DOUBLE(fid, vid, vstart, vcount, dv)
./pkg/mnc/mnc_var.F 730 MNC_VAR_WRITE_ANY
        err = NF_PUT_VARA_REAL(fid, vid, vstart, vcount, rv)
./pkg/mnc/mnc_var.F 732 MNC_VAR_WRITE_ANY
        err = NF_PUT_VARA_INT(fid, vid, vstart, vcount, iv)
./pkg/mnc/mnc_var.F 742 MNC_VAR_WRITE_ANY
      CALL MNC_HANDLE_ERR(err, msgBuf, myThid)
./pkg/profiles/active_file_control_profiles.F 132 ACTIVE_READ_PROFILE_RL
      err = NF_INQ_VARID(fid,prof_names(active_num_file,active_varnum), 
./pkg/profiles/active_file_control_profiles.F 134 ACTIVE_READ_PROFILE_RL
      err = NF_GET_VARA_DOUBLE(fid, varid1 , vec_start, vec_count,
./pkg/profiles/active_file_control_profiles.F 147 ACTIVE_READ_PROFILE_RL
      err = NF_INQ_VARID(fid,prof_names(active_num_file,active_varnum),
./pkg/profiles/active_file_control_profiles.F 149 ACTIVE_READ_PROFILE_RL
      err = NF_PUT_VARA_DOUBLE(fid, varid1 , vec_start, vec_count,
./pkg/profiles/active_file_control_profiles.F 212 ACTIVE_READ_PROFILE_RL
      err = NF_INQ_VARID(fid,prof_names(active_num_file,active_varnum),
./pkg/profiles/active_file_control_profiles.F 214 ACTIVE_READ_PROFILE_RL
      err = NF_GET_VARA_DOUBLE(fid, varid1 , vec_start, vec_count,
./pkg/profiles/active_file_control_profiles.F 280 ACTIVE_WRITE_PROFILE_RL
      integer err, fid, varid1 , vec_start(2), vec_count(2)
./pkg/profiles/active_file_control_profiles.F 313 ACTIVE_WRITE_PROFILE_RL
      err = NF_INQ_VARID(fid,prof_names(active_num_file,active_varnum),
./pkg/profiles/active_file_control_profiles.F 315 ACTIVE_WRITE_PROFILE_RL
      err = NF_PUT_VARA_DOUBLE(fid, varid1 , vec_start, vec_count,
./pkg/profiles/active_file_control_profiles.F 318 ACTIVE_WRITE_PROFILE_RL
      err = NF_INQ_VARID(fid,prof_namesmask(active_num_file,
./pkg/profiles/active_file_control_profiles.F 320 ACTIVE_WRITE_PROFILE_RL
      err = NF_PUT_VARA_DOUBLE(fid, varid1 , vec_start, vec_count,
./pkg/profiles/active_file_control_profiles.F 323 ACTIVE_WRITE_PROFILE_RL
      err = NF_INQ_VARID(fid,'prof_ind_glob', varid1 )
./pkg/profiles/active_file_control_profiles.F 324 ACTIVE_WRITE_PROFILE_RL
      err = NF_PUT_VAR1_INT(fid, varid1 , vec_start(2),
./pkg/profiles/active_file_control_profiles.F 372 ACTIVE_WRITE_PROFILE_RL
      err = NF_INQ_VARID(fid,prof_names(active_num_file,active_varnum),
./pkg/profiles/active_file_control_profiles.F 374 ACTIVE_WRITE_PROFILE_RL
      err = NF_GET_VARA_DOUBLE(fid, varid1 , vec_start, vec_count,
./pkg/profiles/active_file_control_profiles.F 388 ACTIVE_WRITE_PROFILE_RL
      err = NF_INQ_VARID(fid,prof_names(active_num_file,active_varnum),
./pkg/profiles/active_file_control_profiles.F 390 ACTIVE_WRITE_PROFILE_RL
      err = NF_PUT_VARA_DOUBLE(fid, varid1 , vec_start, vec_count,
./pkg/profiles/active_file_control_profiles.F 445 ACTIVE_WRITE_PROFILE_RL
      err = NF_INQ_VARID(fid, prof_names(active_num_file,active_varnum),
./pkg/profiles/active_file_control_profiles.F 447 ACTIVE_WRITE_PROFILE_RL
      err = NF_PUT_VARA_DOUBLE(fid, varid1 , vec_start, vec_count,
./pkg/profiles/active_file_control_profiles.F 51 ACTIVE_READ_PROFILE_RL
      integer err, fid, varid1 , vec_start(2), vec_count(2)
./pkg/profiles/active_file_control_profiles.F 80 ACTIVE_READ_PROFILE_RL
      err = NF_INQ_VARID(fid,prof_names(active_num_file,active_varnum),
./pkg/profiles/active_file_control_profiles.F 82 ACTIVE_READ_PROFILE_RL
      err = NF_GET_VARA_DOUBLE(fid, varid1 , vec_start, vec_count,
./pkg/profiles/active_file_control_profiles.F 85 ACTIVE_READ_PROFILE_RL
      err = NF_INQ_VARID(fid,prof_namesmask(active_num_file,
./pkg/profiles/active_file_control_profiles.F 87 ACTIVE_READ_PROFILE_RL
      err = NF_GET_VARA_DOUBLE(fid, varid1 , vec_start, vec_count,
./pkg/profiles/cost_profiles.F 138 COST_PROFILES
           err = NF_CLOSE(fidforward(num_file,bi,bj))
./pkg/profiles/cost_profiles.F 150 COST_PROFILES
           err = NF_OPEN(fnameequinc,NF_NOWRITE,
./pkg/profiles/cost_profiles.F 417 COST_PROFILES
           err = NF_CLOSE(fidforward(num_file,bi,bj))
./pkg/profiles/cost_profiles.F 429 COST_PROFILES
           err = NF_OPEN(fnameequinc,NF_NOWRITE,
./pkg/profiles/cost_profiles.F 54 COST_PROFILES
      integer IL, JL, err
./pkg/profiles/profiles_init_fixed.F 188 PROFILES_INIT_FIXED
      err = NF_OPEN(fnamedatanc, 0, fiddata(num_file,bi,bj))
./pkg/profiles/profiles_init_fixed.F 192 PROFILES_INIT_FIXED
      err = NF_INQ_DIMID(fid,'iPROF', dimid )
./pkg/profiles/profiles_init_fixed.F 193 PROFILES_INIT_FIXED
      err = NF_INQ_DIMLEN(fid, dimid, ProfNo(num_file,bi,bj) )
./pkg/profiles/profiles_init_fixed.F 194 PROFILES_INIT_FIXED
      err = NF_INQ_DIMID(fid,'iDEPTH', dimid )
./pkg/profiles/profiles_init_fixed.F 195 PROFILES_INIT_FIXED
      if (err.NE.NF_NOERR) then
./pkg/profiles/profiles_init_fixed.F 196 PROFILES_INIT_FIXED
        err = NF_INQ_DIMID(fid,'Z', dimid )
./pkg/profiles/profiles_init_fixed.F 198 PROFILES_INIT_FIXED
      err = NF_INQ_DIMLEN(fid, dimid, ProfDepthNo(num_file,bi,bj) )
./pkg/profiles/profiles_init_fixed.F 199 PROFILES_INIT_FIXED
      err = NF_INQ_DIMID(fid,'iINTERP', dimid )
./pkg/profiles/profiles_init_fixed.F 200 PROFILES_INIT_FIXED
      if (err.EQ.NF_NOERR) then
./pkg/profiles/profiles_init_fixed.F 201 PROFILES_INIT_FIXED
        err = NF_INQ_DIMLEN(fid, dimid, iINTERP )
./pkg/profiles/profiles_init_fixed.F 223 PROFILES_INIT_FIXED
      err = NF_INQ_VARID(fid,'prof_depth', varid1a )
./pkg/profiles/profiles_init_fixed.F 224 PROFILES_INIT_FIXED
      if (err.NE.NF_NOERR) then
./pkg/profiles/profiles_init_fixed.F 226 PROFILES_INIT_FIXED
        err = NF_INQ_VARID(fid,'depth', varid1a )
./pkg/profiles/profiles_init_fixed.F 228 PROFILES_INIT_FIXED
      if (err.NE.NF_NOERR) then
./pkg/profiles/profiles_init_fixed.F 239 PROFILES_INIT_FIXED
      err = NF_GET_VAR1_DOUBLE(fid,varid1a,k,
./pkg/profiles/profiles_init_fixed.F 243 PROFILES_INIT_FIXED
      err = NF_INQ_VARID(fid,'prof_YYYYMMDD', varid1a )
./pkg/profiles/profiles_init_fixed.F 244 PROFILES_INIT_FIXED
      err = NF_INQ_VARID(fid,'prof_HHMMSS', varid1b )
./pkg/profiles/profiles_init_fixed.F 245 PROFILES_INIT_FIXED
      err = NF_INQ_VARID(fid,'prof_lon', varid2 )
./pkg/profiles/profiles_init_fixed.F 246 PROFILES_INIT_FIXED
      err = NF_INQ_VARID(fid,'prof_lat', varid3 )
./pkg/profiles/profiles_init_fixed.F 248 PROFILES_INIT_FIXED
      err = NF_INQ_VARID(fid,'prof_bin_id_a', varid4 )
./pkg/profiles/profiles_init_fixed.F 251 PROFILES_INIT_FIXED
      if (err.NE.NF_NOERR) then
./pkg/profiles/profiles_init_fixed.F 262 PROFILES_INIT_FIXED
           err = NF_INQ_VARID(fid,'prof_interp_XC11',varid_intp1)
./pkg/profiles/profiles_init_fixed.F 263 PROFILES_INIT_FIXED
           err = NF_INQ_VARID(fid,'prof_interp_YC11',varid_intp2)
./pkg/profiles/profiles_init_fixed.F 264 PROFILES_INIT_FIXED
           err = NF_INQ_VARID(fid,'prof_interp_XCNINJ',varid_intp11)
./pkg/profiles/profiles_init_fixed.F 265 PROFILES_INIT_FIXED
           err = NF_INQ_VARID(fid,'prof_interp_YCNINJ',varid_intp22)
./pkg/profiles/profiles_init_fixed.F 266 PROFILES_INIT_FIXED
           err = NF_INQ_VARID(fid,'prof_interp_weights',varid_intp3)
./pkg/profiles/profiles_init_fixed.F 267 PROFILES_INIT_FIXED
           err = NF_INQ_VARID(fid,'prof_interp_i',varid_intp4)
./pkg/profiles/profiles_init_fixed.F 268 PROFILES_INIT_FIXED
           err = NF_INQ_VARID(fid,'prof_interp_j',varid_intp5)
./pkg/profiles/profiles_init_fixed.F 269 PROFILES_INIT_FIXED
      if (err.NE.NF_NOERR) then
./pkg/profiles/profiles_init_fixed.F 326 PROFILES_INIT_FIXED
      err = NF_GET_VARA_DOUBLE(fid,varid1a,vec_start(2),
./pkg/profiles/profiles_init_fixed.F 328 PROFILES_INIT_FIXED
      err = NF_GET_VARA_DOUBLE(fid,varid1b,vec_start(2),
./pkg/profiles/profiles_init_fixed.F 330 PROFILES_INIT_FIXED
      err = NF_GET_VARA_DOUBLE(fid,varid2,vec_start(2),
./pkg/profiles/profiles_init_fixed.F 332 PROFILES_INIT_FIXED
      err = NF_GET_VARA_DOUBLE(fid,varid3,vec_start(2),
./pkg/profiles/profiles_init_fixed.F 335 PROFILES_INIT_FIXED
      err = NF_GET_VARA_DOUBLE(fid,varid4,vec_start(2),
./pkg/profiles/profiles_init_fixed.F 339 PROFILES_INIT_FIXED
      if (err.NE.NF_NOERR) then
./pkg/profiles/profiles_init_fixed.F 349 PROFILES_INIT_FIXED
      err = NF_GET_VARA_DOUBLE(fid,varid_intp1,vec_start(2),
./pkg/profiles/profiles_init_fixed.F 351 PROFILES_INIT_FIXED
      err = NF_GET_VARA_DOUBLE(fid,varid_intp2,vec_start(2),
./pkg/profiles/profiles_init_fixed.F 353 PROFILES_INIT_FIXED
      err = NF_GET_VARA_DOUBLE(fid,varid_intp11,vec_start(2),
./pkg/profiles/profiles_init_fixed.F 355 PROFILES_INIT_FIXED
      err = NF_GET_VARA_DOUBLE(fid,varid_intp22,vec_start(2),
./pkg/profiles/profiles_init_fixed.F 362 PROFILES_INIT_FIXED
        err = NF_GET_VARA_DOUBLE(fid,varid_intp3,vec_start2,
./pkg/profiles/profiles_init_fixed.F 364 PROFILES_INIT_FIXED
        err = NF_GET_VARA_DOUBLE(fid,varid_intp4,vec_start2,
./pkg/profiles/profiles_init_fixed.F 366 PROFILES_INIT_FIXED
        err = NF_GET_VARA_DOUBLE(fid,varid_intp5,vec_start2,
./pkg/profiles/profiles_init_fixed.F 58 PROFILES_INIT_FIXED
      integer IL, JL, KL, err
./pkg/profiles/profiles_init_fixed.F 631 PROFILES_INIT_FIXED
        err = NF_INQ_VARID(fid,prof_names(num_file,k)(1:JL), varid1 )
./pkg/profiles/profiles_init_fixed.F 632 PROFILES_INIT_FIXED
        if (err.EQ.NF_NOERR) then
./pkg/profiles/profiles_init_fixed.F 689 PROFILES_INIT_FIXED
        err = NF_OPEN(fnameequinc,NF_WRITE,fidforward(num_file,bi,bj))
./pkg/profiles/profiles_init_fixed.F 699 PROFILES_INIT_FIXED
        err = NF_OPEN(adfnameequinc,NF_WRITE,fidadjoint(num_file,bi,bj))
./pkg/profiles/profiles_init_ncfile.F 30 PROFILES_INIT_NCFILE
      integer myThid,bi,bj,err,vecid(2), length, Zlength
./pkg/profiles/profiles_init_ncfile.F 40 PROFILES_INIT_NCFILE
      err = NF_CREATE(file2 , NF_CLOBBER, fid2)
./pkg/profiles/profiles_init_ncfile.F 41 PROFILES_INIT_NCFILE
      err = NF_DEF_DIM(fid2,'iDEPTH', Zlength ,dimid1)
./pkg/profiles/profiles_init_ncfile.F 42 PROFILES_INIT_NCFILE
      err = NF_DEF_DIM(fid2,'iPROF',length,dimid2)
./pkg/profiles/profiles_init_ncfile.F 46 PROFILES_INIT_NCFILE
      err = NF_DEF_VAR (fid2,'prof_ind_glob', NF_INT, 1,vecid(2),
./pkg/profiles/profiles_init_ncfile.F 48 PROFILES_INIT_NCFILE
      err = NF_PUT_ATT_INT(fid2,varid(1),'_FillValue',NF_INT,1,0)
./pkg/profiles/profiles_init_ncfile.F 51 PROFILES_INIT_NCFILE
      err = NF_INQ_VARID(fid1,prof_names(num_file,num_var), varid0 )
./pkg/profiles/profiles_init_ncfile.F 52 PROFILES_INIT_NCFILE
      if (err.EQ.NF_NOERR) then
./pkg/profiles/profiles_init_ncfile.F 54 PROFILES_INIT_NCFILE
      err = NF_DEF_VAR (fid2,prof_names(num_file,num_var), NF_DOUBLE,
./pkg/profiles/profiles_init_ncfile.F 56 PROFILES_INIT_NCFILE
      err = NF_PUT_ATT_DOUBLE(fid2, varid(2+(num_var-1)*2),'_FillValue',
./pkg/profiles/profiles_init_ncfile.F 58 PROFILES_INIT_NCFILE
      err = NF_DEF_VAR (fid2,prof_namesmask(num_file,num_var),
./pkg/profiles/profiles_init_ncfile.F 60 PROFILES_INIT_NCFILE
      err = NF_PUT_ATT_DOUBLE(fid2,varid(3+(num_var-1)*2),'_FillValue',
./pkg/profiles/profiles_init_ncfile.F 66 PROFILES_INIT_NCFILE
      err=NF_ENDDEF(fid2)
./pkg/profiles/profiles_init_ncfile.F 67 PROFILES_INIT_NCFILE
      err=NF_CLOSE(fid2)
./pkg/profiles/profiles_init_ncfile.F 69 PROFILES_INIT_NCFILE
      err = NF_OPEN(file2, NF_WRITE , fid2)
./pkg/profiles/profiles_readvector.F 30 PROFILES_READVECTOR
      integer irec, fNb, myThid,err,varid1,tmpprofno
./pkg/profiles/profiles_readvector.F 48 PROFILES_READVECTOR
      err = NF_INQ_DIMID(fiddata(fNb,bi,bj),'iPROF', varid1)
./pkg/profiles/profiles_readvector.F 49 PROFILES_READVECTOR
      err = NF_INQ_DIMLEN(fiddata(fNb,bi,bj), varid1, tmpprofno)
./pkg/profiles/profiles_readvector.F 84 PROFILES_READVECTOR
      err = NF_INQ_VARID(fiddata(fNb,bi,bj),prof_names(fNb,kkk),
./pkg/profiles/profiles_readvector.F 86 PROFILES_READVECTOR
      err = NF_GET_VARA_DOUBLE(fiddata(fNb,bi,bj), varid1 , vec_start,
./pkg/profiles/profiles_readvector.F 88 PROFILES_READVECTOR
      err = NF_INQ_VARID(fiddata(fNb,bi,bj),prof_namesweight(fNb,kkk)
./pkg/profiles/profiles_readvector.F 90 PROFILES_READVECTOR
      err = NF_GET_VARA_DOUBLE(fiddata(fNb,bi,bj), varid1 , vec_start,
./pkg/profiles/profiles_readvector.F 93 PROFILES_READVECTOR
      err = NF_INQ_VARID(fiddata(fNb,bi,bj),prof_namesclim(fNb,kkk)
./pkg/profiles/profiles_readvector.F 95 PROFILES_READVECTOR
      err = NF_GET_VARA_DOUBLE(fiddata(fNb,bi,bj), varid1 , vec_start,
./pkg/profiles/profiles_readvector.F 99 PROFILES_READVECTOR
      if (err.NE.NF_NOERR) then
./eesupp/src/eeset_parms.F 170 EESET_PARMS
     &     err=1,IOSTAT=errIO)
./eesupp/src/eeset_parms.F 245 EESET_PARMS
      READ(UNIT=iUnit,NML=EEPARMS,IOSTAT=errIO,err=3)
./lsopt/instore.F 32 INSTORE
      read( itape, *, end=800, err=900 ) n, fc, gnorm0,
./pkg/diagnostics/diag_cg2d.F 200 DIAG_CG2D
      CALL GLOBAL_SUM_TILE_RL( errTile,    err,    myThid )
./pkg/diagnostics/diag_cg2d.F 203 DIAG_CG2D
      err = SQRT(err)
./pkg/diagnostics/diag_cg2d.F 205 DIAG_CG2D
      firstResidual = err
./pkg/diagnostics/diag_cg2d.F 206 DIAG_CG2D
      minResidual   = err
./pkg/diagnostics/diag_cg2d.F 215 DIAG_CG2D
     &    ' iter=', it2d, ' ; resid.=', err, ' ; sumRHS=', sumRHS
./pkg/diagnostics/diag_cg2d.F 228 DIAG_CG2D
      IF ( err .LT. residCriter ) GOTO 11
./pkg/diagnostics/diag_cg2d.F 309 DIAG_CG2D
       CALL GLOBAL_SUM_TILE_RL( errTile,    err,    myThid )
./pkg/diagnostics/diag_cg2d.F 310 DIAG_CG2D
       err = SQRT(err)
./pkg/diagnostics/diag_cg2d.F 314 DIAG_CG2D
     &    ' diag_cg2d: iter=', it2d, ' ; resid.=', err
./pkg/diagnostics/diag_cg2d.F 319 DIAG_CG2D
       IF ( err .LT. residCriter ) GOTO 11
./pkg/diagnostics/diag_cg2d.F 320 DIAG_CG2D
       IF ( err .LT. minResidual ) THEN
./pkg/diagnostics/diag_cg2d.F 322 DIAG_CG2D
         minResidual = err
./pkg/diagnostics/diag_cg2d.F 351 DIAG_CG2D
      lastResidual = err
./pkg/diagnostics/diag_cg2d.F 354 DIAG_CG2D
      IF ( err .GT. minResidual ) THEN
./pkg/diagnostics/diag_cg2d.F 82 DIAG_CG2D
      _RL    err,     errTile(nSx,nSy)