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
|
Rev | Line | |
---|
[4] | 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.