Data Types
type	obs_entry_type

Functions/Subroutines
subroutine	init_observations (time_s, time_e, filt_domain, localize)

subroutine, public	open_profile_dataset (filename, time_start, time_end, obs_variable, localize)

subroutine	open_profile_dataset_gtspp ()

subroutine	open_profile_dataset_argo (filename, time_start, time_end, obs_variable, localize)

subroutine, public	get_obs (model_time, Prof, nprof)

subroutine, public	oda_core_init (Domain, Grid, time_s, time_e, filt_domain, localize)

subroutine, public	copy_obs (obs_in, obs_out)

subroutine, public	open_profile_dataset_sst (filename, obs_variable, localize)

subroutine	open_profile_dataset_woa05t (filename, obs_variable, localize)

subroutine	open_profile_dataset_woa05s (filename, obs_variable, localize)

subroutine, public	get_obs_sst (model_time, Prof, nprof, no_prf0, sst_climo, Filter_domain)

subroutine, public	get_obs_woa05t (model_time, Prof, nprof, no_prf0)

subroutine, public	get_obs_woa05s (model_time, Prof, nprof, no_prf0)

subroutine	open_profile_dataset_eta (filename, obs_variable, localize)

subroutine	open_profile_dataset_suv (filename, obs_variable, localize)

subroutine, public	get_obs_suv (model_time, Prof, nprof, no_prf0)

subroutine, public	get_obs_eta (model_time, Prof, nprof, no_prf0)

Variables
integer, parameter	profile_file = 1

integer, parameter	sfc_file = 2

real	max_misfit = 5.0
	used to inflate observation errors where the difference from the first guess is large More...

real	ass_start_lat = -87.0
	set obs domain More...

real	ass_end_lat = 87.0
	set obs domain More...

integer, public	max_profiles = 50000

real	eta_obs_start_lat = -80.0
	set obs domain More...

real	eta_obs_end_lat = 85.0
	set obs domain More...

real	sst_obs_start_lat = -82.0
	set obs domain More...

real	sst_obs_end_lat = 89.0
	set obs domain More...

integer	max_prflvs = 200

type(ocean_profile_type), dimension(:), allocatable, target	profiles

integer	num_profiles

integer	no_sst

integer	no_prf

integer	no_temp

integer	no_salt

integer	no_suv

integer	no_eta

integer	no_woa05

integer	isc

integer	iec

integer	jsc

integer	jec

integer	isd

integer	ied

integer	jsd

integer	jed

integer	isg

integer	ieg

integer	jsg

integer	jeg

integer	isd_filt

integer	ied_filt

integer	jsd_filt

integer	jed_filt

integer	isd_flt0

integer	ied_flt0

integer	jsd_flt0

integer	jed_flt0

integer	nk

real, dimension(:,:), allocatable, save	mask_tao

real, dimension(:), allocatable	woa05_lon

real, dimension(:), allocatable	woa05_lat

real, dimension(:), allocatable	woa05_z

real, dimension(:), allocatable	sst_lon

real, dimension(:), allocatable	sst_lat

real, dimension(:,:), allocatable	obs_sst

real, dimension(:,:,:), allocatable, save	obs_woa05t

real, dimension(:,:,:), allocatable, save	obs_woa05s

integer	nlon

integer	nlat

integer	nlev

integer	nlon_woa

integer	nlat_woa

integer	nlev_woa

type(time_type), dimension(0:100), public	time_window

type(grid_type), pointer	grd

type(horiz_interp_type), save	interp

real, dimension(:, :), allocatable	x_grid

real, dimension(:, :), allocatable	y_grid

real, dimension(:, :), allocatable	x_grid_uv

real, dimension(:, :), allocatable	y_grid_uv

real, dimension(1, 1)	lon_out

real, dimension(1, 1)	lat_out

type(ocn_obs_flag_type), public	ocn_obs

integer, public	ssh_td

Function/Subroutine Documentation

◆ copy_obs()

subroutine, public oda_core_ecda_mod::copy_obs	(	type(ocean_profile_type), dimension(:), intent(in)	obs_in,
		type(ocean_profile_type), dimension(:), intent(inout)	obs_out
	)

Definition at line 1841 of file oda_core_ecda.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_obs()

subroutine, public oda_core_ecda_mod::get_obs	(	type(time_type), intent(in)	model_time,
		type(ocean_profile_type), dimension(:), intent(inout)	Prof,
		integer, intent(inout)	nprof
	)

Definition at line 1737 of file oda_core_ecda.F90.

Here is the call graph for this function:

◆ get_obs_eta()

subroutine, public oda_core_ecda_mod::get_obs_eta	(	type(time_type), intent(in)	model_time,
		type(ocean_profile_type), dimension(:), intent(inout)	Prof,
		integer, intent(inout)	nprof,
		integer, intent(in)	no_prf0
	)

Definition at line 3522 of file oda_core_ecda.F90.

Here is the call graph for this function:

◆ get_obs_sst()

subroutine, public oda_core_ecda_mod::get_obs_sst	(	type(time_type), intent(in)	model_time,
		type(ocean_profile_type), dimension(:), intent(inout)	Prof,
		integer, intent(inout)	nprof,
		integer, intent(in)	no_prf0,
		type(obs_clim_type), intent(inout)	sst_climo,
		type(domain2d), intent(in)	Filter_domain
	)

Definition at line 2843 of file oda_core_ecda.F90.

Here is the call graph for this function:

◆ get_obs_suv()

subroutine, public oda_core_ecda_mod::get_obs_suv	(	type(time_type), intent(in)	model_time,
		type(ocean_profile_type), dimension(:), intent(inout)	Prof,
		integer, intent(inout)	nprof,
		integer, intent(in)	no_prf0
	)

Definition at line 3410 of file oda_core_ecda.F90.

Here is the call graph for this function:

◆ get_obs_woa05s()

subroutine, public oda_core_ecda_mod::get_obs_woa05s	(	type(time_type), intent(in)	model_time,
		type(ocean_profile_type), dimension(:), intent(inout)	Prof,
		integer, intent(inout)	nprof,
		integer, intent(in)	no_prf0
	)

Definition at line 3047 of file oda_core_ecda.F90.

Here is the call graph for this function:

◆ get_obs_woa05t()

subroutine, public oda_core_ecda_mod::get_obs_woa05t	(	type(time_type), intent(in)	model_time,
		type(ocean_profile_type), dimension(:), intent(inout)	Prof,
		integer, intent(inout)	nprof,
		integer, intent(in)	no_prf0
	)

Definition at line 2951 of file oda_core_ecda.F90.

Here is the call graph for this function:

◆ init_observations()

subroutine oda_core_ecda_mod::init_observations	(	type(time_type), intent(in)	time_s,
		type(time_type), intent(in)	time_e,
		type(domain2d), intent(in)	filt_domain,
		logical, intent(in), optional	localize
	)

private

Definition at line 122 of file oda_core_ecda.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ oda_core_init()

subroutine, public oda_core_ecda_mod::oda_core_init	(	type(domain2d), intent(inout)	Domain,
		type(grid_type), intent(in), target	Grid,
		type(time_type), intent(in)	time_s,
		type(time_type), intent(in)	time_e,
		type(domain2d), intent(in)	filt_domain,
		logical, intent(in), optional	localize
	)

Definition at line 1800 of file oda_core_ecda.F90.

Here is the call graph for this function:

◆ open_profile_dataset()

subroutine, public oda_core_ecda_mod::open_profile_dataset	(	character(len=*), intent(in)	filename,
		type(time_type), intent(in)	time_start,
		type(time_type), intent(in)	time_end,
		integer, intent(in)	obs_variable,
		logical, intent(in), optional	localize
	)

Definition at line 495 of file oda_core_ecda.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ open_profile_dataset_argo()

subroutine oda_core_ecda_mod::open_profile_dataset_argo	(	character(len=*), intent(in)	filename,
		type(time_type), intent(in)	time_start,
		type(time_type), intent(in)	time_end,
		integer, intent(in)	obs_variable,
		logical, intent(in), optional	localize
	)

private

Definition at line 1136 of file oda_core_ecda.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ open_profile_dataset_eta()

subroutine oda_core_ecda_mod::open_profile_dataset_eta	(	character(len=*), intent(in)	filename,
		integer, intent(in)	obs_variable,
		logical, intent(in), optional	localize
	)

private

Definition at line 3142 of file oda_core_ecda.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ open_profile_dataset_gtspp()

subroutine oda_core_ecda_mod::open_profile_dataset_gtspp ( )

private

Definition at line 1132 of file oda_core_ecda.F90.

Here is the caller graph for this function:

◆ open_profile_dataset_sst()

subroutine, public oda_core_ecda_mod::open_profile_dataset_sst	(	character(len=*), intent(in)	filename,
		integer, intent(in)	obs_variable,
		logical, intent(in), optional	localize
	)

Definition at line 1909 of file oda_core_ecda.F90.

Here is the call graph for this function:

◆ open_profile_dataset_suv()

subroutine oda_core_ecda_mod::open_profile_dataset_suv	(	character(len=*), intent(in)	filename,
		integer, intent(in)	obs_variable,
		logical, intent(in), optional	localize
	)

private

Definition at line 3276 of file oda_core_ecda.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ open_profile_dataset_woa05s()

subroutine oda_core_ecda_mod::open_profile_dataset_woa05s	(	character(len=*), intent(in)	filename,
		integer, intent(in)	obs_variable,
		logical, intent(in), optional	localize
	)

private

Definition at line 2485 of file oda_core_ecda.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ open_profile_dataset_woa05t()

subroutine oda_core_ecda_mod::open_profile_dataset_woa05t	(	character(len=*), intent(in)	filename,
		integer, intent(in)	obs_variable,
		logical, intent(in), optional	localize
	)

private

Definition at line 2120 of file oda_core_ecda.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

Variable Documentation

◆ ass_end_lat

real oda_core_ecda_mod::ass_end_lat = 87.0

private

set obs domain

Definition at line 66 of file oda_core_ecda.F90.

◆ ass_start_lat

real oda_core_ecda_mod::ass_start_lat = -87.0

private

set obs domain

Definition at line 65 of file oda_core_ecda.F90.

◆ eta_obs_end_lat

real oda_core_ecda_mod::eta_obs_end_lat = 85.0

private

set obs domain

Definition at line 72 of file oda_core_ecda.F90.

◆ eta_obs_start_lat

real oda_core_ecda_mod::eta_obs_start_lat = -80.0

private

set obs domain

Definition at line 71 of file oda_core_ecda.F90.

◆ grd

type(grid_type), pointer oda_core_ecda_mod::grd

private

Definition at line 102 of file oda_core_ecda.F90.

◆ iec

integer oda_core_ecda_mod::iec

private

Definition at line 83 of file oda_core_ecda.F90.

◆ ied

integer oda_core_ecda_mod::ied

private

Definition at line 83 of file oda_core_ecda.F90.

◆ ied_filt

integer oda_core_ecda_mod::ied_filt

private

Definition at line 85 of file oda_core_ecda.F90.

◆ ied_flt0

integer oda_core_ecda_mod::ied_flt0

private

Definition at line 86 of file oda_core_ecda.F90.

◆ ieg

integer oda_core_ecda_mod::ieg

private

Definition at line 84 of file oda_core_ecda.F90.

◆ interp

type(horiz_interp_type), save oda_core_ecda_mod::interp

private

Definition at line 104 of file oda_core_ecda.F90.

◆ isc

integer oda_core_ecda_mod::isc

private

Definition at line 83 of file oda_core_ecda.F90.

◆ isd

integer oda_core_ecda_mod::isd

private

Definition at line 83 of file oda_core_ecda.F90.

◆ isd_filt

integer oda_core_ecda_mod::isd_filt

private

Definition at line 85 of file oda_core_ecda.F90.

◆ isd_flt0

integer oda_core_ecda_mod::isd_flt0

private

Definition at line 86 of file oda_core_ecda.F90.

◆ isg

integer oda_core_ecda_mod::isg

private

Definition at line 84 of file oda_core_ecda.F90.

◆ jec

integer oda_core_ecda_mod::jec

private

Definition at line 83 of file oda_core_ecda.F90.

◆ jed

integer oda_core_ecda_mod::jed

private

Definition at line 83 of file oda_core_ecda.F90.

◆ jed_filt

integer oda_core_ecda_mod::jed_filt

private

Definition at line 85 of file oda_core_ecda.F90.

◆ jed_flt0

integer oda_core_ecda_mod::jed_flt0

private

Definition at line 86 of file oda_core_ecda.F90.

◆ jeg

integer oda_core_ecda_mod::jeg

private

Definition at line 84 of file oda_core_ecda.F90.

◆ jsc

integer oda_core_ecda_mod::jsc

private

Definition at line 83 of file oda_core_ecda.F90.

◆ jsd

integer oda_core_ecda_mod::jsd

private

Definition at line 83 of file oda_core_ecda.F90.

◆ jsd_filt

integer oda_core_ecda_mod::jsd_filt

private

Definition at line 85 of file oda_core_ecda.F90.

◆ jsd_flt0

integer oda_core_ecda_mod::jsd_flt0

private

Definition at line 86 of file oda_core_ecda.F90.

◆ jsg

integer oda_core_ecda_mod::jsg

private

Definition at line 84 of file oda_core_ecda.F90.

◆ lat_out

real, dimension(1, 1) oda_core_ecda_mod::lat_out

private

Definition at line 107 of file oda_core_ecda.F90.

◆ lon_out

real, dimension(1, 1) oda_core_ecda_mod::lon_out

private

Definition at line 107 of file oda_core_ecda.F90.

◆ mask_tao

real, dimension(:,:), allocatable, save oda_core_ecda_mod::mask_tao

private

Definition at line 89 of file oda_core_ecda.F90.

◆ max_misfit

real oda_core_ecda_mod::max_misfit = 5.0

private

used to inflate observation errors where the difference from the first guess is large

Definition at line 64 of file oda_core_ecda.F90.

◆ max_prflvs

integer oda_core_ecda_mod::max_prflvs = 200

private

Definition at line 76 of file oda_core_ecda.F90.

◆ max_profiles

integer, public oda_core_ecda_mod::max_profiles = 50000

Definition at line 67 of file oda_core_ecda.F90.

◆ nk

integer oda_core_ecda_mod::nk

private

Definition at line 87 of file oda_core_ecda.F90.

◆ nlat

integer oda_core_ecda_mod::nlat

private

Definition at line 95 of file oda_core_ecda.F90.

◆ nlat_woa

integer oda_core_ecda_mod::nlat_woa

private

Definition at line 96 of file oda_core_ecda.F90.

◆ nlev

integer oda_core_ecda_mod::nlev

private

Definition at line 95 of file oda_core_ecda.F90.

◆ nlev_woa

integer oda_core_ecda_mod::nlev_woa

private

Definition at line 96 of file oda_core_ecda.F90.

◆ nlon

integer oda_core_ecda_mod::nlon

private

Definition at line 95 of file oda_core_ecda.F90.

◆ nlon_woa

integer oda_core_ecda_mod::nlon_woa

private

Definition at line 96 of file oda_core_ecda.F90.

◆ no_eta

integer oda_core_ecda_mod::no_eta

private

Definition at line 80 of file oda_core_ecda.F90.

◆ no_prf

integer oda_core_ecda_mod::no_prf

private

Definition at line 80 of file oda_core_ecda.F90.

◆ no_salt

integer oda_core_ecda_mod::no_salt

private

Definition at line 80 of file oda_core_ecda.F90.

◆ no_sst

integer oda_core_ecda_mod::no_sst

private

Definition at line 80 of file oda_core_ecda.F90.

◆ no_suv

integer oda_core_ecda_mod::no_suv

private

Definition at line 80 of file oda_core_ecda.F90.

◆ no_temp

integer oda_core_ecda_mod::no_temp

private

Definition at line 80 of file oda_core_ecda.F90.

◆ no_woa05

integer oda_core_ecda_mod::no_woa05

private

Definition at line 81 of file oda_core_ecda.F90.

◆ num_profiles

integer oda_core_ecda_mod::num_profiles

private

Definition at line 80 of file oda_core_ecda.F90.

◆ obs_sst

real, dimension(:,:), allocatable oda_core_ecda_mod::obs_sst

private

Definition at line 93 of file oda_core_ecda.F90.

◆ obs_woa05s

real, dimension(:,:,:), allocatable, save oda_core_ecda_mod::obs_woa05s

private

Definition at line 94 of file oda_core_ecda.F90.

◆ obs_woa05t

real, dimension(:,:,:), allocatable, save oda_core_ecda_mod::obs_woa05t

private

Definition at line 94 of file oda_core_ecda.F90.

◆ ocn_obs

type(ocn_obs_flag_type), public oda_core_ecda_mod::ocn_obs

Definition at line 109 of file oda_core_ecda.F90.

◆ profile_file

integer, parameter oda_core_ecda_mod::profile_file = 1

private

Definition at line 60 of file oda_core_ecda.F90.

◆ profiles

type(ocean_profile_type), dimension(:), allocatable, target oda_core_ecda_mod::profiles

private

Definition at line 78 of file oda_core_ecda.F90.

◆ sfc_file

integer, parameter oda_core_ecda_mod::sfc_file = 2

private

Definition at line 61 of file oda_core_ecda.F90.

◆ ssh_td

integer, public oda_core_ecda_mod::ssh_td

Definition at line 111 of file oda_core_ecda.F90.

◆ sst_lat

real, dimension(:), allocatable oda_core_ecda_mod::sst_lat

private

Definition at line 93 of file oda_core_ecda.F90.

◆ sst_lon

real, dimension(:), allocatable oda_core_ecda_mod::sst_lon

private

Definition at line 93 of file oda_core_ecda.F90.

◆ sst_obs_end_lat

real oda_core_ecda_mod::sst_obs_end_lat = 89.0

private

set obs domain

Definition at line 74 of file oda_core_ecda.F90.

◆ sst_obs_start_lat

real oda_core_ecda_mod::sst_obs_start_lat = -82.0

private

set obs domain

Definition at line 73 of file oda_core_ecda.F90.

◆ time_window

type(time_type), dimension(0:100), public oda_core_ecda_mod::time_window

Definition at line 100 of file oda_core_ecda.F90.

◆ woa05_lat

real, dimension(:), allocatable oda_core_ecda_mod::woa05_lat

private

Definition at line 92 of file oda_core_ecda.F90.

◆ woa05_lon

real, dimension(:), allocatable oda_core_ecda_mod::woa05_lon

private

Definition at line 92 of file oda_core_ecda.F90.

◆ woa05_z

real, dimension(:), allocatable oda_core_ecda_mod::woa05_z

private

Definition at line 92 of file oda_core_ecda.F90.

◆ x_grid

real, dimension(:, :), allocatable oda_core_ecda_mod::x_grid

private

Definition at line 106 of file oda_core_ecda.F90.

◆ x_grid_uv

real, dimension(:, :), allocatable oda_core_ecda_mod::x_grid_uv

private

Definition at line 106 of file oda_core_ecda.F90.

◆ y_grid

real, dimension(:, :), allocatable oda_core_ecda_mod::y_grid

private

Definition at line 106 of file oda_core_ecda.F90.

◆ y_grid_uv

real, dimension(:, :), allocatable oda_core_ecda_mod::y_grid_uv

private

Definition at line 106 of file oda_core_ecda.F90.

Data Types

Functions/Subroutines

Variables

Function/Subroutine Documentation

◆ copy_obs()

◆ get_obs()

◆ get_obs_eta()

◆ get_obs_sst()

◆ get_obs_suv()

◆ get_obs_woa05s()

◆ get_obs_woa05t()

◆ init_observations()

◆ oda_core_init()

◆ open_profile_dataset()

◆ open_profile_dataset_argo()

◆ open_profile_dataset_eta()

◆ open_profile_dataset_gtspp()

◆ open_profile_dataset_sst()

◆ open_profile_dataset_suv()

◆ open_profile_dataset_woa05s()

◆ open_profile_dataset_woa05t()

Variable Documentation

◆ ass_end_lat

◆ ass_start_lat

◆ eta_obs_end_lat

◆ eta_obs_start_lat

◆ grd

◆ iec

◆ ied

◆ ied_filt

◆ ied_flt0

◆ ieg

◆ interp

◆ isc

◆ isd

◆ isd_filt

◆ isd_flt0

◆ isg

◆ jec

◆ jed

◆ jed_filt

◆ jed_flt0

◆ jeg

◆ jsc

◆ jsd

◆ jsd_filt

◆ jsd_flt0

◆ jsg

◆ lat_out

◆ lon_out

◆ mask_tao

◆ max_misfit

◆ max_prflvs

◆ max_profiles

◆ nk

◆ nlat

◆ nlat_woa

◆ nlev

◆ nlev_woa

◆ nlon

◆ nlon_woa

◆ no_eta

◆ no_prf

◆ no_salt

◆ no_sst

◆ no_suv

◆ no_temp

◆ no_woa05

◆ num_profiles

◆ obs_sst

◆ obs_woa05s

◆ obs_woa05t

◆ ocn_obs

◆ profile_file

◆ profiles

◆ sfc_file

◆ ssh_td

◆ sst_lat

◆ sst_lon

◆ sst_obs_end_lat