|
Last change
on this file since 5419 was
5118,
checked in by abarral, 5 months ago
|
|
Replace iniprint.h by lmdz_iniprint.f90
(lint) along the way
|
-
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:
398 bytes
|
| Rev | Line | |
|---|
| [5118] | 1 | ! Replaces iniprint.h |
|---|
| [5099] | 2 | |
|---|
| [5118] | 3 | MODULE lmdz_iniprint |
|---|
| 4 | ! gestion des impressions de sorties et de débogage |
|---|
| 5 | ! lunout: unité du fichier dans lequel se font les sorties |
|---|
| 6 | ! (par defaut 6, la sortie standard) |
|---|
| 7 | ! prt_level: niveau d'impression souhaité (0 = minimum) |
|---|
| [5099] | 8 | |
|---|
| [5118] | 9 | IMPLICIT NONE; PRIVATE |
|---|
| 10 | PUBLIC lunout, prt_level |
|---|
| [5099] | 11 | |
|---|
| [5118] | 12 | INTEGER :: lunout, prt_level |
|---|
| [5099] | 13 | |
|---|
| [5118] | 14 | END MODULE lmdz_iniprint |
|---|
Note: See
TracBrowser
for help on using the repository browser.
