Changeset 3884 for trunk/LMDZ.VENUS/libf/phyvenus/nlte_tcool.F

Timestamp:

Aug 11, 2025, 3:55:40 PM (4 weeks ago)

Author:

ikovalenko

Message:

 

File:

• trunk/LMDZ.VENUS/libf/phyvenus/nlte_tcool.F (modified) (2 diffs)

trunk/LMDZ.VENUS/libf/phyvenus/nlte_tcool.F

@@ -31 +31 @@
       use dimphy
       use conc, only: mmean, cpnew
+      use YOMCST_mod
       implicit none
 
       include "nlte_paramdef.h"
       include "nlte_commons.h"
-      include "YOMCST.h"
+c      include "YOMCST.h"
 
 c     Arguments
@@ -1374 +1375 @@
       function hrkday_convert                        
      @     ( mmean_nlte,cpmean_nlte )         
-      
+      use YOMCST_mod
       implicit none                           
       
-#include "YOMCST.h"
+c#include "YOMCST.h"
 c#include "param.h"