oda_core.F90 File Reference

Go to the source code of this file.

Data Types
interface	oda_core_mod::forward_obs
interface	oda_core_mod::backward_obs
interface	oda_core_mod::assign_forward_model
interface	oda_core_mod::copy_obs
interface	oda_core_mod::mult_obs_i_mse
interface	oda_core_mod::diff_obs
interface	oda_core_mod::adjust_obs_error
interface	oda_core_mod::nullify_obs

Modules
module	oda_core_mod

Functions/Subroutines
subroutine, public	oda_core_mod::open_profile_dataset (filename, localize)
subroutine, public	oda_core_mod::get_obs (model_time, Prof, Sfc, nprof, nsfc)
subroutine, public	oda_core_mod::oda_core_init (Domain, Grid, localize)
subroutine, public	oda_core_mod::purge_obs ()
subroutine	oda_core_mod::forward_obs_profile (Model_obs, fg_t, fg_s)
subroutine	oda_core_mod::forward_obs_sfc (Sfc, Guess, Diff)
subroutine	oda_core_mod::backward_obs_profile (Obs, model_t, model_s)
subroutine	oda_core_mod::backward_obs_sfc (Obs, model)
subroutine	oda_core_mod::assign_forward_model_profile (Obs1, Obs2)
subroutine	oda_core_mod::assign_forward_model_sfc (Obs1, Obs2)
subroutine	oda_core_mod::diff_obs_profile (prof1, prof2, Diff)
subroutine	oda_core_mod::diff_obs_sfc (prof1, prof2, Diff)
subroutine	oda_core_mod::copy_obs_prof (obs_in, obs_out)
subroutine	oda_core_mod::copy_obs_sfc (Obs_in, Obs_out)
subroutine	oda_core_mod::adjust_obs_error_profile (Prof)
subroutine	oda_core_mod::adjust_obs_error_sfc (Diff)
subroutine	oda_core_mod::mult_obs_i_mse_profile (Obs)
subroutine	oda_core_mod::mult_obs_i_mse_sfc (a, Obs)
character(len=len(cs)) function	oda_core_mod::lowercase (cs)
subroutine	oda_core_mod::init_observations (localize)
subroutine	oda_core_mod::add_tidal_error (Prof)
subroutine	oda_core_mod::create_ideal_profiles (localize)
subroutine	oda_core_mod::nullify_obs_prof (profile)

Variables
real, private	oda_core_mod::max_misfit = 5.0
real, parameter, private	oda_core_mod::depth_min =0.0
real, parameter, private	oda_core_mod::depth_max =10000.
real, parameter, private	oda_core_mod::temp_min =-3.0
real, parameter, private	oda_core_mod::temp_max =40.
real, parameter, private	oda_core_mod::salt_min =0.0
real, parameter, private	oda_core_mod::salt_max =45.
integer	oda_core_mod::max_profiles = 250000
integer	oda_core_mod::max_sfc_obs = 1
integer, parameter, private	oda_core_mod::max_files =100
integer, parameter, private	oda_core_mod::profile_file = 1
integer, parameter, private	oda_core_mod::sfc_file = 2
integer, parameter, private	oda_core_mod::idealized_profiles =3
real, private	oda_core_mod::min_obs_err_t = 0.5
real, private	oda_core_mod::min_obs_err_s =0.1
real, private	oda_core_mod::eta_tide_const = 7.0
type(ocean_profile_type), dimension(:), allocatable, target, save, private	oda_core_mod::profiles
type(ocean_surface_type), dimension(:), allocatable, target, save, private	oda_core_mod::sfc_obs
integer, save, private	oda_core_mod::num_profiles
integer, save, private	oda_core_mod::num_sfc_obs
integer, save, private	oda_core_mod::isc
integer, save, private	oda_core_mod::iec
integer, save, private	oda_core_mod::jsc
integer, save, private	oda_core_mod::jec
integer, save, private	oda_core_mod::isd
integer, save, private	oda_core_mod::ied
integer, save, private	oda_core_mod::jsd
integer, save, private	oda_core_mod::jed
integer, save, private	oda_core_mod::isg
integer, save, private	oda_core_mod::ieg
integer, save, private	oda_core_mod::jsg
integer, save, private	oda_core_mod::jeg
integer, save, private	oda_core_mod::nk
real, save, private	oda_core_mod::min_prof_depth = 200.0
real, save, private	oda_core_mod::max_prof_spacing = 1.e5
real, dimension(:,:,:), allocatable, save, private	oda_core_mod::sum_wgt
real, dimension(:,:,:), allocatable, save, private	oda_core_mod::nobs
type(time_type), dimension(0:100), public	oda_core_mod::time_window
type(grid_type), pointer	oda_core_mod::grd
real, dimension(:), allocatable	oda_core_mod::x_grid
real, dimension(:), allocatable	oda_core_mod::y_grid
real	oda_core_mod::temp_obs_rmse = 0.7071
real	oda_core_mod::salt_obs_rmse = 0.1
logical	oda_core_mod::add_tidal_aliasing =.false.
logical	oda_core_mod::localize_data = .true.
logical	oda_core_mod::debug =.false.
integer	oda_core_mod::ndebug =10
integer, dimension(:), allocatable	oda_core_mod::nprof_in_comp_domain