/[MITgcm]/MITgcm/pkg/cfc/CFC.h
ViewVC logotype

Diff of /MITgcm/pkg/cfc/CFC.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.4 by jmc, Wed Apr 9 16:07:41 2008 UTC revision 1.5 by jmc, Sun Apr 17 21:01:36 2011 UTC
# Line 1  Line 1 
1  C $Header$  C $Header$
2  C $Name$  C $Name$
3    
4  C     /==========================================================\  C     *==========================================================*
5  C     | CFC.h                                                |  C     | CFC.h
6  C     |==========================================================|  C     *==========================================================*
7    
8         COMMON /CFC_NEEDS/         COMMON /CFC_NEEDS/
9       &              AtmosCFC11, AtmosCFC12, AtmosP,       &              AtmosCFC11, AtmosCFC12, AtmosP,
# Line 40  c atmospheric CFC timseries Line 40  c atmospheric CFC timseries
40        _RL ACFC12(100,2)        _RL ACFC12(100,2)
41        INTEGER cfc_yearbeg, cfc_yearend        INTEGER cfc_yearbeg, cfc_yearend
42    
43    C--   COMMON /CFC_LOAD/
44    C     CFC_ldRec     :: time-record currently loaded (in temp arrays *[1])
45    
46          COMMON /CFC_LOAD_I/ CFC_ldRec
47        COMMON /CFC_LOAD/        COMMON /CFC_LOAD/
48       &    wind0, wind1, ice0, ice1, atmosp0, atmosp1       &    wind0, wind1, ice0, ice1, atmosp0, atmosp1
49    
50          INTEGER CFC_ldRec(nSx,nSy)
51        _RS wind0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS wind0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
52        _RS wind1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS wind1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
53        _RS ice0    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS ice0    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
# Line 66  C  CFC_forcingCycle  :: periodic forcing Line 72  C  CFC_forcingCycle  :: periodic forcing
72        _RL     CFC_forcingPeriod        _RL     CFC_forcingPeriod
73        _RL     CFC_forcingCycle        _RL     CFC_forcingCycle
74    
75    C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5
  ViewVC Help
Powered by ViewVC 1.1.22