pkg/aim/AIM2DYN.h

C $Header: /u/gcmpack/MITgcm/pkg/aim/AIM2DYN.h,v 1.2 2002/09/27 20:01:57 jmc Exp $
C $Name:  $

#ifdef ALLOW_AIM

C     /==========================================================\
C     | AIM2DYN.h                                                |
C     | o AIM output fields in dynamics conforming arrays        |
C     \==========================================================/

C     aim_drag - Holds AIM surface drag term : C_drag*Rho*|V| ( kg.m-2.s-1 )
C                location : AIM "A" grid = center of the dynamics "C" grid
C     aim_dTdt - Net tendency for potential temperature ( oK/s    )
C     aim_dSdt - Net tendency for water vapor           ( g/kg/s )
C
      COMMON /AIM_DDT/
     &                   aim_drag, 
     &                   aim_dTdt,
     &                   aim_dSdt
      _RL  aim_drag  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
      _RL  aim_dTdt  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
      _RL  aim_dSdt  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)

#endif /* ALLOW_AIM */
1	cnh	1.3	C $Header: /u/gcmpack/MITgcm/pkg/aim/AIM2DYN.h,v 1.2 2002/09/27 20:01:57 jmc Exp $
2	cnh	1.1	C $Name: $
3
4			#ifdef ALLOW_AIM
5
6			C /==========================================================\
7			C \| AIM2DYN.h \|
8			C \| o AIM output fields in dynamics conforming arrays \|
9			C \==========================================================/
10
11	jmc	1.2	C aim_drag - Holds AIM surface drag term : C_dragRho\|V\| ( kg.m-2.s-1 )
12	cnh	1.1	C location : AIM "A" grid = center of the dynamics "C" grid
13			C aim_dTdt - Net tendency for potential temperature ( oK/s )
14			C aim_dSdt - Net tendency for water vapor ( g/kg/s )
15			C
16			COMMON /AIM_DDT/
17			& aim_drag,
18			& aim_dTdt,
19			& aim_dSdt
20			_RL aim_drag (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
21			_RL aim_dTdt (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
22			_RL aim_dSdt (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
23
24			#endif /* ALLOW_AIM */