Back to OASIS3 home

Modules used for the coupler (in oasis3/src) :

mod_anais : contains variables and arrays related to the ANAIS interpolator
used in interp.F

!@ Anaism --->>>
!@ -- nmesh : number of ocean gcm-1 squares overlapped by a given gcm-2 square (1D)
!@ -- amint : weight for each gcm-1 mesh proportional to overlapped area (1D)
!@ -- nmint : neighbors adress on gcm-1 grid for a given gcm-2 grid point (1D)
!@ -- naismfl : flag to identify different ANAISM parameter sets (1D)
!@ -- naismvoi : maximum number of overlapped neighbors (1D)
!@ -- niwtm : flag to read/write ANAISM parameters (1D)
!@ Anaisg --->>>
!@ -- agint : weight for each gcm-1 grid point with gaussian distribution (1D)
!@ -- ngint : neighbors adress on gcm-1 grid for a given gcm-2 grid point (1D)
!@ -- varmul : variance multiplicator
!@ -- naisgfl : flag to identify different ANAISG parameter sets (1D)
!@ -- naisgvoi :  maximum number of used neighbors (1D)
!@ -- niwtg : flag to read/write ANAISG parameters (1D)
!@ Common --->>>
!@ -- linit : I/O initialization flag for each field
!     -------------------------------------------------------------------
  USE mod_kinds_oasis
  INTEGER (kind=ip_intwp_p), DIMENSION(:), ALLOCATABLE :: ngint,nmint,nmesh
  INTEGER (kind=ip_intwp_p), DIMENSION(:), ALLOCATABLE :: naismfl, naisgfl
  INTEGER (kind=ip_intwp_p), DIMENSION(:), ALLOCATABLE :: naismvoi, naisgvoi
  INTEGER (kind=ip_intwp_p), DIMENSION(:), ALLOCATABLE :: niwtm, niwtg
  REAL (kind=ip_realwp_p), DIMENSION(:), ALLOCATABLE :: agint, amint, varmul
  LOGICAL, DIMENSION(:), ALLOCATABLE :: linit
!   -------------------------------------------------------------------