Changeset 2141 for branches/dev_1784_PATM/NEMO/OPA_SRC/SBC/sbc_oce.F90

Timestamp:

2010-09-30T15:22:26+02:00 (14 years ago)

Author:

cbricaud

Message:

add module to read atmospheric pressure and module to compute surface pressure gradient

File:

• branches/dev_1784_PATM/NEMO/OPA_SRC/SBC/sbc_oce.F90 (modified) (1 diff)

branches/dev_1784_PATM/NEMO/OPA_SRC/SBC/sbc_oce.F90

@@ -24 +24 @@
    LOGICAL , PUBLIC ::   ln_rnf      = .FALSE.   !: runoffs / runoff mouths
    LOGICAL , PUBLIC ::   ln_ssr      = .FALSE.   !: Sea Surface restoring on SST and/or SSS      
+   LOGICAL , PUBLIC ::   ln_patm     = .FALSE.   !: Read atmospheric pressure
    INTEGER , PUBLIC ::   nn_ice      = 0         !: flag on ice in the surface boundary condition (=0/1/2/3)
    INTEGER , PUBLIC ::   nn_fwb      = 0         !: FreshWater Budget: