|
Last change
on this file since 6058 was
5923,
checked in by yann meurdesoif, 2 months ago
|
|
For better GPUmorphosis parsing use "PUBLIC :: var" instead of "PUBLIC var"
YM
|
-
Property copyright set to
Name of program: LMDZ
Creation date: 1984
Version: LMDZ5
License: CeCILL version 2
Holder: Laboratoire de m\'et\'eorologie dynamique, CNRS, UMR 8539
See the license file in the root directory
-
Property svn:eol-style set to
native
-
Property svn:keywords set to
Author Date Id Revision
|
|
File size:
317 bytes
|
| Line | |
|---|
| 1 | MODULE regdim_mod_h |
|---|
| 2 | IMPLICIT NONE; PRIVATE |
|---|
| 3 | PUBLIC :: i1_deb, i1_fin, i2_deb, i2_fin, j_deb, j_fin |
|---|
| 4 | |
|---|
| 5 | INTEGER i1_deb, i1_fin |
|---|
| 6 | INTEGER i2_deb, i2_fin |
|---|
| 7 | |
|---|
| 8 | PARAMETER (i1_deb = 16, i1_fin = 30) |
|---|
| 9 | PARAMETER (i2_deb = 31, i2_fin = 33) |
|---|
| 10 | |
|---|
| 11 | INTEGER j_deb, j_fin |
|---|
| 12 | |
|---|
| 13 | PARAMETER (j_deb = 18, j_fin = 39) |
|---|
| 14 | END MODULE regdim_mod_h |
|---|
Note: See
TracBrowser
for help on using the repository browser.
