Ignore:
Timestamp:
Jan 22, 2019, 4:53:12 PM (6 years ago)
Author:
jvatant
Message:

Cf r2076, fix a missing dummy init of mugaz causing NaNs?
--JVO

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.GENERIC/libf/phystd/inifis_mod.F90

    r2062 r2078  
    8585  r=pr
    8686  rcp=r/cpp
     87  mugaz=8.314*1000./pr ! dummy init
    8788  pi=2.*asin(1.)
    8889  avocado = 6.02214179e23   ! added by RW
    … …  
    741742           write(*,*) "cpp=",cpp
    742743       ENDIF
    743 !         else
    744 !           mugaz=8.314*1000./pr
    745744     endif ! of if (force_cpp)
    746745     call su_gases
Note: See TracChangeset for help on using the changeset viewer.