source: trunk/SOURCES/no_lakes.f90 @ 10

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

initial import GRISLI trunk

File size: 645 bytes
Line 
1!> \file no_lakes.f90
2!! Module permet de ne pas tenir compte des lacs proglaciaires
3!<
4
5!> \namespace no_lakes
6!! Module qui permet de ne pas tenir compte des lacs proglaciaires
7!! \author ...
8!! \date ...
9!! @note  used modules
10!! @note  - use module3D_phy
11!<
12
13module no_lakes
14
15! pas de lacs proglaciaires
16
17USE module3D_phy
18implicit none
19
20
21contains                       
22!> SUBROUTINE: input_lakes
23!! Routine permettant d'introduire des lacs proglaciaires
24!>
25subroutine input_lakes
26end subroutine input_lakes
27
28!> SUBROUTINE: lake_to_slv
29!! Routine 
30!>
31subroutine lake_to_slv
32
33slv(:,:)=sealevel
34
35end subroutine lake_to_slv
36
37end module no_lakes
Note: See TracBrowser for help on using the repository browser.