/[MITgcm]/MITgcm/model/inc/FFIELDS.h
ViewVC logotype

Annotation of /MITgcm/model/inc/FFIELDS.h

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

Revision 1.4 - (hide annotations) (download)
Wed Jun 17 21:07:01 1998 UTC (25 years, 10 months ago) by adcroft
Branch: MAIN
CVS Tags: checkpoint11, checkpoint10, checkpoint9, checkpoint8, checkpoint12
Changes since 1.3: +23 -7 lines
File MIME type: text/plain 
Introduced time-dependant forcing, loaded and interpolated in
load_external_fields.F in a subroutine load_interpolate_forcing().
Control is by one logical and two real variables in PARAMS.h:
periodicExternalForcing, externForcingCycle and externForcingPeriod.
The code in load_external_fields.F is "customized" so needs to
be edited for non-global type runs. We'll tidy it up later.
1 adcroft 1.4 C $Header: /u/gcmpack/models/MITgcmUV/model/inc/FFIELDS.h,v 1.3 1998/06/15 05:13:55 cnh Exp $
2 cnh 1.1 C
3     C /==========================================================\
4     C | FFIELDS.h |
5     C | o Model forcing fields |
6     C |==========================================================|
7     C | The arrays here will need changing and customising for a |
8     C | particular experiment. |
9     C \==========================================================/
10     C
11     C-- For a classical "gyre" type experiment just one term is needed.
12     C fu - Zonal velocity tendency term ( m/s^2 )
13     C fv - Meridional velocity tendency term ( m/s^2 )
14 adcroft 1.4 C SST - Sea surface temperature (degrees) for forcing
15     C SSS - Sea surface salinity (psu) for forcing
16     C Qnet - Surface heat flux (degrees/second)
17     C EmPpR - Evaporation - Precipitation + Runoff (psu/second)
18     COMMON /FFIELDS/
19     & fu, fv,
20     & SST, SSS,
21     & Qnet, EmPpR
22 cnh 1.3 _RS fu (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
23     _RS fv (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
24 adcroft 1.4 _RS SST (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
25     _RS SSS (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
26     _RS Qnet (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
27     _RS EmPpR (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
28     COMMON /FFDOT/
29     & fudot, fvdot,
30     & SSTdot, SSSdot,
31     & Qnetdot, EmPpRdot
32     _RS fudot (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
33     _RS fvdot (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
34     _RS SSTdot (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
35     _RS SSSdot (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
36     _RS Qnetdot (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
37     _RS EmPpRdot (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
  ViewVC Help
Powered by ViewVC 1.1.22