default_output.pl
author A.M. Thurnherr <athurnherr@yahoo.com>
Fri, 05 Aug 2016 11:02:51 -0400
changeset 47 2ccb81b7cea5
child 54 828e5466391b
permissions -rw-r--r--
version found on whoosher after repair

#======================================================================
#                    D E F A U L T _ O U T P U T . P L 
#                    doc: Wed Jun  1 19:21:19 2016
#                    dlm: Wed Jun  1 19:26:01 2016
#                    (c) 2016 A.M. Thurnherr
#                    uE-Info: 106 1 NIL 0 0 72 0 2 4 NIL ofnI
#======================================================================

# NOTES:
#  - as this file is executed after ProcessingParams, only undefined
#	 variables are set

# HISTORY:
#	Jun  1, 2016: - created from [default_paths.pl]

#----------------------------------------------------------------------
# Processing log (diagnostic messages) output
#----------------------------------------------------------------------

$out_log = "$log_dir/$out_basename.log"
	unless defined($out_log);


#----------------------------------------------------------------------
# Vertical-velocity profile output and plots:
#
# Data:
#	*.wprof				vertical velocity profiles
#
# Plots:
# 	*_wprof.ps			vertical velocity profiles (main output plot)
#----------------------------------------------------------------------

unless (@out_profile) {
	push(@out_profile,"$data_dir/$out_basename.wprof");
	push(@out_profile,"plot_wprof($plot_dir/${out_basename}_wprof.ps)")
		if ($plotting_level > 0);
}

#--------------------------------------------------------------------------------------------------
# Vertical-velocity sample data output and plots:
#
# Data (in $data_dir):
#	*.wsamp							w sample data
#	residuals/<prof>/<ens>.rprof	OPTIONAL: per-ensemble residuals
#						
# Plots (in $plot_dir):
#	*_wsamp.ps						1: vertical velocity time-depth plot
#	*_residuals.ps					1: residual vertical velocity time-depth plot
#	*_residual_profs.ps				1: residuals binned in depth
#	*_backscatter.ps				1: volume scattering coefficient time-depth plot
#	*_attitude_res.ps				2: residuals binned wrt. pitch/roll
#	*_residuals12.ps				2: beampair <1,2> residual vertical velocity time-depth plot
#	*_residuals34.ps				2: beampair <3,4> residual vertical velocity time-depth plot
#	*_attitude_res.ps				2: residuals binned wrt. package attitude
#	*_acceleration_res.ps			2: residuals binned wrt. package acceleration derivative
#	*_correlation.ps				3: correlation time-depth plot
#--------------------------------------------------------------------------------------------------

unless (@out_wsamp) {
	push(@out_wsamp,"$data_dir/$out_basename.wsamp");
	#push(@out_wsamp,sprintf('dump_residual_profiles(%s/residuals/%03d)',$data_dir,$PROF));

	if ($plotting_level > 0) {
		push(@out_wsamp,"plot_wsamp($plot_dir/${out_basename}_wsamp.ps)");
		push(@out_wsamp,"plot_residuals($plot_dir/${out_basename}_residuals.ps)");
		push(@out_wsamp,"plot_residual_profs($plot_dir/${out_basename}_residual_profs.ps)");
		push(@out_wsamp,"plot_backscatter($plot_dir/${out_basename}_backscatter.ps)");
		if ($plotting_level > 1) {
			push(@out_wsamp,"plot_residuals12($plot_dir/${out_basename}_residuals12.ps)");
			push(@out_wsamp,"plot_residuals34($plot_dir/${out_basename}_residuals34.ps)");
			push(@out_wsamp,"plot_attitude_residuals($plot_dir/${out_basename}_attitude_res.ps)");
			push(@out_wsamp,"plot_acceleration_residuals($plot_dir/${out_basename}_acceleration_res.ps)");
			if ($plotting_level > 2) {
				push(@out_wsamp,"plot_correlation($plot_dir/${out_basename}_correlation.ps)");
			}
		}
	}
}

#----------------------------------------------------------------------
# Time-series output
#
#	*.tis			combined CTD/LADCP time-series data, including 
#					package- and LADCP reference layer w
#----------------------------------------------------------------------

push(@out_timeseries,"$data_dir/$out_basename.tis")
	unless (@out_timeseries);

#----------------------------------------------------------------------
# Per-bin vertical-velocity residuals (plot only)
#----------------------------------------------------------------------

push(@out_BR,"plot_mean_residuals($plot_dir/${out_basename}_bin_residuals.ps)")
	unless (@out_BR);


#----------------------------------------------------------------------
# Time-lagging correlation statistics (plot only)
#----------------------------------------------------------------------

unless (@out_TL) {
	push(@out_TL,"plot_time_lags($plot_dir/${out_basename}_time_lags.ps)")
		if ($plotting_level > 0);
}

#----------------------------------------------------------------------

1;	# return true