source:
LMDZ5/branches/Cold_pool_death/libf/phymar/Mod_vdfTKE_RUN.f90
Last change on this file was 2160, checked in by , 10 years ago | |
---|---|
File size: 1.3 KB |
Line | |
---|---|
1 | module Mod_vdfTKE_RUN |
2 | |
3 | !--------------------------------------------------------------------------+ |
4 | ! Mon 17-Jun-2013 MAR | |
5 | ! module Mod_vdfTKE_RUN contains local variables of PHY_vdfTKE_RUN | |
6 | ! | |
7 | ! version 3.p.4.1 created by H. Gallee, Mon 17-Jun-2013 | |
8 | ! Last Modification by H. Gallee, Mon 17-Jun-2013 | |
9 | ! | |
10 | !--------------------------------------------------------------------------+ |
11 | |
12 | |
13 | ! Global Variables |
14 | ! ================= |
15 | |
16 | use Mod_Real |
17 | |
18 | |
19 | |
20 | ! Internal Variables |
21 | ! ================== |
22 | |
23 | IMPLICIT NONE |
24 | |
25 | |
26 | real(kind=real8), SAVE, ALLOCATABLE, dimension(:) :: S3D__1 |
27 | real(kind=real8), SAVE, ALLOCATABLE, dimension(:) :: S3D__2 |
28 | real(kind=real8), SAVE, ALLOCATABLE, dimension(:) :: S3D__3 |
29 | real(kind=real8), SAVE, ALLOCATABLE, dimension(:) :: S3D__4 |
30 | real(kind=real8), SAVE, ALLOCATABLE, dimension(:) :: S3D__5 |
31 | real(kind=real8), SAVE, ALLOCATABLE, dimension(:) :: S3D__6 |
32 | real(kind=real8), SAVE, ALLOCATABLE, dimension(:) :: S3D__7 |
33 | |
34 | |
35 | end module Mod_vdfTKE_RUN |
Note: See TracBrowser
for help on using the repository browser.