source: trunk/SOURCES/Snowball_files/module_choix-snowball.f90 @ 93

Last change on this file since 93 was 93, checked in by dumas, 7 years ago

First version with Schoof flux parameterisation at the grounding line. | New module furst_schoof_mod.f90 | New flag Schoof in grdline namelist (see in SOURCES/Fichiers-parametres/A-LBq15_param_list_Schoof.dat)

File size: 4.4 KB
Line 
1!> \file module_choix-hemin40-0.4.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_hemin40   
12!! @note   - use lect_clim_act_hemin40
13!! @note   - use climat_forcage_mod
14!! @note   - use no_lakes
15!! @note   - use isostasie_mod 
16!! @note   - use deformation_mod
17!! @note   - use  prop_thermiques_ice
18!! @note   - use eau_basale
19!! @note   - use sliding_Bindschadler
20!! @note   - use dragging_hwat_contmaj
21!! @note   - use eq_ellip_sgbsv_mod
22!! @note   - use calving_frange
23!! @note   - use equat_adv_diff_2D       
24!! @note   - use bmelt_nor_regions
25!! @note   - use fake_nor
26!! @note   - use out_profile 
27!! @note   - use out_cptr   
28!! @note   - use out_hz       
29!! @note   - use output_hemin40_mod
30!! @note   - use printtable
31!<
32
33MODULE MODULE_CHOIX
34
35!--------------Lecture topo ------------------------
36use lect_topo_snowball    ! pour hemisphere nord Yannick
37
38!--------------Lecture climat ref ------------------
39! Le climat de ref si necessaire est maintenant lu par le module de climat directement
40! use lect_clim_snowball ! hemisphere nord Yannick FOAM
41! pas besoin de lect_clim si on utilise climat-forcage-mois en absolu
42
43!--------------Lecture climat forcage---------------
44!use climat_forcage_mois_mod ! forcage mensuel GCM 1 Snapshot Fev 2015
45use climat_forcage_mois_mod
46!use climat_Grice2sea_years_mod ! forcage avec SMB type MAR Fev2015
47
48! Anciens modules pas encore valides
49!!!!!!use climat_perturb_mod ! pour simule climat equilibre type Loveclim
50!!!!!!use climat_forcage_stat_mois_mod  ! climat constant mensuel GCMs
51!!!!!!use climat_forcage_mod ! pour cycle force GCM avec index
52!!!!!!use climat_forcage_insolation_mod ! methode JB multi-snapshots mensuelle mais pour un etat stationnaire avec correction topo GCM => GRISLI
53!!!!!!use climat_synthes_mod
54!!!!!!use climat_profil_mod
55!!!!!!use climat_regions_delta
56!!!!!!!use climat_forcage_stat_mois_mod
57!use climat_perturb_mod
58! use climat_forcage_mod
59!use climat_synthes_mod
60!use climat_profil_mod
61!use climat_regions_delta
62
63use ablation_mod ! calcul de l'ablation (PDD ou autre methode)
64!use no_ablation  ! pas de calcul de l'ablation => lecture fichier SMB (necessaire avec climat_Grice2sea_years_mod)
65
66! pas de lacs proglaciaires
67use no_lakes
68
69! suivi des traceurs ou pas ?
70!use tracer_mod  ! probablement pas compatible avec Hemin-40 actuellement
71use notracer_mod
72
73!--------------Choix isostasie----------------------
74use isostasie_mod  ! module permettant de calculer la deflexion isostasique
75! USE NOISOSTASIE_MOD ! module pour ne pas avoir d'isostasie
76
77
78!--------------Module Physique---------------------
79!use deformation_mod  ! module concernant les lois de deformation
80use deformation_mod_2lois   ! module concernant les lois de deformation
81
82! eau basale
83use eau_basale
84
85! sliding- dragging
86! use module sliding_vitbal
87use sliding_Bindschadler
88! use sliding_dragging_heino    ! loi de glissement heino : mis dans diffusiv :
89
90
91!use dragging_vitbil
92! use dragging_hwatstream
93use dragging_hwat_contmaj ! frottement basal catherine grisliv8 ice stream peu actifs
94!use dragging_neff_contmaj ! frottement basal sur pression effective C. Dumas & A. Quiquet 2016
95
96!------------ spinup -----------------------------------
97use no_spinup           ! spinup=0
98!use spinup_vitbil         ! plusieurs variantes de spinup : inclue le dragging
99                          ! enlever le use dragging dans ce cas là
100
101use furst_schoof_mod  ! module pour calcul flux gr line
102
103! use eq_elliptique_mod ! ancienne version (remplimat-5)
104use eq_ellip_sgbsv_mod ! nouvelle version juillet 2008
105
106! calving
107!use calving_vincent ! ancienne version
108use calving_frange
109
110! choix resolution de la conservation de la masse
111!-----------------------------------------------
112!use equat_adv_diff_2D          ! conservation masse avec advection-diffusion
113use equat_adv_diff_2D_vect      ! le vecteur est maintenant dans l'appel
114
115
116!--------------Fusion basale------------------------
117use bmelt_snowball_depth ! hemisphere nord avec profondeur
118
119! fake -------fausses routines pour compatibilités
120use fake_snowball
121!-------------- Outputs-----------------------------
122!
123use out_profile  !profils
124!use out_cptr     ! fichier de reprise
125use out_hz       ! module de sorties snapshot dans un plan horizontal
126
127!-----Suivi temporel
128use output_snowball_mod
129!-----debugage...
130use printtable
131
132
133end module module_choix
Note: See TracBrowser for help on using the repository browser.