Changeset 4379 for LMDZ6/trunk/libf/dyn3d

Timestamp:

Jan 10, 2023, 8:14:07 PM (2 years ago)

Author:

fhourdin

Message:

preff : un pas en avant, un pas en arriere

File:

• LMDZ6/trunk/libf/dyn3d/iniacademic.F90 (modified) (1 diff)

LMDZ6/trunk/libf/dyn3d/iniacademic.F90

@@ -112 +112 @@
      ! specific initializations for the shallow water case
      kappa=1
-  endif
-
-
-  if ( ( .not. read_start ) .and. ( iflag_phys > 2 ) ) then
-        ! 101080 : specific value for CMIP5 aqua/terra planets
-        ! "Specify the initial dry mass to be equivalent to
-        !  a global mean surface pressure (101325 minus 245) Pa."
-        preff=101080.
-        call getin('psurf',preff)
-        pa=preff/2.
   endif