Symbol Description Uses
pf Intermediate array for building RHS source term. 289



File Line number Procedure Code
./pkg/ptracers/ptracers_write_state.F 43 PTRACERS_WRITE_STATE
      CHARACTER*(1) pf
./pkg/ptracers/ptracers_write_state.F 56 PTRACERS_WRITE_STATE
          pf(1:1) = 'D'
./pkg/ptracers/ptracers_write_state.F 58 PTRACERS_WRITE_STATE
          pf(1:1) = 'R'
./pkg/ptracers/ptracers_write_state.F 72 PTRACERS_WRITE_STATE
         CALL MNC_CW_RL_W(pf,'ptracers',0,0,PTRACERS_names(iTracer),
./pkg/ptracers/ptracers_write_timeave.F 102 PTRACERS_WRITE_TIMEAVE
            CALL MNC_CW_RL_W(pf,'ptr_tave',0,0,PTRACERS_names(ii),
./pkg/ptracers/ptracers_write_timeave.F 109 PTRACERS_WRITE_TIMEAVE
            CALL MNC_CW_RL_W(pf,'ptr_flux_tave',0,0,name,
./pkg/ptracers/ptracers_write_timeave.F 57 PTRACERS_WRITE_TIMEAVE
      CHARACTER*(1) pf
./pkg/ptracers/ptracers_write_timeave.F 85 PTRACERS_WRITE_TIMEAVE
            pf(1:1) = 'D'
./pkg/ptracers/ptracers_write_timeave.F 87 PTRACERS_WRITE_TIMEAVE
            pf(1:1) = 'R'
./pkg/shelfice/shelfice_do_diags.F 134 SHELFICE_DO_DIAGS
        CALL MNC_CW_RL_W(pf,'shelfice_tave',0,0,
./pkg/shelfice/shelfice_do_diags.F 136 SHELFICE_DO_DIAGS
        CALL MNC_CW_RL_W(pf,'shelfice_tave',0,0,
./pkg/shelfice/shelfice_do_diags.F 34 SHELFICE_DO_DIAGS
      CHARACTER*(1) pf
./pkg/shelfice/shelfice_do_diags.F 37 SHELFICE_DO_DIAGS
        pf(1:1) = 'D'
./pkg/shelfice/shelfice_do_diags.F 39 SHELFICE_DO_DIAGS
        pf(1:1) = 'R'
./pkg/shelfice/shelfice_do_diags.F 55 SHELFICE_DO_DIAGS
         CALL MNC_CW_RS_W(pf,'shelfice',0,0,'fwFlux',
./pkg/shelfice/shelfice_do_diags.F 57 SHELFICE_DO_DIAGS
         CALL MNC_CW_RS_W(pf,'shelfice',0,0,'heatFlux',
./pkg/gmredi/gmredi_output.F 156 GMREDI_OUTPUT
         CALL MNC_CW_RL_W(pf,'gm_tave',0,0,'Kwx',GM_Kwx_T,myThid)
./pkg/gmredi/gmredi_output.F 157 GMREDI_OUTPUT
         CALL MNC_CW_RL_W(pf,'gm_tave',0,0,'Kwy',GM_Kwy_T,myThid)
./pkg/gmredi/gmredi_output.F 158 GMREDI_OUTPUT
         CALL MNC_CW_RL_W(pf,'gm_tave',0,0,'Kwz',GM_Kwz_T,myThid)
./pkg/gmredi/gmredi_output.F 161 GMREDI_OUTPUT
           CALL MNC_CW_RL_W(pf,'gm_tave',0,0,'VisbK', 
./pkg/gmredi/gmredi_output.F 168 GMREDI_OUTPUT
     &          pf,'gm_tave',0,0,'PsiX', GM_PsiXtave, myThid)
./pkg/gmredi/gmredi_output.F 170 GMREDI_OUTPUT
     &          pf,'gm_tave',0,0,'PsiY', GM_PsiYtave, myThid)
./pkg/gmredi/gmredi_output.F 48 GMREDI_OUTPUT
      CHARACTER*(1) pf
./pkg/gmredi/gmredi_output.F 51 GMREDI_OUTPUT
        pf(1:1) = 'D'
./pkg/gmredi/gmredi_output.F 53 GMREDI_OUTPUT
        pf(1:1) = 'R'
./pkg/gmredi/gmredi_output.F 82 GMREDI_OUTPUT
          CALL MNC_CW_RL_W(pf,'gm_inst',0,0,'Kux',Kux,myThid)
./pkg/gmredi/gmredi_output.F 83 GMREDI_OUTPUT
          CALL MNC_CW_RL_W(pf,'gm_inst',0,0,'Kvy',Kvy,myThid)
./pkg/gmredi/gmredi_output.F 87 GMREDI_OUTPUT
            CALL MNC_CW_RL_W(pf,'gm_inst',0,0,'Kuz',Kuz,myThid)
./pkg/gmredi/gmredi_output.F 88 GMREDI_OUTPUT
            CALL MNC_CW_RL_W(pf,'gm_inst',0,0,'Kvz',Kvz,myThid)
./pkg/aim_v23/aim_diagnostics.F 115 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,'aim_dT_RSW',TT_RSW,myThid)
./pkg/aim_v23/aim_diagnostics.F 116 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,'aim_dT_RLW',TT_RLW,myThid)
./pkg/aim_v23/aim_diagnostics.F 117 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,'aim_dT_CNV',TT_CNV,myThid)
./pkg/aim_v23/aim_diagnostics.F 118 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,'aim_dT_PBL',TT_PBL,myThid)
./pkg/aim_v23/aim_diagnostics.F 119 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,'aim_dT_LSC',TT_LSC,myThid)
./pkg/aim_v23/aim_diagnostics.F 120 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,'aim_dQ_CNV',QT_CNV,myThid)
./pkg/aim_v23/aim_diagnostics.F 121 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,'aim_dQ_PBL',QT_PBL,myThid)
./pkg/aim_v23/aim_diagnostics.F 122 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,'aim_dQ_LSC',QT_LSC,myThid)
./pkg/aim_v23/aim_diagnostics.F 203 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 205 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 207 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 209 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 211 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 213 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 215 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 217 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 219 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 221 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 223 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 225 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 227 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 229 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 231 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 233 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 235 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 237 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 239 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 241 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 243 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 245 AIM_DIAGNOSTICS
         CALL MNC_CW_RL_W(pf,suff,0,0,
./pkg/aim_v23/aim_diagnostics.F 51 AIM_DIAGNOSTICS
      CHARACTER*(1) pf
./pkg/aim_v23/aim_diagnostics.F 56 AIM_DIAGNOSTICS
        pf(1:1) = 'D'
./pkg/aim_v23/aim_diagnostics.F 58 AIM_DIAGNOSTICS
        pf(1:1) = 'R'
./pkg/aim_v23/aim_write_tave.F 118 AIM_WRITE_TAVE
           pf(1:1) = 'D'
./pkg/aim_v23/aim_write_tave.F 120 AIM_WRITE_TAVE
           pf(1:1) = 'R'
./pkg/aim_v23/aim_write_tave.F 129 AIM_WRITE_TAVE
         CALL MNC_CW_RL_W(pf,mncfn,0,0,'USTRtave',  USTRtave,  myThid)
./pkg/aim_v23/aim_write_tave.F 130 AIM_WRITE_TAVE
         CALL MNC_CW_RL_W(pf,mncfn,0,0,'VSTRtave',  VSTRtave,  myThid)
./pkg/aim_v23/aim_write_tave.F 131 AIM_WRITE_TAVE
         CALL MNC_CW_RL_W(pf,mncfn,0,0,'TSRtave',   TSRtave,   myThid)
./pkg/aim_v23/aim_write_tave.F 132 AIM_WRITE_TAVE
         CALL MNC_CW_RL_W(pf,mncfn,0,0,'OLRtave',   OLRtave,   myThid)
./pkg/aim_v23/aim_write_tave.F 133 AIM_WRITE_TAVE
         CALL MNC_CW_RL_W(pf,mncfn,0,0,'SSRtave',   SSRtave,   myThid)
./pkg/aim_v23/aim_write_tave.F 134 AIM_WRITE_TAVE
         CALL MNC_CW_RL_W(pf,mncfn,0,0,'SLRtave',   SLRtave,   myThid)
./pkg/aim_v23/aim_write_tave.F 135 AIM_WRITE_TAVE
         CALL MNC_CW_RL_W(pf,mncfn,0,0,'SHFtave',   SHFtave,   myThid)
./pkg/aim_v23/aim_write_tave.F 136 AIM_WRITE_TAVE
         CALL MNC_CW_RL_W(pf,mncfn,0,0,'EVAPtave',  EVAPtave,  myThid)
./pkg/aim_v23/aim_write_tave.F 137 AIM_WRITE_TAVE
         CALL MNC_CW_RL_W(pf,mncfn,0,0,'PRECNVtave',PRECNVtave,myThid)
./pkg/aim_v23/aim_write_tave.F 138 AIM_WRITE_TAVE
         CALL MNC_CW_RL_W(pf,mncfn,0,0,'PRECLStave',PRECLStave,myThid)
./pkg/aim_v23/aim_write_tave.F 139 AIM_WRITE_TAVE
         CALL MNC_CW_RL_W(pf,mncfn,0,0,'CLOUDCtave',CLOUDCtave,myThid)
./pkg/aim_v23/aim_write_tave.F 140 AIM_WRITE_TAVE
         CALL MNC_CW_RL_W(pf,mncfn,0,0,'CLTOPtave', CLTOPtave, myThid)
./pkg/aim_v23/aim_write_tave.F 141 AIM_WRITE_TAVE
         CALL MNC_CW_RL_W(pf,mncfn,0,0,'CBMFtave',  CBMFtave,  myThid)
./pkg/aim_v23/aim_write_tave.F 142 AIM_WRITE_TAVE
         CALL MNC_CW_RL_W(pf,mncfn,0,0,'DRAGtave',  DRAGtave,  myThid)
./pkg/aim_v23/aim_write_tave.F 143 AIM_WRITE_TAVE
         CALL MNC_CW_RL_W(pf,mncfn,0,0,'aimV0tave', aimV0tave, myThid)
./pkg/aim_v23/aim_write_tave.F 144 AIM_WRITE_TAVE
         CALL MNC_CW_RL_W(pf,mncfn,0,0,'aimT0tave', aimT0tave, myThid)
./pkg/aim_v23/aim_write_tave.F 145 AIM_WRITE_TAVE
         CALL MNC_CW_RL_W(pf,mncfn,0,0,'aimQ0tave', aimQ0tave, myThid)
./pkg/aim_v23/aim_write_tave.F 146 AIM_WRITE_TAVE
         CALL MNC_CW_RL_W(pf,mncfn,0,0,'EnFxPrtave',EnFxPrtave,myThid)
./pkg/aim_v23/aim_write_tave.F 147 AIM_WRITE_TAVE
         CALL MNC_CW_RL_W(pf,mncfn,0,0,'albedotave',albedotave,myThid)
./pkg/aim_v23/aim_write_tave.F 148 AIM_WRITE_TAVE
         CALL MNC_CW_RL_W(pf,mncfn,0,0,'dTsurftave',dTsurftave,myThid)
./pkg/aim_v23/aim_write_tave.F 149 AIM_WRITE_TAVE
         CALL MNC_CW_RL_W(pf,mncfn,0,0,'aimRHtave', aimRHtave, myThid)
./pkg/aim_v23/aim_write_tave.F 40 AIM_WRITE_TAVE
      CHARACTER*(1) pf
./pkg/dic/dic_biotic_diags.F 111 DIC_BIOTIC_DIAGS
     &        pf,'dic_tave',0,0,'dic_BIO_ave',BIOave,myThid)
./pkg/dic/dic_biotic_diags.F 113 DIC_BIOTIC_DIAGS
     &        pf,'dic_tave',0,0,'dic_CAR_ave',CARave,myThid)
./pkg/dic/dic_biotic_diags.F 115 DIC_BIOTIC_DIAGS
     &        pf,'dic_tave',0,0,'dic_SUR_ave',SURave,myThid)
./pkg/dic/dic_biotic_diags.F 117 DIC_BIOTIC_DIAGS
     &        pf,'dic_tave',0,0,'dic_SURO_ave',SUROave,myThid)
./pkg/dic/dic_biotic_diags.F 119 DIC_BIOTIC_DIAGS
     &        pf,'dic_tave',0,0,'dic_pH_ave',pHave,myThid)
./pkg/dic/dic_biotic_diags.F 121 DIC_BIOTIC_DIAGS
     &        pf,'dic_tave',0,0,'dic_pCO2_ave',pCO2ave,myThid)
./pkg/dic/dic_biotic_diags.F 123 DIC_BIOTIC_DIAGS
     &        pf,'dic_tave',0,0,'dic_fluxCO2_ave',fluxCO2ave,myThid)
./pkg/dic/dic_biotic_diags.F 125 DIC_BIOTIC_DIAGS
     &        pf,'dic_tave',0,0,'dic_OmegaC_ave',OmegaCave,myThid)
./pkg/dic/dic_biotic_diags.F 127 DIC_BIOTIC_DIAGS
     &        pf,'dic_tave',0,0,'dic_pflux_ave',pfluxave,myThid)
./pkg/dic/dic_biotic_diags.F 129 DIC_BIOTIC_DIAGS
     &        pf,'dic_tave',0,0,'dic_cflux_ave',cfluxave,myThid)
./pkg/dic/dic_biotic_diags.F 39 DIC_BIOTIC_DIAGS
      CHARACTER*(1) pf
./pkg/dic/dic_biotic_diags.F 44 DIC_BIOTIC_DIAGS
        pf(1:1) = 'D'
./pkg/dic/dic_biotic_diags.F 46 DIC_BIOTIC_DIAGS
        pf(1:1) = 'R'
./pkg/cd_code/cd_code_scheme.F 111 CD_CODE_SCHEME
     &          -( _recip_dyC(i,j,bi,bj)*(pf(i,j)-pf(i,j-1))
./pkg/cd_code/cd_code_scheme.F 166 CD_CODE_SCHEME
     &          -( _recip_dxC(i,j,bi,bj)*(pf(i,j)-pf(i-1,j))
./pkg/cd_code/cd_code_scheme.F 97 CD_CODE_SCHEME
        pf(i,j) = 
./model/src/write_state.F 161 WRITE_STATE
            pf(1:1) = 'D'
./model/src/write_state.F 163 WRITE_STATE
            pf(1:1) = 'R'
./model/src/write_state.F 172 WRITE_STATE
          CALL MNC_CW_RL_W(pf,'state',0,0,'U', uVel, myThid)
./model/src/write_state.F 173 WRITE_STATE
          CALL MNC_CW_RL_W(pf,'state',0,0,'V', vVel, myThid)
./model/src/write_state.F 174 WRITE_STATE
          CALL MNC_CW_RL_W(pf,'state',0,0,'Temp', theta, myThid)
./model/src/write_state.F 175 WRITE_STATE
          CALL MNC_CW_RL_W(pf,'state',0,0,'S', salt, myThid)
./model/src/write_state.F 176 WRITE_STATE
          CALL MNC_CW_RL_W(pf,'state',0,0,'Eta', etaN, myThid)
./model/src/write_state.F 177 WRITE_STATE
          CALL MNC_CW_RL_W(pf,'state',0,0,'W', wVel, myThid)
./model/src/write_state.F 183 WRITE_STATE
            CALL MNC_CW_RL_W(pf,'phiHyd',0,0,'phiHyd',
./model/src/write_state.F 191 WRITE_STATE
            CALL MNC_CW_RL_W(pf,'phiHydLow',0,0,'phiHydLow',
./model/src/write_state.F 196 WRITE_STATE
            CALL MNC_CW_RL_W(pf,'state',0,0,'phi_nh',phi_nh,myThid)
./model/src/write_state.F 78 WRITE_STATE
      CHARACTER*(1) pf
./model/src/calc_div_ghat.F 106 CALC_DIV_GHAT
     &   pf(i+1,j)-pf(i,j)
./model/src/calc_div_ghat.F 114 CALC_DIV_GHAT
         cg3d_b(i,j,k,bi,bj) = pf(i+1,j)-pf(i,j)
./model/src/calc_div_ghat.F 124 CALC_DIV_GHAT
          pf(i,j) = yA(i,j)*gV(i,j,k,bi,bj) / deltatmom
./model/src/calc_div_ghat.F 132 CALC_DIV_GHAT
          pf(i,j) = implicDiv2Dflow
./model/src/calc_div_ghat.F 140 CALC_DIV_GHAT
          pf(i,j) = ( implicDiv2Dflow * gV(i,j,k,bi,bj)
./model/src/calc_div_ghat.F 149 CALC_DIV_GHAT
     &   pf(i,j+1)-pf(i,j)
./model/src/calc_div_ghat.F 158 CALC_DIV_GHAT
     &    pf(i,j+1)-pf(i,j)
./model/src/calc_div_ghat.F 56 CALC_DIV_GHAT
      _RL pf (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./model/src/calc_div_ghat.F 68 CALC_DIV_GHAT
          pf(i,j) = xA(i,j)*gU(i,j,k,bi,bj) / deltaTmom
./model/src/calc_div_ghat.F 76 CALC_DIV_GHAT
          pf(i,j) = implicDiv2Dflow
./model/src/calc_div_ghat.F 97 CALC_DIV_GHAT
          pf(i,j) = ( implicDiv2Dflow * gU(i,j,k,bi,bj)
./pkg/kpp/kpp_do_diags.F 135 KPP_DO_DIAGS
          CALL MNC_CW_RL_W(pf,'kpp_state',0,0,
./pkg/kpp/kpp_do_diags.F 137 KPP_DO_DIAGS
          CALL MNC_CW_RL_W(pf,'kpp_state',0,0,
./pkg/kpp/kpp_do_diags.F 139 KPP_DO_DIAGS
          CALL MNC_CW_RL_W(pf,'kpp_state',0,0,
./pkg/kpp/kpp_do_diags.F 141 KPP_DO_DIAGS
          CALL MNC_CW_RL_W(pf,'kpp_state',0,0,
./pkg/kpp/kpp_do_diags.F 143 KPP_DO_DIAGS
          CALL MNC_CW_RL_W(pf,'kpp_state',0,0,
./pkg/kpp/kpp_do_diags.F 271 KPP_DO_DIAGS
          CALL MNC_CW_RL_W(pf,'kpp_timeave',0,0,
./pkg/kpp/kpp_do_diags.F 273 KPP_DO_DIAGS
          CALL MNC_CW_RL_W(pf,'kpp_timeave',0,0,
./pkg/kpp/kpp_do_diags.F 275 KPP_DO_DIAGS
          CALL MNC_CW_RL_W(pf,'kpp_timeave',0,0,
./pkg/kpp/kpp_do_diags.F 277 KPP_DO_DIAGS
          CALL MNC_CW_RL_W(pf,'kpp_timeave',0,0,
./pkg/kpp/kpp_do_diags.F 279 KPP_DO_DIAGS
          CALL MNC_CW_RL_W(pf,'kpp_timeave',0,0,
./pkg/kpp/kpp_do_diags.F 69 KPP_DO_DIAGS
      CHARACTER*(1) pf
./pkg/kpp/kpp_do_diags.F 73 KPP_DO_DIAGS
        pf(1:1) = 'D'
./pkg/kpp/kpp_do_diags.F 75 KPP_DO_DIAGS
        pf(1:1) = 'R'
./pkg/timeave/timeave_statv_write.F 221 TIMEAVE_STATV_WRITE
            pf(1:1) = 'D'
./pkg/timeave/timeave_statv_write.F 223 TIMEAVE_STATV_WRITE
            pf(1:1) = 'R'
./pkg/timeave/timeave_statv_write.F 231 TIMEAVE_STATV_WRITE
          CALL MNC_CW_RL_W(pf,'tave',0,0,'ETAtave',etatave,myThid)
./pkg/timeave/timeave_statv_write.F 234 TIMEAVE_STATV_WRITE
          CALL MNC_CW_RL_W(pf,'tave',0,0,'Ttave',thetatave,myThid)
./pkg/timeave/timeave_statv_write.F 235 TIMEAVE_STATV_WRITE
          CALL MNC_CW_RL_W(pf,'tave',0,0,'Stave',salttave,myThid)
./pkg/timeave/timeave_statv_write.F 236 TIMEAVE_STATV_WRITE
          CALL MNC_CW_RL_W(pf,'tave',0,0,'uVeltave',uVeltave,myThid)
./pkg/timeave/timeave_statv_write.F 237 TIMEAVE_STATV_WRITE
          CALL MNC_CW_RL_W(pf,'tave',0,0,'vVeltave',vVeltave,myThid)
./pkg/timeave/timeave_statv_write.F 238 TIMEAVE_STATV_WRITE
          CALL MNC_CW_RL_W(pf,'tave',0,0,'wVeltave',wVeltave,myThid)
./pkg/timeave/timeave_statv_write.F 239 TIMEAVE_STATV_WRITE
          CALL MNC_CW_RL_W(pf,'tave',0,0,'UTtave',UTtave,myThid)
./pkg/timeave/timeave_statv_write.F 240 TIMEAVE_STATV_WRITE
          CALL MNC_CW_RL_W(pf,'tave',0,0,'VTtave',VTtave,myThid)
./pkg/timeave/timeave_statv_write.F 241 TIMEAVE_STATV_WRITE
          CALL MNC_CW_RL_W(pf,'tave',0,0,'WTtave',WTtave,myThid)
./pkg/timeave/timeave_statv_write.F 242 TIMEAVE_STATV_WRITE
          CALL MNC_CW_RL_W(pf,'tave',0,0,'UStave',UStave,myThid)
./pkg/timeave/timeave_statv_write.F 243 TIMEAVE_STATV_WRITE
          CALL MNC_CW_RL_W(pf,'tave',0,0,'VStave',VStave,myThid)
./pkg/timeave/timeave_statv_write.F 244 TIMEAVE_STATV_WRITE
          CALL MNC_CW_RL_W(pf,'tave',0,0,'WStave',WStave,myThid)
./pkg/timeave/timeave_statv_write.F 245 TIMEAVE_STATV_WRITE
          CALL MNC_CW_RL_W(pf,'tave',0,0,'TTtave',TTtave,myThid)
./pkg/timeave/timeave_statv_write.F 246 TIMEAVE_STATV_WRITE
          CALL MNC_CW_RL_W(pf,'tave',0,0,'UUtave',UUtave,myThid)
./pkg/timeave/timeave_statv_write.F 247 TIMEAVE_STATV_WRITE
          CALL MNC_CW_RL_W(pf,'tave',0,0,'VVtave',VVtave,myThid)
./pkg/timeave/timeave_statv_write.F 248 TIMEAVE_STATV_WRITE
          CALL MNC_CW_RL_W(pf,'tave',0,0,'UVtave',UVtave,myThid)
./pkg/timeave/timeave_statv_write.F 251 TIMEAVE_STATV_WRITE
            CALL MNC_CW_RL_W(pf,'tave',0,0,'Tdiftave',
./pkg/timeave/timeave_statv_write.F 256 TIMEAVE_STATV_WRITE
            CALL MNC_CW_RL_W(pf,'tave',0,0,'uZtave',uZetatave,myThid)
./pkg/timeave/timeave_statv_write.F 257 TIMEAVE_STATV_WRITE
            CALL MNC_CW_RL_W(pf,'tave',0,0,'vZtave',vZetatave,myThid)
./pkg/timeave/timeave_statv_write.F 260 TIMEAVE_STATV_WRITE
          CALL MNC_CW_RL_W(pf,'tave',0,0,'PhHytave',
./pkg/timeave/timeave_statv_write.F 263 TIMEAVE_STATV_WRITE
            CALL MNC_CW_RL_W(pf,'tave',0,0,'PHLtave',
./pkg/timeave/timeave_statv_write.F 265 TIMEAVE_STATV_WRITE
            CALL MNC_CW_RL_W(pf,'tave',0,0,'PHL2tave',
./pkg/timeave/timeave_statv_write.F 267 TIMEAVE_STATV_WRITE
            CALL MNC_CW_RL_W(pf,'tave',0,0,'Convtave',
./pkg/timeave/timeave_statv_write.F 269 TIMEAVE_STATV_WRITE
            CALL MNC_CW_RL_W(pf,'tave',0,0,'uFluxtave',
./pkg/timeave/timeave_statv_write.F 271 TIMEAVE_STATV_WRITE
            CALL MNC_CW_RL_W(pf,'tave',0,0,'vFluxtave',
./pkg/timeave/timeave_statv_write.F 273 TIMEAVE_STATV_WRITE
            CALL MNC_CW_RL_W(pf,'tave',0,0,'tFluxtave',
./pkg/timeave/timeave_statv_write.F 275 TIMEAVE_STATV_WRITE
            CALL MNC_CW_RL_W(pf,'tave',0,0,'sFluxtave',
./pkg/timeave/timeave_statv_write.F 280 TIMEAVE_STATV_WRITE
          CALL MNC_CW_RL_W(pf,'tave',0,0,'hUtave',hUtave,myThid)
./pkg/timeave/timeave_statv_write.F 281 TIMEAVE_STATV_WRITE
          CALL MNC_CW_RL_W(pf,'tave',0,0,'hVtave',hVtave,myThid)
./pkg/timeave/timeave_statv_write.F 54 TIMEAVE_STATV_WRITE
      CHARACTER*(1) pf
./pkg/ocn_compon_interf/cpl_write_diags.F 123 CPL_WRITE_DIAGS
          CALL MNC_CW_RL_W(pf,'cpl_tave',0,0,
./pkg/ocn_compon_interf/cpl_write_diags.F 125 CPL_WRITE_DIAGS
          CALL MNC_CW_RL_W(pf,'cpl_tave',0,0,
./pkg/ocn_compon_interf/cpl_write_diags.F 127 CPL_WRITE_DIAGS
          CALL MNC_CW_RL_W(pf,'cpl_tave',0,0,
./pkg/ocn_compon_interf/cpl_write_diags.F 129 CPL_WRITE_DIAGS
          CALL MNC_CW_RL_W(pf,'cpl_tave',0,0,
./pkg/ocn_compon_interf/cpl_write_diags.F 131 CPL_WRITE_DIAGS
          CALL MNC_CW_RL_W(pf,'cpl_tave',0,0,
./pkg/ocn_compon_interf/cpl_write_diags.F 133 CPL_WRITE_DIAGS
          CALL MNC_CW_RL_W(pf,'cpl_tave',0,0,
./pkg/ocn_compon_interf/cpl_write_diags.F 135 CPL_WRITE_DIAGS
          CALL MNC_CW_RL_W(pf,'cpl_tave',0,0,
./pkg/ocn_compon_interf/cpl_write_diags.F 137 CPL_WRITE_DIAGS
          CALL MNC_CW_RL_W(pf,'cpl_tave',0,0,
./pkg/ocn_compon_interf/cpl_write_diags.F 139 CPL_WRITE_DIAGS
          CALL MNC_CW_RL_W(pf,'cpl_tave',0,0,
./pkg/ocn_compon_interf/cpl_write_diags.F 141 CPL_WRITE_DIAGS
          CALL MNC_CW_RL_W(pf,'cpl_tave',0,0,
./pkg/ocn_compon_interf/cpl_write_diags.F 143 CPL_WRITE_DIAGS
          CALL MNC_CW_RL_W(pf,'cpl_tave',0,0,
./pkg/ocn_compon_interf/cpl_write_diags.F 145 CPL_WRITE_DIAGS
          CALL MNC_CW_RL_W(pf,'cpl_tave',0,0,
./pkg/ocn_compon_interf/cpl_write_diags.F 43 CPL_WRITE_DIAGS
      CHARACTER*(1) pf
./pkg/ocn_compon_interf/cpl_write_diags.F 47 CPL_WRITE_DIAGS
        pf(1:1) = 'D'
./pkg/ocn_compon_interf/cpl_write_diags.F 49 CPL_WRITE_DIAGS
        pf(1:1) = 'R'
./pkg/thsice/thsice_output.F 237 THSICE_OUTPUT
           pf(1:1) = 'D'
./pkg/thsice/thsice_output.F 239 THSICE_OUTPUT
           pf(1:1) = 'R'
./pkg/thsice/thsice_output.F 250 THSICE_OUTPUT
         CALL MNC_CW_RL_W(pf,mncf,0,0,
./pkg/thsice/thsice_output.F 252 THSICE_OUTPUT
         CALL MNC_CW_RL_W(pf,mncf,0,0,
./pkg/thsice/thsice_output.F 254 THSICE_OUTPUT
         CALL MNC_CW_RL_W(pf,mncf,0,0,
./pkg/thsice/thsice_output.F 256 THSICE_OUTPUT
         CALL MNC_CW_RL_W(pf,mncf,0,0,
./pkg/thsice/thsice_output.F 258 THSICE_OUTPUT
         CALL MNC_CW_RL_W(pf,mncf,0,0,
./pkg/thsice/thsice_output.F 260 THSICE_OUTPUT
         CALL MNC_CW_RL_W(pf,mncf,0,0,
./pkg/thsice/thsice_output.F 262 THSICE_OUTPUT
         CALL MNC_CW_RL_W(pf,mncf,0,0,
./pkg/thsice/thsice_output.F 264 THSICE_OUTPUT
         CALL MNC_CW_RL_W(pf,mncf,0,0,
./pkg/thsice/thsice_output.F 266 THSICE_OUTPUT
         CALL MNC_CW_RL_W(pf,mncf,0,0,
./pkg/thsice/thsice_output.F 268 THSICE_OUTPUT
         CALL MNC_CW_RL_W(pf,mncf,0,0,
./pkg/thsice/thsice_output.F 271 THSICE_OUTPUT
           CALL MNC_CW_RL_W(pf,mncf,0,0,
./pkg/thsice/thsice_output.F 273 THSICE_OUTPUT
           CALL MNC_CW_RL_W(pf,mncf,0,0,
./pkg/thsice/thsice_output.F 277 THSICE_OUTPUT
           CALL MNC_CW_RL_W(pf,mncf,0,0,'tMxL_ave',ice_tMxL_Ave,myThid)
./pkg/thsice/thsice_output.F 278 THSICE_OUTPUT
           CALL MNC_CW_RL_W(pf,mncf,0,0,'sMxL_ave',ice_sMxL_Ave,myThid)
./pkg/thsice/thsice_output.F 361 THSICE_OUTPUT
            pf(1:1) = 'D'
./pkg/thsice/thsice_output.F 363 THSICE_OUTPUT
            pf(1:1) = 'R'
./pkg/thsice/thsice_output.F 374 THSICE_OUTPUT
          CALL MNC_CW_RL_W(pf,mncf,0,0,'iceMask',   iceMask,   myThid)
./pkg/thsice/thsice_output.F 375 THSICE_OUTPUT
          CALL MNC_CW_RL_W(pf,mncf,0,0,'iceHeight', iceHeight, myThid)
./pkg/thsice/thsice_output.F 376 THSICE_OUTPUT
          CALL MNC_CW_RL_W(pf,mncf,0,0,'snowHeight',snowHeight,myThid)
./pkg/thsice/thsice_output.F 377 THSICE_OUTPUT
          CALL MNC_CW_RL_W(pf,mncf,0,0,'Tsrf',      Tsrf,      myThid)
./pkg/thsice/thsice_output.F 378 THSICE_OUTPUT
          CALL MNC_CW_RL_W(pf,mncf,0,0,'Tice1',     Tice1,     myThid)
./pkg/thsice/thsice_output.F 379 THSICE_OUTPUT
          CALL MNC_CW_RL_W(pf,mncf,0,0,'Tice2',     Tice1,     myThid)
./pkg/thsice/thsice_output.F 380 THSICE_OUTPUT
          CALL MNC_CW_RL_W(pf,mncf,0,0,'Qice1',     Qice1,     myThid)
./pkg/thsice/thsice_output.F 381 THSICE_OUTPUT
          CALL MNC_CW_RL_W(pf,mncf,0,0,'Qice2',     Qice2,     myThid)
./pkg/thsice/thsice_output.F 382 THSICE_OUTPUT
          CALL MNC_CW_RL_W(pf,mncf,0,0,'snowAge',   snowAge,   myThid)
./pkg/thsice/thsice_output.F 384 THSICE_OUTPUT
            CALL MNC_CW_RL_W(pf,mncf,0,0,'tOceMxL',tOceMxL,myThid)
./pkg/thsice/thsice_output.F 385 THSICE_OUTPUT
            CALL MNC_CW_RL_W(pf,mncf,0,0,'sOceMxL',sOceMxL,myThid)
./pkg/thsice/thsice_output.F 53 THSICE_OUTPUT
      CHARACTER*(1) pf
./pkg/mom_vecinv/mom_vecinv.F 111 MOM_VECINV
      CHARACTER*(1) pf
./pkg/mom_vecinv/mom_vecinv.F 145 MOM_VECINV
          pf(1:1) = 'D'
./pkg/mom_vecinv/mom_vecinv.F 147 MOM_VECINV
          pf(1:1) = 'R'
./pkg/mom_vecinv/mom_vecinv.F 283 MOM_VECINV
          CALL MNC_CW_RL_W_OFFSET(pf,'mom_vi',bi,bj,'Ds',strain,
./pkg/mom_vecinv/mom_vecinv.F 462 MOM_VECINV
          CALL MNC_CW_RL_W_OFFSET(pf,'mom_vi',bi,bj,'Z3',vort3,
./pkg/mom_vecinv/mom_vecinv.F 514 MOM_VECINV
           CALL MNC_CW_RL_W_OFFSET(pf,'mom_vi',bi,bj, 'fV', uCf,
./pkg/mom_vecinv/mom_vecinv.F 516 MOM_VECINV
           CALL MNC_CW_RL_W_OFFSET(pf,'mom_vi',bi,bj, 'fU', vCf,
./pkg/mom_vecinv/mom_vecinv.F 582 MOM_VECINV
           CALL MNC_CW_RL_W_OFFSET(pf,'mom_vi',bi,bj, 'zV', uCf,
./pkg/mom_vecinv/mom_vecinv.F 584 MOM_VECINV
           CALL MNC_CW_RL_W_OFFSET(pf,'mom_vi',bi,bj, 'zU', vCf,
./pkg/mom_vecinv/mom_vecinv.F 647 MOM_VECINV
           CALL MNC_CW_RL_W_OFFSET(pf,'mom_vi',bi,bj, 'KEx', uCf,
./pkg/mom_vecinv/mom_vecinv.F 649 MOM_VECINV
           CALL MNC_CW_RL_W_OFFSET(pf,'mom_vi',bi,bj, 'KEy', vCf,
./pkg/mom_vecinv/mom_vecinv.F 722 MOM_VECINV
          CALL MNC_CW_RL_W_OFFSET(pf,'mom_vi',bi,bj,'W3',omega3,
./pkg/mom_vecinv/mom_vecinv.F 724 MOM_VECINV
          CALL MNC_CW_RL_W_OFFSET(pf,'mom_vi',bi,bj,'KE',KE,
./pkg/mom_vecinv/mom_vecinv.F 726 MOM_VECINV
          CALL MNC_CW_RL_W_OFFSET(pf,'mom_vi',bi,bj,'D', hDiv,
./pkg/mom_vecinv/mom_vecinv.F 728 MOM_VECINV
          CALL MNC_CW_RL_W_OFFSET(pf,'mom_vi',bi,bj,'Dt',tension,
./pkg/mom_vecinv/mom_vecinv.F 730 MOM_VECINV
          CALL MNC_CW_RL_W_OFFSET(pf,'mom_vi',bi,bj,'Du',guDiss,
./pkg/mom_vecinv/mom_vecinv.F 732 MOM_VECINV
          CALL MNC_CW_RL_W_OFFSET(pf,'mom_vi',bi,bj,'Dv',gvDiss,
./pkg/land/land_do_diags.F 109 LAND_DO_DIAGS
            pf(1:1) = 'D'
./pkg/land/land_do_diags.F 111 LAND_DO_DIAGS
            pf(1:1) = 'R'
./pkg/land/land_do_diags.F 124 LAND_DO_DIAGS
          CALL MNC_CW_RL_W(pf,fmnc,0,0,
./pkg/land/land_do_diags.F 126 LAND_DO_DIAGS
          CALL MNC_CW_RL_W(pf,fmnc,0,0,
./pkg/land/land_do_diags.F 128 LAND_DO_DIAGS
          CALL MNC_CW_RL_W(pf,fmnc,0,0,
./pkg/land/land_do_diags.F 131 LAND_DO_DIAGS
          CALL MNC_CW_RL_W(pf,fmnc,0,0,
./pkg/land/land_do_diags.F 133 LAND_DO_DIAGS
          CALL MNC_CW_RL_W(pf,fmnc,0,0,
./pkg/land/land_do_diags.F 135 LAND_DO_DIAGS
          CALL MNC_CW_RL_W(pf,fmnc,0,0,
./pkg/land/land_do_diags.F 137 LAND_DO_DIAGS
          CALL MNC_CW_RL_W(pf,fmnc,0,0,
./pkg/land/land_do_diags.F 139 LAND_DO_DIAGS
          CALL MNC_CW_RL_W(pf,fmnc,0,0,
./pkg/land/land_do_diags.F 142 LAND_DO_DIAGS
          CALL MNC_CW_RL_W(pf,fmnc,0,0,
./pkg/land/land_do_diags.F 144 LAND_DO_DIAGS
          CALL MNC_CW_RL_W(pf,fmnc,0,0,
./pkg/land/land_do_diags.F 146 LAND_DO_DIAGS
          CALL MNC_CW_RL_W(pf,fmnc,0,0,
./pkg/land/land_do_diags.F 54 LAND_DO_DIAGS
      CHARACTER*(1) pf
./pkg/land/land_write_diags.F 160 LAND_WRITE_DIAGS
         CALL MNC_CW_RL_W(pf,fn,0,0,
./pkg/land/land_write_diags.F 162 LAND_WRITE_DIAGS
         CALL MNC_CW_RL_W(pf,fn,0,0,
./pkg/land/land_write_diags.F 164 LAND_WRITE_DIAGS
         CALL MNC_CW_RL_W(pf,fn,0,0,
./pkg/land/land_write_diags.F 167 LAND_WRITE_DIAGS
         CALL MNC_CW_RL_W(pf,fn,0,0,
./pkg/land/land_write_diags.F 169 LAND_WRITE_DIAGS
         CALL MNC_CW_RL_W(pf,fn,0,0,
./pkg/land/land_write_diags.F 171 LAND_WRITE_DIAGS
         CALL MNC_CW_RL_W(pf,fn,0,0,
./pkg/land/land_write_diags.F 173 LAND_WRITE_DIAGS
         CALL MNC_CW_RL_W(pf,fn,0,0,
./pkg/land/land_write_diags.F 175 LAND_WRITE_DIAGS
         CALL MNC_CW_RL_W(pf,fn,0,0,
./pkg/land/land_write_diags.F 49 LAND_WRITE_DIAGS
      CHARACTER*(1) pf
./pkg/land/land_write_diags.F 52 LAND_WRITE_DIAGS
        pf(1:1) = 'D'
./pkg/land/land_write_diags.F 54 LAND_WRITE_DIAGS
        pf(1:1) = 'R'
./pkg/seaice/seaice_do_diags.F 141 SEAICE_DO_DIAGS
            CALL MNC_CW_RS_W(pf,'sice',0,0,'si_UICE',arr,myThid)
./pkg/seaice/seaice_do_diags.F 168 SEAICE_DO_DIAGS
            CALL MNC_CW_RS_W(pf,'sice',0,0,'si_VICE',arr,myThid)
./pkg/seaice/seaice_do_diags.F 195 SEAICE_DO_DIAGS
            CALL MNC_CW_RS_W(pf,'sice',0,0,'si_HEFF',arr,myThid)
./pkg/seaice/seaice_do_diags.F 222 SEAICE_DO_DIAGS
            CALL MNC_CW_RS_W(pf,'sice',0,0,'si_AREA',arr,myThid)
./pkg/seaice/seaice_do_diags.F 318 SEAICE_DO_DIAGS
         CALL MNC_CW_RL_W(pf,'sice_tave',0,0,
./pkg/seaice/seaice_do_diags.F 320 SEAICE_DO_DIAGS
         CALL MNC_CW_RL_W(pf,'sice_tave',0,0,
./pkg/seaice/seaice_do_diags.F 322 SEAICE_DO_DIAGS
         CALL MNC_CW_RL_W(pf,'sice_tave',0,0,
./pkg/seaice/seaice_do_diags.F 324 SEAICE_DO_DIAGS
         CALL MNC_CW_RL_W(pf,'sice_tave',0,0,
./pkg/seaice/seaice_do_diags.F 326 SEAICE_DO_DIAGS
         CALL MNC_CW_RL_W(pf,'sice_tave',0,0,
./pkg/seaice/seaice_do_diags.F 328 SEAICE_DO_DIAGS
         CALL MNC_CW_RL_W(pf,'sice_tave',0,0,
./pkg/seaice/seaice_do_diags.F 330 SEAICE_DO_DIAGS
         CALL MNC_CW_RL_W(pf,'sice_tave',0,0,
./pkg/seaice/seaice_do_diags.F 332 SEAICE_DO_DIAGS
         CALL MNC_CW_RL_W(pf,'sice_tave',0,0,
./pkg/seaice/seaice_do_diags.F 334 SEAICE_DO_DIAGS
         CALL MNC_CW_RL_W(pf,'sice_tave',0,0,
./pkg/seaice/seaice_do_diags.F 38 SEAICE_DO_DIAGS
      CHARACTER*(1) pf
./pkg/seaice/seaice_do_diags.F 41 SEAICE_DO_DIAGS
        pf(1:1) = 'D'
./pkg/seaice/seaice_do_diags.F 43 SEAICE_DO_DIAGS
        pf(1:1) = 'R'
./pkg/seaice/seaice_do_diags.F 61 SEAICE_DO_DIAGS
             CALL MNC_CW_RS_W(pf,'sice',0,0,'si_sigma1',
./pkg/seaice/seaice_do_diags.F 63 SEAICE_DO_DIAGS
             CALL MNC_CW_RS_W(pf,'sice',0,0,'si_sigma2',
./pkg/seaice/seaice_do_diags.F 65 SEAICE_DO_DIAGS
             CALL MNC_CW_RS_W(pf,'sice',0,0,'si_sigma12',
./pkg/seaice/seaice_do_diags.F 69 SEAICE_DO_DIAGS
            CALL MNC_CW_RS_W(pf,'sice',0,0,'si_UWIND',uwind,myThid)
./pkg/seaice/seaice_do_diags.F 70 SEAICE_DO_DIAGS
            CALL MNC_CW_RS_W(pf,'sice',0,0,'si_VWIND',vwind,myThid)
./pkg/seaice/seaice_do_diags.F 71 SEAICE_DO_DIAGS
            CALL MNC_CW_RS_W(pf,'sice',0,0,'fu',fu,myThid)
./pkg/seaice/seaice_do_diags.F 72 SEAICE_DO_DIAGS
            CALL MNC_CW_RS_W(pf,'sice',0,0,'fv',fv,myThid)
./pkg/seaice/seaice_do_diags.F 73 SEAICE_DO_DIAGS
            CALL MNC_CW_RS_W(pf,'sice',0,0,'EmPmR',EmPmR,myThid)
./pkg/seaice/seaice_do_diags.F 74 SEAICE_DO_DIAGS
            CALL MNC_CW_RS_W(pf,'sice',0,0,'Qnet',Qnet,myThid)
./pkg/seaice/seaice_do_diags.F 75 SEAICE_DO_DIAGS
            CALL MNC_CW_RS_W(pf,'sice',0,0,'Qsw',Qsw,myThid)