Back to home page

MITgcm

 
 

    


File indexing completed on 2018-03-02 18:36:22 UTC

view on githubraw file Latest commit add29e06 on 2018-01-31 20:35:05 UTC
aea29c8517 Alis*0001 C
ac0f2a1690 Chri*0002 CBOP
                0003 C    !ROUTINE: SOLVE_FOR_PRESSURE.h
                0004 C    !INTERFACE:
                0005 C    include SOLVE_FOR_PRESSURE.h
                0006 C    !DESCRIPTION: \bv
                0007 C     *==========================================================*
                0008 C     | SOLVE_FOR_PRESSURE.h                                      
                0009 C     | o Globals used by Fortran pressure solver routine         
                0010 C     *==========================================================*
                0011 C     \ev
                0012 CEOP
8e372a5be9 Jean*0013 c     COMMON / SFP_COMMON_R8 / cg2d_x, cg2d_b
aea29c8517 Alis*0014       _RL cg2d_x(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0015       _RL cg2d_b(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)