Changeset 1684 for trunk/LMDZ.MARS/libf/phymars/callkeys.h

Timestamp:

Mar 31, 2017, 5:03:31 PM (8 years ago)

Author:

emillour

Message:

Mars GCM:
Add possibility to fix EUV input as E10.7 value and remove previous system
(which used parameter solarcondate). The E10.7 value is now set via
callphys.def by parameter "fixed_euv_value" which is only used if
solvarmod==0.
Guidelines for min/ave/max EUV input: fixed_euv_value=80/140/320.
EM + FGG

File:

• trunk/LMDZ.MARS/libf/phymars/callkeys.h (modified) (2 diffs)

trunk/LMDZ.MARS/libf/phymars/callkeys.h

@@ -19 +19 @@
      &   ,dustbin,nltemodel,nircorr,solvarmod,solvaryear
      
-      COMMON/callkeys_r/topdustref,solarcondate,semi,alphan,euveff,     &
-     &   tke_heat_flux,dustrefir
+      COMMON/callkeys_r/topdustref,semi,alphan,euveff,                  &
+     &   tke_heat_flux,dustrefir,fixed_euv_value
      
       LOGICAL callrad,calldifv,calladj,callcond,callsoil,               &
@@ -38 +38 @@
       real semi
       real alphan
-      real solarcondate
+      real fixed_euv_value
       real euveff
       real tke_heat_flux