modd_surfexn.F90

Go to the documentation of this file.

!SFX_LIC Copyright 1994-2014 CNRS, Meteo-France and Universite Paul Sabatier
!SFX_LIC This is part of the SURFEX software governed by the CeCILL-C licence
!SFX_LIC version 1. See LICENSE, CeCILL-C_V1-en.txt and CeCILL-C_V1-fr.txt  
!SFX_LIC for details. version 1.
MODULE modd_surfex_n
!
USE modd_agri_n, ONLY : agri_t
USE modd_bem_option_n, ONLY : bem_options_t
USE modd_bld_description_n, ONLY : bld_desc_t
USE modd_ch_emis_field_n, ONLY : ch_emis_field_t
USE modd_ch_flake_n, ONLY : ch_flake_t
USE modd_ch_isba_n, ONLY : ch_isba_t
USE modd_ch_seaflux_n, ONLY : ch_seaflux_t
USE modd_ch_snap_n, ONLY : ch_emis_snap_t
USE modd_ch_surf_n, ONLY : ch_surf_t
USE modd_ch_teb_n, ONLY : ch_teb_t
USE modd_ch_watflux_n, ONLY : ch_watflux_t
USE modd_data_bem_n, ONLY : data_bem_t
USE modd_data_cover_n, ONLY : data_cover_t
USE modd_data_isba_n, ONLY : data_isba_t
USE modd_data_seaflux_n, ONLY : data_seaflux_t
USE modd_data_teb_garden_n, ONLY : data_teb_garden_t
USE modd_data_teb_greenroof_n, ONLY : data_teb_greenroof_t
USE modd_data_teb_n, ONLY : data_teb_t
USE modd_data_tsz0_n, ONLY : data_tsz0_t
USE modd_diag_evap_isba_n, ONLY : diag_evap_isba_t
USE modd_diag_flake_n, ONLY : diag_flake_t
USE modd_diag_ideal_n, ONLY : diag_ideal_t
USE modd_diag_isba_n, ONLY : diag_isba_t
USE modd_diag_misc_flake_n, ONLY : diag_misc_flake_t
USE modd_diag_misc_isba_n, ONLY : diag_misc_isba_t
USE modd_diag_misc_teb_option_n, ONLY : diag_misc_teb_options_t
USE modd_diag_ocean_n, ONLY : diag_ocean_t
USE modd_diag_seaflux_n, ONLY : diag_seaflux_t
USE modd_diag_seaice_n, ONLY : diag_seaice_t
USE modd_diag_surf_atm_n, ONLY : diag_surf_atm_t
USE modd_diag_teb_garden_n, ONLY : diag_teb_garden_t
USE modd_diag_teb_greenroof_n, ONLY : diag_teb_greenroof_t
USE modd_diag_teb_n, ONLY : diag_teb_t
USE modd_diag_utci_teb_n, ONLY : diag_utci_teb_t
USE modd_diag_watflux_n, ONLY : diag_watflux_t
USE modd_dst_n, ONLY : dst_t
USE modd_dummy_surf_fields_n, ONLY : dummy_surf_fields_t
USE modd_emis_gr_field_n, ONLY : emis_gr_field_t
USE modd_flake_grid_n, ONLY : flake_grid_t
USE modd_flake_n, ONLY : flake_t
USE modd_flake_sbl_n, ONLY : flake_sbl_t
USE modd_gr_biog_garden_n, ONLY : gr_biog_garden_t
USE modd_gr_biog_greenroof_n, ONLY : gr_biog_greenroof_t
USE modd_gr_biog_n, ONLY : gr_biog_t
USE modd_ideal_n, ONLY : ideal_t
USE modd_isba_canopy_n, ONLY : isba_canopy_t
USE modd_isba_grid_n, ONLY : isba_grid_t
USE modd_isba_n, ONLY : isba_t
USE modd_ocean_n, ONLY : ocean_t
USE modd_ocean_rel_n, ONLY : ocean_rel_t
USE modd_pack_ch_isba, ONLY : pack_ch_isba_t
USE modd_pack_diag_isba, ONLY : pack_diag_isba_t
USE modd_pack_isba, ONLY : pack_isba_t
USE modd_seaflux_grid_n, ONLY : seaflux_grid_t
USE modd_seaflux_n, ONLY : seaflux_t
USE modd_seaflux_sbl_n, ONLY : seaflux_sbl_t
USE modd_slt_n, ONLY : slt_t
USE modd_sso_canopy_n, ONLY : sso_canopy_t
USE modd_surf_atm_grid_n, ONLY : surf_atm_grid_t
USE modd_surf_atm_n, ONLY : surf_atm_t
USE modd_surf_atm_sso_n, ONLY : surf_atm_sso_t
USE modd_sv_n, ONLY : sv_t
USE modd_teb_canopy_n, ONLY : teb_canopy_t
USE modd_teb_garden_option_n, ONLY : teb_garden_options_t
USE modd_teb_garden_pgd_n, ONLY : teb_garden_pgd_t
USE modd_teb_greenroof_option_n, ONLY : teb_greenroof_options_t
USE modd_teb_greenroof_pgd_n, ONLY : teb_greenroof_pgd_t
USE modd_teb_grid_n, ONLY : teb_grid_t
USE modd_teb_irrig_n, ONLY : teb_irrig_t
USE modd_teb_option_n, ONLY : teb_options_t
USE modd_teb_panel_n, ONLY : teb_panel_t
USE modd_teb_veg_n, ONLY : teb_veg_options_t
USE modd_watflux_grid_n, ONLY : watflux_grid_t
USE modd_watflux_n, ONLY : watflux_t
USE modd_watflux_sbl_n, ONLY : watflux_sbl_t
!
USE modd_bem_n, ONLY : bem_t
USE modd_diag_cumul_teb_n, ONLY : diag_cumul_teb_t
USE modd_diag_misc_teb_n, ONLY : diag_misc_teb_t
USE modd_teb_garden_n, ONLY : teb_garden_t
USE modd_teb_garden_pgd_evol_n, ONLY : teb_garden_pgd_evol_t
USE modd_teb_greenroof_n, ONLY : teb_greenroof_t
USE modd_teb_greenroof_pgd_evol_n, ONLY : teb_greenroof_pgd_evol_t
USE modd_teb_n, ONLY : teb_t
!
!
!---------------------------------------------------------------------------
!
TYPE flake_model_t
!
TYPE(ch_flake_t) :: CHF
TYPE(diag_flake_t) :: DGF
TYPE(diag_misc_flake_t) :: DGMF
TYPE(flake_t) :: F
TYPE(flake_grid_t) :: FG
TYPE(flake_sbl_t) :: FSB
!
END TYPE flake_model_t
!
TYPE watflux_model_t
!
TYPE(ch_watflux_t) :: CHW
TYPE(diag_watflux_t) :: DGW 
TYPE(watflux_grid_t) :: WG
TYPE(watflux_t) :: W 
TYPE(watflux_sbl_t) :: WSB
!
END TYPE watflux_model_t
!
TYPE seaflux_model_t
!
TYPE(ch_seaflux_t) :: CHS
TYPE(data_seaflux_t) :: DTS
TYPE(diag_seaflux_t) :: DGS
TYPE(diag_ocean_t) :: DGO
TYPE(diag_seaice_t) :: DGSI 
TYPE(ocean_t) :: O
TYPE(ocean_rel_t) :: OR
TYPE(seaflux_grid_t) :: SG
TYPE(seaflux_t) :: S 
TYPE(seaflux_sbl_t) :: SSB
!
END TYPE seaflux_model_t
!
TYPE isba_model_t
!
TYPE(agri_t) :: AG
TYPE(ch_isba_t) :: CHI
TYPE(data_isba_t) :: DTI
TYPE(diag_evap_isba_t) :: DGEI
TYPE(diag_isba_t) :: DGI
TYPE(diag_misc_isba_t) :: DGMI
TYPE(gr_biog_t) :: GB
TYPE(isba_canopy_t) :: ICP
TYPE(isba_grid_t) :: IG
TYPE(isba_t) :: I
TYPE(pack_ch_isba_t) :: PKCI
TYPE(pack_diag_isba_t) :: PKDI
TYPE(pack_isba_t) :: PKI
!
END TYPE isba_model_t
!
TYPE teb_garden_model_t
!
TYPE(teb_veg_options_t) :: TVG
TYPE(data_teb_garden_t) :: DTGD
TYPE(diag_teb_garden_t) :: DGTGD
TYPE(gr_biog_garden_t) :: GBGD 
TYPE(teb_garden_options_t) :: TGDO
TYPE(teb_garden_pgd_t) :: TGDP
TYPE(teb_garden_t) :: TGD 
TYPE(teb_garden_pgd_evol_t) :: TGDPE
TYPE(teb_irrig_t) :: TIR
!
END TYPE teb_garden_model_t
!
TYPE teb_greenroof_model_t
!
TYPE(data_teb_greenroof_t) :: DTGR
TYPE(diag_teb_greenroof_t) :: DGTGR
TYPE(gr_biog_greenroof_t) :: GBGR
TYPE(teb_greenroof_options_t) :: TGRO
TYPE(teb_greenroof_pgd_t) :: TGRP
TYPE(teb_greenroof_t) :: TGR
TYPE(teb_greenroof_pgd_evol_t) :: TGRPE
!
END TYPE teb_greenroof_model_t
!
TYPE teb_model_t
!
TYPE(ch_teb_t) :: CHT 
TYPE(data_teb_t) :: DTT
TYPE(diag_misc_teb_options_t) :: DGMTO
TYPE(diag_teb_t) :: DGT 
TYPE(diag_utci_teb_t) :: DGUT 
TYPE(teb_canopy_t) :: TCP
TYPE(teb_grid_t) :: TG
TYPE(teb_options_t) :: TOP
TYPE(teb_panel_t) :: TPN
TYPE(diag_cumul_teb_t) :: DGCT
TYPE(diag_misc_teb_t) :: DGMT
TYPE(teb_t) :: T
!
TYPE(bld_desc_t) :: BDD
TYPE(bem_options_t) :: BOP 
TYPE(data_bem_t) :: DTB
TYPE(bem_t) :: B
!
END TYPE teb_model_t
!
TYPE surfex_t 
!
TYPE(data_cover_t) :: DTCO
TYPE(data_tsz0_t) :: DTZ
TYPE(dummy_surf_fields_t) :: DUU
!
TYPE(surf_atm_grid_t) :: UG 
TYPE(surf_atm_t) :: U
TYPE(diag_surf_atm_t) :: DGU 
TYPE(surf_atm_sso_t) :: USS 
TYPE(sso_canopy_t) :: SSCP
!
TYPE(diag_ideal_t) :: DGL
TYPE(ideal_t) :: L
!
TYPE(sv_t) :: SV 
TYPE(ch_surf_t) :: CHU
TYPE(ch_emis_field_t) :: CHE
TYPE(ch_emis_snap_t) :: CHN
TYPE(emis_gr_field_t) :: EGF
TYPE(dst_t) :: DST 
TYPE(slt_t) :: SLT 
!
TYPE(flake_model_t) :: FM
TYPE(watflux_model_t) :: WM
TYPE(seaflux_model_t) :: SM
TYPE(isba_model_t) :: IM
TYPE(teb_model_t) :: TM
TYPE(teb_garden_model_t) :: GDM
TYPE(teb_greenroof_model_t) :: GRM
!
END TYPE surfex_t
!
END MODULE modd_surfex_n