get_o2_profile


INTERFACE:

   subroutine get_o2_profile(unit,jul,secs,nlev,z)
DESCRIPTION:

This routine is responsible for providing sane values to an `observed' oxygen profile. The subroutine is called in the get_all_obs() subroutine as part of the main integration loop. In case of observations from file the temporal interpolation is done in this routine.


USES:

   use time
   use observations, only: init_saved_vars,read_profiles,o2_prof,o2_units
   IMPLICIT NONE
INPUT PARAMETERS:
   integer, intent(in)                 :: unit
   integer, intent(in)                 :: jul,secs
   integer, intent(in)                 :: nlev
   REALTYPE, intent(in)                :: z(0:nlev)
REVISION HISTORY:
   Original author(s): Karsten Bolding



Karsten Bolding 2012-12-28