Source Files

jyg+al1

jyg+al1

Module pour declarer et initialiser les parametres de controle des fichiers de sorties et des champs a sortir La routine cosp_output_open (appelee 1 seule fois dans phy_cosp.F90) permet : de creer les fichiers avec leurs grilles horizontales et verticales !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Module pour declarer et initialiser les parametres de controle des fichiers de sorties et des champs a sortir La routine cosp_output_open (appelee 1 seule fois dans phy_cosp.F90) permet : de creer les fichiers avec leurs grilles horizontales et verticales !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

!! Abderrahmane Idelkadi aout 2013 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

!! Abderrahmane Idelkadi aout 2013 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

!============================================================================= ! AI mars 2018 Module permettant de controler les cles de sorties cosp pour LMDZ 1. on initialise les cles au 1er passage a cosp itap de la physique = 1 2. on garde la routine de lecture du fichier namelist cosp_out...txt pour le cas non XIOS (ioipsl) 3. on rajoutte une subroutine qui interoge XIOS si les champs sont demandes dans les xml alors on les active et on active les simulateurs correspondant !=============================================================================

!============================================================================= ! AI mars 2018 Module permettant de controler les cles de sorties cosp pour LMDZ 1. on initialise les cles au 1er passage a cosp itap de la physique = 1 2. on garde la routine de lecture du fichier namelist cosp_out...txt pour le cas non XIOS (ioipsl) 3. on rajoutte une subroutine qui interoge XIOS si les champs sont demandes dans les xml alors on les active et on active les simulateurs correspondant !=============================================================================

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

======================================================================

Module pour declarer et initialiser les parametres de controle des fichiers de sorties et des champs a sortir La routine cosp_output_open (appelee 1 seule fois dans phy_cosp.F90) permet : de creer les fichiers avec leurs grilles horizontales et verticales

Module pour declarer et initialiser les parametres de controle des fichiers de sorties et des champs a sortir La routine cosp_output_open (appelee 1 seule fois dans phy_cosp.F90) permet : de creer les fichiers avec leurs grilles horizontales et verticales

!! Abderrahmane Idelkadi aout 2013 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

!! Abderrahmane Idelkadi aout 2013 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

!============================================================================= ! AI mars 2018 Module permettant de controler les cles de sorties cosp pour LMDZ 1. on initialise les cles au 1er passage a cosp itap de la physique = 1 2. on garde la routine de lecture du fichier namelist cosp_out...txt pour le cas non XIOS (ioipsl) 3. on rajoutte une subroutine qui interoge XIOS si les champs sont demandes dans les xml alors on les active et on active les simulateurs correspondant

!============================================================================= ! AI mars 2018 Module permettant de controler les cles de sorties cosp pour LMDZ 1. on initialise les cles au 1er passage a cosp itap de la physique = 1 2. on garde la routine de lecture du fichier namelist cosp_out...txt pour le cas non XIOS (ioipsl) 3. on rajoutte une subroutine qui interoge XIOS si les champs sont demandes dans les xml alors on les active et on active les simulateurs correspondant

Copyright(C) 2002-2011 Intel Corporation. All Rights Reserved.

Copyright(C) 2002-2011 Intel Corporation. All Rights Reserved.

INCLUDE "cosp_defs.h"

INCLUDE "cosp_defs.h"

60*0*0*0*0*0**72

*** RANDOM_NUMBERS_MIX - Portable Random Number Generator

*** RANDOM_NUMBERS_MIX - Portable Random Number Generator

** SUBROUTINE RRTM_ECRT_140GP *****

** SUBROUTINE RRTM_ECRT_140GP *****

*** mji *** *** This version of RRTM has been altered to interface with either the ECMWF numerical weather prediction model or the ECMWF column radiation model (ECRT) package.

*** mji *** *** This version of RRTM has been altered to interface with either the ECMWF numerical weather prediction model or the ECMWF column radiation model (ECRT) package.

Modified by: * JJ Morcrette 980714 ECMWF for use on ECMWF's Fujitsu VPP770 * Reformatted for F90 by JJMorcrette, ECMWF * - replacing COMMONs by MODULEs * - changing labelled to unlabelled DO loops * - creating set-up routines for all block data statements * - reorganizing the parameter statements * - passing KLEV as argument * - suppressing some equivalencing * * D Salmond 9907 ECMWF Speed-up modifications * D Salmond 000515 ECMWF Speed-up modifications *

Modified by: * JJ Morcrette 980714 ECMWF for use on ECMWF's Fujitsu VPP770 * Reformatted for F90 by JJMorcrette, ECMWF * - replacing COMMONs by MODULEs * - changing labelled to unlabelled DO loops * - creating set-up routines for all block data statements * - reorganizing the parameter statements * - passing KLEV as argument * - suppressing some equivalencing * * D Salmond 9907 ECMWF Speed-up modifications * D Salmond 000515 ECMWF Speed-up modifications *

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!