Symbol Description Uses
fld_ocn Ocean grid Run-Off field (atmos field will be mapped to this) 12


File Line number Procedure Code
./pkg/atm_ocn_coupler/atm_to_ocn_maprunoff.F 12 ATM_TO_OCN_MAPRUNOFF 
     O           fld_ocn,
./pkg/atm_ocn_coupler/atm_to_ocn_maprunoff.F 34 ATM_TO_OCN_MAPRUNOFF 
      _RL  fld_ocn(Nx_ocn*Ny_ocn)
./pkg/atm_ocn_coupler/atm_to_ocn_maprunoff.F 43 ATM_TO_OCN_MAPRUNOFF 
          fld_ocn(ijo) = 0.
./pkg/atm_ocn_coupler/atm_to_ocn_maprunoff.F 51 ATM_TO_OCN_MAPRUNOFF 
          fld_ocn(ijo) = fld_ocn(ijo)
./pkg/atm_ocn_coupler/atm_to_ocn_mapxyr8.F 11 ATM_TO_OCN_MAPXYR8 
     O           fld_ocn )
./pkg/atm_ocn_coupler/atm_to_ocn_mapxyr8.F 32 ATM_TO_OCN_MAPXYR8 
      Real*8 fld_ocn(oNx, oNy)
./pkg/atm_ocn_coupler/atm_to_ocn_mapxyr8.F 41 ATM_TO_OCN_MAPXYR8 
        fld_ocn(I,J)=0.
./pkg/atm_ocn_coupler/atm_to_ocn_mapxyr8.F 48 ATM_TO_OCN_MAPXYR8 
        fld_ocn(I,J)=fld_atm(I,J)
./pkg/atm_ocn_coupler/ocn_to_atm_mapxyr8.F 32 OCN_TO_ATM_MAPXYR8 
      Real*8 fld_ocn(oNx, oNy)
./pkg/atm_ocn_coupler/ocn_to_atm_mapxyr8.F 48 OCN_TO_ATM_MAPXYR8 
        fld_atm(I,J)=fld_ocn(I,J)
./pkg/atm_ocn_coupler/ocn_to_atm_mapxyr8.F 9 OCN_TO_ATM_MAPXYR8 
     I           fld_ocn,