Ignore:
Timestamp:
May 13, 2020, 9:24:14 AM (5 years ago)
Author:
emillour
Message:

Mars GCM:

  • Finalized water ion chemisty (added H3O+ and OH+ ions). Added an example of relevent traceur.def file in deftank.
  • Added the computation of NO nightglow.

FGG

Location:
trunk/LMDZ.MARS/libf/phymars
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.MARS/libf/phymars/initracer.F

    r2312 r2321  
    22
    33       use tracer_mod
    4        USE comcstfi_h
     4       use comcstfi_h, only: pi
    55       IMPLICIT NONE
    66c=======================================================================
    … …  
    108108      igcm_hcoplus=0
    109109      igcm_h2oplus=0
     110      igcm_h3oplus=0
     111      igcm_ohplus=0
    110112      igcm_elec=0
    111113
    … …  
    335337          igcm_h2oplus=iq
    336338          mmol(igcm_h2oplus)=18.
     339          count=count+1
     340        endif
     341        if (noms(iq).eq."h3oplus") then
     342          igcm_h3oplus=iq
     343          mmol(igcm_h3oplus)=19.
     344          count=count+1
     345        endif
     346        if (noms(iq).eq."ohplus") then
     347          igcm_ohplus=iq
     348          mmol(igcm_ohplus)=17.
    337349          count=count+1
    338350        endif

  • trunk/LMDZ.MARS/libf/phymars/tracer_mod.F90

    r2312 r2321  
    9090      integer,save :: igcm_hcoplus
    9191      integer,save :: igcm_h2oplus
     92      integer,save :: igcm_h3oplus
     93      integer,save :: igcm_ohplus
    9294      integer,save :: igcm_elec
    9395      ! other tracers
Note: See TracChangeset for help on using the changeset viewer.