source: branches/iLoveclim/SOURCES/Greenmint40_files/module_choix-greenmint-40.f90 @ 123

Last change on this file since 123 was 4, checked in by dumas, 10 years ago

initial import GRISLI trunk

File size: 3.4 KB
Line 
1!> \file module_choix-greenmint-40.f90
2!! Ce module permet de choisir quels package on veut utiliser
3!!
4!<
5
6!> \namespace MODULE_CHOIX
7!! Ce module permet de choisir quels package on veut utiliser
8!! \author CatRitz
9!! \date ...
10!! @note Used modules
11!! @note   - use lect_topo_greenmint 
12!! @note   - use lect_clim_act_greenmint
13!! @note   - use ablation_ann         
14!! @note   - use climat_perturb_mod
15!! @note   - use no_lakes
16!! @note   - use isostasie_mod
17!! @note   - use deformation_mod_2lois   
18!! @note   - use  prop_thermiques_ice
19!! @note   - use eau_basale
20!! @note   - use sliding_Bindschadler
21!! @note   - use dragging_hwat_contmaj
22!! @note   - use eq_ellip_sgbsv_mod
23!! @note   - use calving_frange
24!! @note   - use equat_adv_diff_2D
25!! @note   - use  bmelt_seuil_prof
26!! @note   - use fake_greenmint
27!! @note   - use out_profile 
28!! @note   - use out_cptr   
29!! @note   - use out_hz       
30!! @note   - use output_greenmint_mod
31!! @note   - use printtable
32!<
33
34MODULE MODULE_CHOIX
35
36!--------------Lecture topo ------------------------
37
38use lect_topo_greenmint    ! pour le groenland intercomp eimint : devrait marcher
39                           ! pour les deux resolutions : 40 et 20 km
40
41!--------------Lecture climat ref ------------------
42use lect_clim_act_greenmint
43
44! use lect_clim_act_nord40 ! pour l'hemisphere nord et l'eurasie
45! use  climat_heino
46
47!--------------Lecture climat forcage---------------
48
49use ablation_ann          ! le module pdd base sur Tann et Tjuly
50use climat_perturb_mod
51!use climat_forcage_mod
52!use climat_synthes_mod
53!use climat_profil_mod
54!use climat_regions_delta
55
56
57! pas de lacs proglaciaires
58use no_lakes
59
60!--------------Choix isostasie----------------------
61 use isostasie_mod  ! module permettant de calculer la deflexion isostasique
62! use noisostasie_mod ! module pour ne pas avoir d'isostasie
63
64
65!--------------Module Physique---------------------
66use deformation_mod_2lois   ! module concernant les lois de deformation
67
68!--------------Module propriete thermique de la glace
69use  prop_thermiques_ice
70! use prop_therm_ice_heino
71
72! eau basale
73use eau_basale
74
75! sliding- dragging
76! use module sliding_vitbal
77use sliding_Bindschadler
78! use sliding_dragging_heino    ! loi de glissement heino : mis dans diffusiv :
79
80
81!use dragging_vitbil
82! use dragging_hwatstream
83
84!use dragging_hwat_cont
85
86use dragging_hwat_contmaj
87
88! module concernant l'eq. elliptique (pour les streams et shelves)
89
90! use eq_elliptique_mod ! ancienne version (remplimat-5)
91use eq_ellip_sgbsv_mod ! nouvelle version juillet 2008
92
93! calving
94use calving_frange
95
96! choix resolution de la conservation de la masse
97!-----------------------------------------------
98use equat_adv_diff_2D          ! conservation masse avec advection-diffusion
99
100
101!--------------Fusion basale------------------------
102use  bmelt_seuil_prof
103! use bmelt_ant_regions ! pour l'Antarctique avec régions
104! USE BMELT_NOR_REGIONS ! pour le nord avec régions
105! use BMELT_NOR_DEPTH   ! pour le nord avec profondeur d'eau
106
107
108! fake -------fausses routines pour compatibilités
109! use fake_heino
110! use fake_ant
111use fake_greenmint
112
113! use fake_nord
114!-------------- Outputs-----------------------------
115!
116use out_profile  !profils
117!use out_cptr     ! fichier de reprise
118use out_hz       ! module de sorties snapshot dans un plan horizontal
119
120!-----Suivi temporel
121! use output_heminord_mod
122 use output_greenmint_mod
123! use output_heino
124!-----debugage...
125use printtable
126
127
128end module MODULE_CHOIX
Note: See TracBrowser for help on using the repository browser.