doc-doxygen/html/mod__rainbow_8_f90_source.html

00001 MODULE mod_rainbow
00002 !
00003 ! -- rainbow.h   05-08-96   Version 2.1   Author: Laurent Terray
00004 !    *********
00005 !@
00006 !@  Contents : variables and arrays related to mapping and subgrid interpolator
00007 !@  --------
00008 !@
00009 !@ Mapping --->>>
00010 !@
00011 !@ -- amapp : weight for each gcm-1 mesh proportional to overlapped area (1D)
00012 !@
00013 !@ -- nmapp : neighbors adress on gcm-1 grid for a given gcm-2 grid point (1D)
00014 !@
00015 !@ -- lmapp : I/O initialization flag for each field
00016 !@
00017 !@ Subgrid --->>>
00018 !@
00019 !@ -- asubg : weight for each gcm-2 mesh proportional to overlapped area (1D)
00020 !@
00021 !@ -- nsubg : neighbors adress on gcm-2 grid for a given gcm-1 grid point (1D)
00022 !@
00023 !@ -- lsubg : I/O initialization flag for each field
00024 !@
00025 !     -------------------------------------------------------------------
00026 !
00027   USE mod_kinds_oasis
00028 !
00029   INTEGER (kind=ip_intwp_p),DIMENSION(:),ALLOCATABLE :: nmapp, nsubg
00030 !
00031   REAL (kind=ip_realwp_p), DIMENSION(:),ALLOCATABLE :: amapp, asubg
00032 !
00033   LOGICAL,DIMENSION(:),ALLOCATABLE :: lmapp, lsubg
00034 !
00035 !     -------------------------------------------------------------------
00036 !
00037 END MODULE mod_rainbow