Changeset 3696 for trunk/LMDZ.GENERIC/libf/phystd/optcv.F90

Timestamp:

Mar 20, 2025, 9:02:16 AM (3 months ago)

Author:

emillour

Message:

Generic PCM:
Bug fix in the computation of rho() in calc_rayleigh
Made calc_rayleigh.F90 a module and commented out some prints
which swamped the standard output.
GM+EM

File:

• trunk/LMDZ.GENERIC/libf/phystd/optcv.F90 (modified) (1 diff)

trunk/LMDZ.GENERIC/libf/phystd/optcv.F90 ¶

@@ -19 +19 @@
   use tpindex_mod, only: tpindex
   use interpolate_continuum_mod, only: interpolate_continuum
+  use calc_rayleigh_mod, only: calc_rayleigh
 
   implicit none