Changeset 238
- Timestamp:
- 01/10/19 15:06:07 (5 years ago)
- Location:
- trunk
- Files:
-
- 28 edited
- 1 moved
Legend:
- Unmodified
- Added
- Removed
-
trunk/SOURCES/ANT15-LBq_files/module_choix_antar15_LBq.f90
r159 r238 12 12 !! @note - use lect_clim_act_ant_gen 13 13 !! @note - use climat_perturb_mod 14 !! @note - use no_ lakes14 !! @note - use no_rsl 15 15 !! @note - use isostasie_mod 16 16 !! @note - use deformation_mod_2lois … … 66 66 use no_ablation ! pas de calcul de l'ablation => lecture fichier SMB (necessaire avec climat_Grice2sea_years_mod) 67 67 68 ! pas de lacs proglaciaires69 use no_ lakes68 ! pas de differences locales de niveau marin 69 use no_rsl 70 70 71 71 ! suivi des traceurs ou pas ? -
trunk/SOURCES/Ant15_CISM_files/module_choix_antar15CISM.f90
r4 r238 12 12 !! @note - use lect_clim_act_ant_15 13 13 !! @note - use climat_perturb_mod 14 !! @note - use no_ lakes14 !! @note - use no_rsl 15 15 !! @note - use isostasie_mod 16 16 !! @note - use deformation_mod_2lois … … 56 56 !use climat_regions_delta 57 57 58 ! pas de lacs proglaciaires59 use no_ lakes58 ! pas de differences locales de niveau marin 59 use no_rsl 60 60 61 61 !--------------Choix isostasie---------------------- -
trunk/SOURCES/Ant16_files/module_choix-ant16km.f90
r204 r238 12 12 !! @note - use lect_clim_act_anteis 13 13 !! @note - use climat_perturb_mod 14 !! @note - use no_ lakes14 !! @note - use no_rsl 15 15 !! @note - use isostasie_mod 16 16 !! @note - use deformation_mod_2lois … … 55 55 use no_ablation ! pas de calcul de l'ablation => lecture fichier SMB (necessaire avec climat_Grice2sea_years_mod) 56 56 57 ! pas de lacs proglaciaires58 use no_ lakes57 ! pas de differences locales de niveau marin 58 use no_rsl 59 59 60 60 ! suivi des traceurs ou pas ? -
trunk/SOURCES/Ant16_files/module_choix-ant16km.f90-iterbeta
r203 r238 12 12 !! @note - use lect_clim_act_anteis 13 13 !! @note - use climat_perturb_mod 14 !! @note - use no_ lakes14 !! @note - use no_rsl 15 15 !! @note - use isostasie_mod 16 16 !! @note - use deformation_mod_2lois … … 55 55 use no_ablation ! pas de calcul de l'ablation => lecture fichier SMB (necessaire avec climat_Grice2sea_years_mod) 56 56 57 ! pas de lacs proglaciaires58 use no_ lakes57 ! pas de differences locales de niveau marin 58 use no_rsl 59 59 60 60 ! suivi des traceurs ou pas ? -
trunk/SOURCES/Ant16_files/module_choix-ant16km.f90-spinupvitbil
r159 r238 12 12 !! @note - use lect_clim_act_anteis 13 13 !! @note - use climat_perturb_mod 14 !! @note - use no_ lakes14 !! @note - use no_rsl 15 15 !! @note - use isostasie_mod 16 16 !! @note - use deformation_mod_2lois … … 55 55 use no_ablation ! pas de calcul de l'ablation => lecture fichier SMB (necessaire avec climat_Grice2sea_years_mod) 56 56 57 ! pas de lacs proglaciaires58 use no_ lakes57 ! pas de differences locales de niveau marin 58 use no_rsl 59 59 60 60 ! suivi des traceurs ou pas ? -
trunk/SOURCES/Ant16_files/module_choix-ant16km.f90-std
r203 r238 12 12 !! @note - use lect_clim_act_anteis 13 13 !! @note - use climat_perturb_mod 14 !! @note - use no_ lakes14 !! @note - use no_rsl 15 15 !! @note - use isostasie_mod 16 16 !! @note - use deformation_mod_2lois … … 55 55 use no_ablation ! pas de calcul de l'ablation => lecture fichier SMB (necessaire avec climat_Grice2sea_years_mod) 56 56 57 ! pas de lacs proglaciaires58 use no_ lakes57 ! pas de differences locales de niveau marin 58 use no_rsl 59 59 60 60 ! suivi des traceurs ou pas ? -
trunk/SOURCES/Ant16_files/module_choix-ant16km.f90-std-abumip
r204 r238 12 12 !! @note - use lect_clim_act_anteis 13 13 !! @note - use climat_perturb_mod 14 !! @note - use no_ lakes14 !! @note - use no_rsl 15 15 !! @note - use isostasie_mod 16 16 !! @note - use deformation_mod_2lois … … 55 55 use no_ablation ! pas de calcul de l'ablation => lecture fichier SMB (necessaire avec climat_Grice2sea_years_mod) 56 56 57 ! pas de lacs proglaciaires58 use no_ lakes57 ! pas de differences locales de niveau marin 58 use no_rsl 59 59 60 60 ! suivi des traceurs ou pas ? -
trunk/SOURCES/Ant16_files/module_choix-ant16km.f90-std-larmip
r204 r238 12 12 !! @note - use lect_clim_act_anteis 13 13 !! @note - use climat_perturb_mod 14 !! @note - use no_ lakes14 !! @note - use no_rsl 15 15 !! @note - use isostasie_mod 16 16 !! @note - use deformation_mod_2lois … … 55 55 use no_ablation ! pas de calcul de l'ablation => lecture fichier SMB (necessaire avec climat_Grice2sea_years_mod) 56 56 57 ! pas de lacs proglaciaires58 use no_ lakes57 ! pas de differences locales de niveau marin 58 use no_rsl 59 59 60 60 ! suivi des traceurs ou pas ? -
trunk/SOURCES/Ant20_CISM_files/module_choix_antar20CISM.f90
r190 r238 12 12 !! @note - use lect_clim_act_ant_gen 13 13 !! @note - use climat_perturb_mod 14 !! @note - use no_ lakes14 !! @note - use no_rsl 15 15 !! @note - use isostasie_mod 16 16 !! @note - use deformation_mod_2lois … … 62 62 use no_ablation ! pas de calcul de l'ablation => lecture fichier SMB (necessaire avec climat_Grice2sea_years_mod) 63 63 64 ! pas de lacs proglaciaires65 use no_ lakes64 ! pas de differences locales de niveau marin 65 use no_rsl 66 66 67 67 ! suivi des traceurs ou pas ? -
trunk/SOURCES/Ant25_CISM_files/module_choix_antar25CISM.f90
r4 r238 11 11 !! @note - use lect_clim_act_ant_gen 12 12 !! @note - use climat_perturb_mod 13 !! @note - use no_ lakes13 !! @note - use no_rsl 14 14 !! @note - use isostasie_mod 15 15 !! @note - use deformation_mod_2lois … … 56 56 !use climat_regions_delta 57 57 58 ! pas de lacs proglaciaires59 use no_ lakes58 ! pas de differences locales de niveau marin 59 use no_rsl 60 60 61 61 !--------------Choix isostasie---------------------- -
trunk/SOURCES/Ant40_files/module_choix-antar40-0.4.f90
r159 r238 12 12 !! @note - use lect_clim_act_anteis 13 13 !! @note - use climat_perturb_mod 14 !! @note - use no_ lakes14 !! @note - use no_rsl 15 15 !! @note - use isostasie_mod 16 16 !! @note - use deformation_mod_2lois … … 59 59 use no_ablation ! pas de calcul de l'ablation => lecture fichier SMB (necessaire avec climat_Grice2sea_years_mod) 60 60 61 ! pas de lacs proglaciaires62 use no_ lakes61 ! pas de differences locales de niveau marin 62 use no_rsl 63 63 64 64 ! suivi des traceurs ou pas ? -
trunk/SOURCES/Ant45_CISM_files/module_choix_antar45CISM.f90
r4 r238 12 12 !! @note - use lect_clim_act_ant_45 13 13 !! @note - use climat_perturb_mod 14 !! @note - use no_ lakes14 !! @note - use no_rsl 15 15 !! @note - use isostasie_mod 16 16 !! @note - use deformation_mod_2lois … … 58 58 !use climat_regions_delta 59 59 60 ! pas de lacs proglaciaires61 use no_ lakes60 ! pas de differences locales de niveau marin 61 use no_rsl 62 62 63 63 !--------------Choix isostasie---------------------- -
trunk/SOURCES/GrIce2sea_files/module_choix_GrIce2sea.f90
r159 r238 12 12 !! @note - use lect_clim_act_ant_gen 13 13 !! @note - use climat_perturb_mod 14 !! @note - use no_ lakes14 !! @note - use no_rsl 15 15 !! @note - use isostasie_mod 16 16 !! @note - use deformation_mod_2lois … … 67 67 use no_ablation ! pas de calcul de l'ablation => lecture fichier SMB 68 68 69 ! pas de lacs proglaciaires70 use no_ lakes69 ! pas de differences locales de niveau marin 70 use no_rsl 71 71 72 72 ! suivi des traceurs ou pas ? -
trunk/SOURCES/Greeneem_files/lect-clim-act-greeneem_mois_mod.f90
r237 r238 120 120 do i=1,nx 121 121 ! Zs est l'altitude de la surface qu'elle soit mer, glace ou lac 122 ZS(i,j)=max(sealevel_2d(i,j),S0CLIM(I,J)) !sealevel_2d=sealev pour no lake122 ZS(i,j)=max(sealevel_2d(i,j),S0CLIM(I,J)) !sealevel_2d=sealev pour no rsl 123 123 124 124 do mo=1,mois -
trunk/SOURCES/Greeneem_files/module_choix-greeneem.f90
r159 r238 43 43 !use no_ablation ! pas de calcul de l'ablation => lecture fichier SMB (necessaire avec climat_Grice2sea_years_mod) 44 44 45 ! pas de lacs proglaciaires46 use no_ lakes45 ! pas de differences locales de niveau marin 46 use no_rsl 47 47 48 48 ! suivi des traceurs ou pas ? -
trunk/SOURCES/Greenmint40_files/module_choix-greenmint-40.f90
r4 r238 13 13 !! @note - use ablation_ann 14 14 !! @note - use climat_perturb_mod 15 !! @note - use no_ lakes15 !! @note - use no_rsl 16 16 !! @note - use isostasie_mod 17 17 !! @note - use deformation_mod_2lois … … 55 55 56 56 57 ! pas de lacs proglaciaires58 use no_ lakes57 ! pas de differences locales de niveau marin 58 use no_rsl 59 59 60 60 !--------------Choix isostasie---------------------- -
trunk/SOURCES/Hemin15_files/module_choix-hemin15.f90
r159 r238 12 12 !! @note - use lect_clim_act_hemin40 13 13 !! @note - use climat_forcage_mod 14 !! @note - use no_ lakes14 !! @note - use no_rsl 15 15 !! @note - use isostasie_mod 16 16 !! @note - use deformation_mod … … 61 61 use no_ablation ! pas de calcul de l'ablation => lecture fichier SMB (necessaire avec climat_Grice2sea_years_mod) 62 62 63 ! pas de lacs proglaciaires64 use no_ lakes63 ! pas de differences locales de niveau marin 64 use no_rsl 65 65 66 66 ! suivi des traceurs ou pas ? -
trunk/SOURCES/Hemin40_files/module_choix-hemin40-0.4.f90
r93 r238 12 12 !! @note - use lect_clim_act_hemin40 13 13 !! @note - use climat_forcage_mod 14 !! @note - use no_ lakes14 !! @note - use no_rsl 15 15 !! @note - use isostasie_mod 16 16 !! @note - use deformation_mod … … 62 62 use no_ablation ! pas de calcul de l'ablation => lecture fichier SMB (necessaire avec climat_Grice2sea_years_mod) 63 63 64 ! pas de lacs proglaciaires65 use no_ lakes64 ! pas de differences locales de niveau marin 65 use no_rsl 66 66 67 67 ! suivi des traceurs ou pas ? -
trunk/SOURCES/Hudson_files/module_choix-hudson-0.4.f90
r4 r238 21 21 use climat_hudson 22 22 23 ! pas de lacs proglaciaires24 use no_ lakes23 ! pas de differences locales de niveau marin 24 use no_rsl 25 25 26 26 !--------------Lecture climat forcage--------------- -
trunk/SOURCES/MISMIP3D_files/module_choix_mismip3d.f90
r4 r238 12 12 !! @note - use lect_clim_act_ant_gen 13 13 !! @note - use climat_perturb_mod 14 !! @note - use no_ lakes14 !! @note - use no_rsl 15 15 !! @note - use isostasie_mod 16 16 !! @note - use deformation_mod_2lois … … 60 60 !use climat_regions_delta 61 61 62 ! pas de lacs proglaciaires63 use no_ lakes62 ! pas de differences locales de niveau marin 63 use no_rsl 64 64 65 65 ! suivi des traceurs ou pas ? -
trunk/SOURCES/Makefile.grisli.inc
r216 r238 76 76 dragging_param_beta_mod.o dragging_param_beta_sedim_mod.o \ 77 77 dragging_param_beta_nolin_mod.o bilan_eau_mod.o \ 78 calving_frange.o no_calving.o no_ lakes.o \78 calving_frange.o no_calving.o no_rsl.o \ 79 79 out_profile_mod.o printtable_mod.o mix-SIA-L1_mod.o \ 80 80 furst_schoof_mod.o bilan_flux_output_mod.o \ … … 96 96 dragging_hwat_sedim_mod.o dragging_neff_slope_mod.o \ 97 97 dragging_param_beta_mod.o \ 98 calving_frange.o no_calving.o no_ lakes.o \98 calving_frange.o no_calving.o no_rsl.o \ 99 99 out_profile_mod.o printtable_mod.o mix-SIA-L1_mod.o \ 100 100 furst_schoof_mod.o bilan_flux_output_mod.o \ -
trunk/SOURCES/Snowball_files/module_choix-snowball.f90
r159 r238 12 12 !! @note - use lect_clim_act_hemin40 13 13 !! @note - use climat_forcage_mod 14 !! @note - use no_ lakes14 !! @note - use no_rsl 15 15 !! @note - use isostasie_mod 16 16 !! @note - use deformation_mod … … 64 64 !use no_ablation ! pas de calcul de l'ablation => lecture fichier SMB (necessaire avec climat_Grice2sea_years_mod) 65 65 66 ! pas de lacs proglaciaires67 use no_ lakes66 ! pas de differences locales de niveau marin 67 use no_rsl 68 68 69 69 ! suivi des traceurs ou pas ? -
trunk/SOURCES/branche-Cat-spinup-dec2011/steps_time_loop.f90
r4 r238 260 260 call ablation 261 261 262 ! because eustatic sea level is updated in forclim, we need to call the RSL here 263 call rsl ! provide the map of the local sea level (sealevel_2d) 264 262 265 263 266 … … 381 384 endif 382 385 383 call lake_to_slv ! pour traiter dynamiquement les shelves sur lac384 386 385 387 end if spinup_3_bed -
trunk/SOURCES/initial-0.3.f90
r157 r238 50 50 call init_tracer 51 51 52 !initialisation d es lacs proglaciaires53 call input_ lakes52 !initialisation du niveau marin local 53 call input_rsl 54 54 55 55 -
trunk/SOURCES/no_rsl.f90
r237 r238 1 !> \file no_ lakes.f902 !! Module permet de ne pas tenir compte des lacs proglaciaires1 !> \file no_rsl.f90 2 !! Module permet de ne pas tenir compte des variations locales du niveau marin 3 3 !< 4 4 5 !> \namespace no_ lakes6 !! Module qui permet de ne pas tenir compte des lacs proglaciaires5 !> \namespace no_rsl 6 !! Module qui permet de ne pas tenir compte des variations locales du niveau marin 7 7 !! \author ... 8 8 !! \date ... … … 11 11 !< 12 12 13 module no_ lakes13 module no_rsl 14 14 15 ! pas de lacs proglaciaires15 ! pas de variations locales du niveau marin 16 16 17 17 USE module3D_phy … … 19 19 20 20 21 contains 22 !> SUBROUTINE: input_lakes 23 !! Routine permettant d'introduire des lacs proglaciaires 21 contains 22 !> SUBROUTINE: input_rsl 23 !! Routine permettant d'introduire des variations locales du niveau marin 24 !! en anomalie par rapport au niveau eustatique 24 25 !> 25 subroutine input_ lakes26 end subroutine input_ lakes26 subroutine input_rsl 27 end subroutine input_rsl 27 28 28 !> SUBROUTINE: lake_to_slv29 !> SUBROUTINE: rsl 29 30 !! Routine 30 31 !> 31 subroutine lake_to_slv32 subroutine rsl 32 33 33 34 sealevel_2d(:,:)=sealevel 34 35 35 end subroutine lake_to_slv36 end subroutine rsl 36 37 37 end module no_ lakes38 end module no_rsl -
trunk/SOURCES/no_spinup_mod.f90
r65 r238 1 !> \file no_ lakes.f901 !> \file no_spinup.f90 2 2 !! This module is to choosen when no spinup is needed 3 3 !< 4 4 5 !> \namespace no_ lakes5 !> \namespace no_spinup 6 6 !! This module is to choosen when no spinup is needed 7 7 !! \author ... -
trunk/SOURCES/steps_time_loop.f90
r237 r238 221 221 call forclim 222 222 call ablation 223 224 ! because eustatic sea level is updated in forclim, we need to call the RSL here 225 call rsl ! provide the map of the local sea level (sealevel_2d) 223 226 224 227 … … 399 402 endif 400 403 401 call lake_to_slv ! pour traiter dynamiquement les shelves sur lac402 404 403 405 end if spinup_3_bed -
trunk/SOURCES/steps_time_loop_avec_iterbeta.f90
r237 r238 224 224 call forclim 225 225 call ablation 226 227 ! because eustatic sea level is updated in forclim, we need to call the RSL here 228 call rsl ! provide the map of the local sea level (sealevel_2d) 226 229 227 230 … … 436 439 endif 437 440 438 call lake_to_slv ! pour traiter dynamiquement les shelves sur lac439 441 440 442 end if spinup_3_bed -
trunk/lauching_area/Master-files/module_choix-antar40-0.4-cycles.f90
r229 r238 12 12 !! @note - use lect_clim_act_anteis 13 13 !! @note - use climat_perturb_mod 14 !! @note - use no_ lakes14 !! @note - use no_rsl 15 15 !! @note - use isostasie_mod 16 16 !! @note - use deformation_mod_2lois … … 59 59 use no_ablation ! pas de calcul de l'ablation => lecture fichier SMB (necessaire avec climat_Grice2sea_years_mod) 60 60 61 ! pas de lacs proglaciaires62 use no_ lakes61 ! pas de differences locales de niveau marin 62 use no_rsl 63 63 64 64 ! suivi des traceurs ou pas ?
Note: See TracChangeset
for help on using the changeset viewer.