Last change
on this file since 252 was
252,
checked in by aquiquet, 5 years ago
|
Sub-shelf melting parametrisation based on ISMIP6-Ant forcing. Only available for Ant-16 for now.
|
File size:
1.2 KB
|
Line | |
---|
1 | !> \file runparam_mod.f90 |
---|
2 | !! Module de declarations de quelques caracteristiques du run |
---|
3 | !< |
---|
4 | |
---|
5 | !> \namespace runparam |
---|
6 | !! Module de declarations de quelques caracteristiques du run |
---|
7 | !! \author ... |
---|
8 | !! \date ... |
---|
9 | !! @note Caracteristiques qu'on veut pouvoir faire passer aux routines qui n'appellent pas 3D-phy |
---|
10 | !! @note 3D-phy fait "use runparam" |
---|
11 | !< |
---|
12 | |
---|
13 | module runparam |
---|
14 | |
---|
15 | implicit none |
---|
16 | integer :: NT=0 !< boucle temporelle, initialise a 0 |
---|
17 | real :: xmin,xmax,ymin,ymax !< bornes du domaine en km |
---|
18 | real :: TBEGIN !< temps debut |
---|
19 | real :: TEND !< temps fin |
---|
20 | real :: dttest !< plus petit pas de temps=dtmin, sert dans plein de tests |
---|
21 | character(len=40) :: DIRNAMEOUT !< declaration du dir de sortie, pour les resultats |
---|
22 | character(len=8) :: RUNNAME !< |
---|
23 | character(len=40) :: dirsource !< declaration du dir sources pour les fichiers parametres ... |
---|
24 | |
---|
25 | integer :: itracebug !< si 1 fait une impression au début des routines |
---|
26 | integer :: num_tracebug !< numero de l'unite itracebug |
---|
27 | real tgrounded |
---|
28 | real dtsortie |
---|
29 | real dtcpt |
---|
30 | real dtprofile |
---|
31 | |
---|
32 | end module runparam |
---|
Note: See
TracBrowser
for help on using the repository browser.