doc-doxygen/html/mod__unit_8_f90_source.html

00001 MODULE mod_unit
00002 !
00003 ! -- unit.h   23-08-95   Version 2.0   Author: Laurent Terray
00004 !    ******   20-06-97   Version 2.2   Mods: add nudum (S. Valcke)
00005 !             30-03-99   Version 2.3   Mods: add nulgn (S. Valcke)
00006 !             23-03-01   Version 2.5   Mods: add lncdfxxx (S. Valcke)
00007 !@
00008 !@  Contents : unit numbers
00009 !@  --------
00010 !@
00011 !@ -- nulin : logical unit for coupler input
00012 !@
00013 !@ -- nulou : logical unit for coupler output
00014 !@
00015 !@ -- nulgr : logical unit for gcm's grids
00016 !@
00017 !@ -- nulma : logical unit for gcm's masks
00018 !@
00019 !@ -- nulsa : logical unit for gcm's surfaces
00020 !@
00021 !@ -- nultr : trace file for CLIM and PVM messages
00022 !@
00023 !@ -- nulcc : file for ANAISM data
00024 !@
00025 !@ -- nulgg : file for ANAISG data
00026 !@
00027 !@ -- nulgn : file for NINENN weights and addresses
00028 !@
00029 !@ -- nulan : file for ANAIS(M-G) specific output
00030 !@
00031 !@ -- nulrd : file for reduced grid masks
00032 !@
00033 !@ -- nudum : dummy file signaling that SVIPC pools for exchange of
00034 !@            initial infos are OPENED
00035 !@
00036 ! -------------------------------------------------------------------
00037 !
00038   USE mod_kinds_oasis
00039   INTEGER(kind=ip_intwp_p) ::  nulin, nulou, nulgr, nulma, nulsu, nultr, nulcc
00040   INTEGER(kind=ip_intwp_p) ::  nulgg, nulan, nulrd, nudum, nulgn
00041 !
00042 END MODULE mod_unit
00043 ! -------------------------------------------------------------------
00044
00045
00046
00047
00048
00049
00050
00051
00052
00053
00054