#include "conf_gcm.F90"
#include "compar1d.h"
#include "flux_arp.h"
#include "tsoilnudge.h"
#include "fcg_gcssold.h"
#include "fcg_racmo.h"
#include "YOMCST.h"
#include "netcdf.inc"
#include "dimensions.h"
 
Go to the source code of this file.
 | 
| !$Id we still need to  | use (a local version of) getin use ioipsl_getincom USE print_control_mod | 
|   | 
| !$Id we still need to ch2 ch3 ch4 *Initilisation parametres du lmdz1D lunout  | IF (lunout/=5.and.lunout/=6) THEN ENDIF!Config Key | 
|   | 
      
        
          | ! $Id we still need to use  | 
          ( | 
          a local version  | 
          of | ) | 
           | 
        
      
 
 
      
        
          | ! $Id we still need to ch2 ch3 ch4* Initilisation parametres du lmdz1D !initialisations | 
        
      
 
 
      
        
          | ! surface temperature imposed | 
        
      
 
 
      
        
          | INTERFACE SUBROUTINE SWUVO3 PTR &&USE JPRB USE ONLY |