Back to home page

MITgcm

 
 

    


File indexing completed on 2019-01-25 06:10:04 UTC

view on githubraw file Latest commit 88391fb6 on 2019-01-24 19:38:27 UTC
b2ea1d2979 Jean*0001 #ifdef ALLOW_ATM_PHYS
                0002 
                0003 C-    AtmPhys 2-dim. fields
                0004       _RL atmPhys_SST (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0005       _RL atmPhys_Qflx(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
c9694dc201 Jean*0006       _RL atmPhys_MxLD(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0007       _RL atmPhys_Albedo(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
b2ea1d2979 Jean*0008       COMMON /ATMPHYS_2D_VARS/
                0009      &    atmPhys_SST,
c9694dc201 Jean*0010      &    atmPhys_Qflx,
                0011      &    atmPhys_MxLD,
                0012      &    atmPhys_Albedo
b2ea1d2979 Jean*0013 
                0014 C-    AtmPhys 3-dim. fields
88391fb671 jm-c 0015 C     atmPhys_Ozone :: ozone concentration [volume mixing ratio <-> mol/mol]
b2ea1d2979 Jean*0016       _RL atmPhys_dT(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
                0017       _RL atmPhys_dQ(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
                0018       _RL atmPhys_dU(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
                0019       _RL atmPhys_dV(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
88391fb671 jm-c 0020       _RL atmPhys_Ozone(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
b2ea1d2979 Jean*0021       COMMON /ATMPHYS_3D_VARS/
                0022      &    atmPhys_dT, atmPhys_dQ,
88391fb671 jm-c 0023      &    atmPhys_dU, atmPhys_dV,
                0024      &    atmPhys_Ozone
b2ea1d2979 Jean*0025 
                0026 #endif /* ALLOW_ATM_PHYS */
                0027 
                0028 CEH3 ;;; Local Variables: ***
                0029 CEH3 ;;; mode:fortran ***
                0030 CEH3 ;;; End: ***