Changeset 1827 for trunk/LMDZ.GENERIC/libf/phystd

Timestamp:

Dec 4, 2017, 6:02:39 PM (7 years ago)

Author:

mlefevre

Message:

MESOSCALE GENERIC. MESOSCALE precompn flag in writediagfi

File:

• trunk/LMDZ.GENERIC/libf/phystd/writediagfi.F (modified) (2 diffs)

trunk/LMDZ.GENERIC/libf/phystd/writediagfi.F

@@ -99 +99 @@
 !$OMP THREADPRIVATE(firstcall)  !diagfi_def,n_nom_def,nom_def read in diagfi.def
       
-#ifndef MESOSCALE
 
 #ifdef CPP_PARA
@@ -584 +583 @@
       endif
 
-#endif
-! of #ifndef MESOSCALE
       end