Functions/Subroutines
logical function, public	is_satfile (file_index)

subroutine, public	sat_hist_readnl (nlfile, hfilename_spec, mfilt, fincl, nhtfrq, avgflag_pertape)

subroutine, public	sat_hist_init

subroutine	read_datetime (datetime, index)

subroutine	read_buffered_datetime (datetime, index)

real(r8) function	convert_date_time (date, time)

subroutine, public	sat_hist_define (outfile)

subroutine, public	sat_hist_write (tape, nflds, nfils)

subroutine	dump_columns (File, hitem, ncols, nfils, fdims, ldims, owners)

subroutine	read_next_position (ncols)

subroutine	write_record_coord (tape, mod_lats, mod_lons, mod_dists, ncols, nfils)

subroutine	get_indices (lats, lons, ncols, nocols, has_dyn_flds, col_ndxs, chk_ndxs, fdyn_ndxs, ldyn_ndxs, phs_owners, dyn_owners, mlats, mlons, phs_dists)

integer function	define_var (var_name, coldim, infile, in_vid, outfile, out_id)

integer function	copy_data (infile, in_vid, outfile, out_id, instart, outstart, ncols)

integer function	copy_att (infile, in_vid, att_name, outfile, out_id)

subroutine	find_cols (lat, lon, nclosest, owner, lcid, icol, gcol, distmin, mlats, mlons)

Variables
character(len=max_string_len)	sathist_track_infile

type(file_desc_t)	infile

integer	half_step

logical	has_sat_hist = .false.

integer	sathist_nclosest

integer	sathist_ntimestep

real(r8), dimension(:), allocatable	obs_lats

real(r8), dimension(:), allocatable	obs_lons

logical	doy_format

real(r8)	first_datetime

real(r8)	last_datetime

integer	last_start_index

integer	time_ndx

integer	t_buffer_size

integer, dimension(:), allocatable	date_buffer

integer, dimension(:), allocatable	time_buffer

integer	sat_tape_num =ptapes-1

integer	n_profiles

integer	time_vid

integer	date_vid

integer	lat_vid

integer	lon_vid

integer	instr_vid

integer	orbit_vid

integer	prof_vid

integer	zenith_vid

integer	in_julian_vid

integer	in_localtime_vid

integer	in_doy_vid

integer	in_occ_type_vid

integer	in_start_col

type(var_desc_t)	out_latid

type(var_desc_t)	out_lonid

type(var_desc_t)	out_dstid

type(var_desc_t)	out_instrid

type(var_desc_t)	out_zenithid

type(var_desc_t)	out_orbid

type(var_desc_t)	out_profid

type(var_desc_t)	out_instr_lat_vid

type(var_desc_t)	out_instr_lon_vid

type(var_desc_t)	out_obs_date_vid

type(var_desc_t)	out_obs_time_vid

type(var_desc_t)	out_julian_vid

type(var_desc_t)	out_localtime_vid

type(var_desc_t)	out_doy_vid

type(var_desc_t)	out_occ_type_vid

logical, parameter	debug = .false.

real(r8), parameter	rad2deg = 180._r8/pi

Function/Subroutine Documentation

◆ convert_date_time()

real(r8) function sat_hist::convert_date_time	(	integer, intent(in)	date,
		integer, intent(in)	time
	)

private

Here is the call graph for this function:

Here is the caller graph for this function:

◆ copy_att()

integer function sat_hist::copy_att	(	type(file_desc_t), intent(inout)	infile,
		integer, intent(in)	in_vid,
		character(len=*), intent(in)	att_name,
		type(file_desc_t), intent(inout)	outfile,
		type(var_desc_t), intent(in)	out_id
	)

private

Here is the caller graph for this function:

◆ copy_data()

integer function sat_hist::copy_data	(	type(file_desc_t), intent(in)	infile,
		integer, intent(in)	in_vid,
		type(file_desc_t), intent(inout)	outfile,
		type(var_desc_t), intent(in)	out_id,
		integer, intent(in)	instart,
		integer, intent(in)	outstart,
		integer, intent(in)	ncols
	)

Here is the caller graph for this function:

◆ define_var()

integer function sat_hist::define_var	(	character(len=*), intent(in)	var_name,
		integer, intent(in)	coldim,
		type(file_desc_t), intent(inout)	infile,
		integer, intent(in)	in_vid,
		type(file_desc_t), intent(inout)	outfile,
		type(var_desc_t), intent(out)	out_id
	)

Here is the call graph for this function:

Here is the caller graph for this function:

◆ dump_columns()

subroutine sat_hist::dump_columns	(	type(file_desc_t), intent(inout)	File,
		type(hentry), intent(in), target	hitem,
		integer, intent(in)	ncols,
		integer, intent(in)	nfils,
		integer, dimension(:), intent(in)	fdims,
		integer, dimension(:), intent(in)	ldims,
		integer, dimension(:), intent(in)	owners
	)

Here is the caller graph for this function:

◆ find_cols()

subroutine sat_hist::find_cols	(	real(r8), intent(in)	lat,
		real(r8), intent(in)	lon,
		integer, intent(in)	nclosest,
		integer, dimension(nclosest), intent(out)	owner,
		integer, dimension(nclosest), intent(out)	lcid,
		integer, dimension(nclosest), intent(out)	icol,
		integer, dimension(nclosest), intent(out)	gcol,
		real(r8), dimension(nclosest), intent(out)	distmin,
		real(r8), dimension(nclosest), intent(out)	mlats,
		real(r8), dimension(nclosest), intent(out)	mlons
	)

private

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_indices()

subroutine sat_hist::get_indices	(	real(r8), dimension(ncols), intent(in)	lats,
		real(r8), dimension(ncols), intent(in)	lons,
		integer, intent(in)	ncols,
		integer, intent(in)	nocols,
		logical, intent(in)	has_dyn_flds,
		integer, dimension(nocols), intent(out)	col_ndxs,
		integer, dimension(nocols), intent(out)	chk_ndxs,
		integer, dimension(nocols), intent(out)	fdyn_ndxs,
		integer, dimension(nocols), intent(out)	ldyn_ndxs,
		integer, dimension(nocols), intent(out)	phs_owners,
		integer, dimension(nocols), intent(out)	dyn_owners,
		real(r8), dimension(nocols), intent(out)	mlats,
		real(r8), dimension(nocols), intent(out)	mlons,
		real(r8), dimension(nocols), intent(out)	phs_dists
	)

Here is the call graph for this function:

Here is the caller graph for this function:

◆ is_satfile()

logical function, public sat_hist::is_satfile ( integer, intent(in) file_index )

◆ read_buffered_datetime()

subroutine sat_hist::read_buffered_datetime	(	real(r8), intent(out)	datetime,
		integer, intent(in)	index
	)

private

Here is the call graph for this function:

Here is the caller graph for this function:

◆ read_datetime()

subroutine sat_hist::read_datetime	(	real(r8), intent(out)	datetime,
		integer, intent(in)	index
	)

Here is the call graph for this function:

Here is the caller graph for this function:

◆ read_next_position()

subroutine sat_hist::read_next_position ( integer, intent(out) ncols )

Here is the call graph for this function:

Here is the caller graph for this function:

◆ sat_hist_define()

subroutine, public sat_hist::sat_hist_define ( type(file_desc_t), intent(inout) outfile )

Here is the call graph for this function:

Here is the caller graph for this function:

◆ sat_hist_init()

subroutine, public sat_hist::sat_hist_init ( )

Here is the call graph for this function:

Here is the caller graph for this function:

◆ sat_hist_readnl()

subroutine, public sat_hist::sat_hist_readnl	(	character(len=*), intent(in)	nlfile,
		character(len=*), dimension(:), intent(inout)	hfilename_spec,
		integer, dimension(:), intent(inout)	mfilt,
		character(len=*), dimension(:,:), intent(inout)	fincl,
		integer, dimension(:), intent(inout)	nhtfrq,
		character(len=1), dimension(:), intent(inout)	avgflag_pertape
	)

Here is the call graph for this function:

Here is the caller graph for this function:

◆ sat_hist_write()

subroutine, public sat_hist::sat_hist_write	(	type(active_entry)	tape,
		integer, intent(in)	nflds,
		integer, intent(inout)	nfils
	)

Here is the call graph for this function:

Here is the caller graph for this function:

◆ write_record_coord()

subroutine sat_hist::write_record_coord	(	type(active_entry), intent(inout)	tape,
		real(r8), dimension(ncols * sathist_nclosest), intent(in)	mod_lats,
		real(r8), dimension(ncols * sathist_nclosest), intent(in)	mod_lons,
		real(r8), dimension(ncols * sathist_nclosest), intent(in)	mod_dists,
		integer, intent(in)	ncols,
		integer, intent(in)	nfils
	)

Here is the call graph for this function:

Here is the caller graph for this function:

Variable Documentation

◆ date_buffer

integer, dimension(:), allocatable sat_hist::date_buffer

private

◆ date_vid

integer sat_hist::date_vid

private

◆ debug

logical, parameter sat_hist::debug = .false.

private

◆ doy_format

logical sat_hist::doy_format

private

◆ first_datetime

real(r8) sat_hist::first_datetime

private

◆ half_step

integer sat_hist::half_step

private

◆ has_sat_hist

logical sat_hist::has_sat_hist = .false.

private

◆ in_doy_vid

integer sat_hist::in_doy_vid

private

◆ in_julian_vid

integer sat_hist::in_julian_vid

private

◆ in_localtime_vid

integer sat_hist::in_localtime_vid

private

◆ in_occ_type_vid

integer sat_hist::in_occ_type_vid

private

◆ in_start_col

integer sat_hist::in_start_col

private

◆ infile

type(file_desc_t) sat_hist::infile

private

◆ instr_vid

integer sat_hist::instr_vid

private

◆ last_datetime

real(r8) sat_hist::last_datetime

private

◆ last_start_index

integer sat_hist::last_start_index

private

◆ lat_vid

integer sat_hist::lat_vid

private

◆ lon_vid

integer sat_hist::lon_vid

private

◆ n_profiles

integer sat_hist::n_profiles

private

◆ obs_lats

real(r8), dimension(:), allocatable sat_hist::obs_lats

private

◆ obs_lons

real(r8), dimension(:), allocatable sat_hist::obs_lons

private

◆ orbit_vid

integer sat_hist::orbit_vid

private

◆ out_doy_vid

type(var_desc_t) sat_hist::out_doy_vid

private

◆ out_dstid

type(var_desc_t) sat_hist::out_dstid

private

◆ out_instr_lat_vid

type(var_desc_t) sat_hist::out_instr_lat_vid

private

◆ out_instr_lon_vid

type(var_desc_t) sat_hist::out_instr_lon_vid

private

◆ out_instrid

type(var_desc_t) sat_hist::out_instrid

private

◆ out_julian_vid

type(var_desc_t) sat_hist::out_julian_vid

private

◆ out_latid

type(var_desc_t) sat_hist::out_latid

private

◆ out_localtime_vid

type(var_desc_t) sat_hist::out_localtime_vid

private

◆ out_lonid

type(var_desc_t) sat_hist::out_lonid

private

◆ out_obs_date_vid

type(var_desc_t) sat_hist::out_obs_date_vid

private

◆ out_obs_time_vid

type(var_desc_t) sat_hist::out_obs_time_vid

private

◆ out_occ_type_vid

type(var_desc_t) sat_hist::out_occ_type_vid

private

◆ out_orbid

type(var_desc_t) sat_hist::out_orbid

private

◆ out_profid

type(var_desc_t) sat_hist::out_profid

private

◆ out_zenithid

type(var_desc_t) sat_hist::out_zenithid

private

◆ prof_vid

integer sat_hist::prof_vid

private

◆ rad2deg

real(r8), parameter sat_hist::rad2deg = 180._r8/pi

private

◆ sat_tape_num

integer sat_hist::sat_tape_num =ptapes-1

private

◆ sathist_nclosest

integer sat_hist::sathist_nclosest

private

◆ sathist_ntimestep

integer sat_hist::sathist_ntimestep

private

◆ sathist_track_infile

character(len=max_string_len) sat_hist::sathist_track_infile

private

◆ t_buffer_size

integer sat_hist::t_buffer_size

private

◆ time_buffer

integer, dimension(:), allocatable sat_hist::time_buffer

private

◆ time_ndx

integer sat_hist::time_ndx

private

◆ time_vid

integer sat_hist::time_vid

private

◆ zenith_vid

integer sat_hist::zenith_vid

private

Functions/Subroutines

Variables

Function/Subroutine Documentation

◆ convert_date_time()

◆ copy_att()

◆ copy_data()

◆ define_var()

◆ dump_columns()

◆ find_cols()

◆ get_indices()

◆ is_satfile()

◆ read_buffered_datetime()

◆ read_datetime()

◆ read_next_position()

◆ sat_hist_define()

◆ sat_hist_init()

◆ sat_hist_readnl()

◆ sat_hist_write()

◆ write_record_coord()

Variable Documentation

◆ date_buffer

◆ date_vid

◆ debug

◆ doy_format

◆ first_datetime

◆ half_step

◆ has_sat_hist

◆ in_doy_vid

◆ in_julian_vid

◆ in_localtime_vid

◆ in_occ_type_vid

◆ in_start_col

◆ infile

◆ instr_vid

◆ last_datetime

◆ last_start_index

◆ lat_vid

◆ lon_vid

◆ n_profiles

◆ obs_lats

◆ obs_lons

◆ orbit_vid

◆ out_doy_vid

◆ out_dstid

◆ out_instr_lat_vid

◆ out_instr_lon_vid

◆ out_instrid

◆ out_julian_vid

◆ out_latid

◆ out_localtime_vid

◆ out_lonid

◆ out_obs_date_vid

◆ out_obs_time_vid

◆ out_occ_type_vid

◆ out_orbid

◆ out_profid

◆ out_zenithid

◆ prof_vid

◆ rad2deg

◆ sat_tape_num

◆ sathist_nclosest

◆ sathist_ntimestep

◆ sathist_track_infile

◆ t_buffer_size

◆ time_buffer

◆ time_ndx

◆ time_vid

◆ zenith_vid