| 12345678910111213141516171819202122232425262728293031323334353637 |
- MODULE obs_inter_z1d
- !!======================================================================
- !! *** MODULE obs_inter_z1d ***
- !! Observation diagnostics: Perform the vertical interpolation
- !! from model grid to observation location
- !!======================================================================
- !!----------------------------------------------------------------------
- !! obs_int_z1d : Vertical interpolation to the observation point
- !! obs_int_z1d_spl : Compute the vertical 2nd derivative of the
- !! interpolating function for a cubic spline (n1dint=1)
- !!----------------------------------------------------------------------
- !! * Modules used
- USE par_kind, ONLY : & ! Precision variables
- & wp
- IMPLICIT NONE
- !! * Routine accessibility
- PRIVATE
- PUBLIC obs_int_z1d, & ! Vertical interpolation to the observation pt.
- & obs_int_z1d_spl ! Compute the vertical 2nd derivative of the
- ! interpolating function used with a cubic spline
- !!----------------------------------------------------------------------
- !! NEMO/OPA 3.3 , NEMO Consortium (2010)
- !! $Id: obs_inter_z1d.F90 2287 2010-10-18 07:53:52Z smasson $
- !! Software governed by the CeCILL licence (NEMOGCM/NEMO_CeCILL.txt)
- !!----------------------------------------------------------------------
- CONTAINS
- #include "obsinter_z1d.h90"
- END MODULE obs_inter_z1d
|
