source: dynamico_lmdz/aquaplanet/LMDZ5/libf/phymar/Mod_vdfTKE_RUN.f90 @ 4031

Last change on this file since 4031 was 3990, checked in by millour, 8 years ago

An updated LMDZ5 (based on LMDZ rev 2786) to play with.
EM
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.