T_CARTES $SSW/soho/lasco/idl/display/t_cartes.pro
[Previous] [Next]

 NAME:
	T_CARTES
 PURPOSE:
	To convert polar co-ordinates into cartesians (reverse of T_POLAR)
 CATEGORY:
	Image manipulation.
 CALLING SEQUENCE:
	T_CARTES,IMAGE_IN,IMAGE_OUT,XC,YC,RAD1,RAD2,AZ1,AZ2,COL,LIN
 INPUTS:
	IMAGE_IN = input image
	XC,YC = centre of rotation
	RAD1,RAD2 = inner and outer radius
	AZ1,AZ2 = starting and finishing azimuth in degrees.
	COL,LIN = the number of columns and lines in the output
 OPTIONAL INPUT PARAMETERS:
	NONE
 OUTPUTS:
	IMAGE_OUT = output image
 OPTIONAL OUTPUT PARAMETERS:
	NONE
 CALLS: ***
	XY_BILIN
 CALLED BY:
	WC2P
 COMMON BLOCKS:
	NONE
 SIDE EFFECTS:
	NONE
 RESTRICTIONS:
	NOTE THAT NO MASK IS APPLIED SO THERE WILL BE EDGE EFFECTS
 PROCEDURE:
	TRIVIAL
 MODIFICATION HISTORY:
	5-12-89  NT
	14-06-1993  NT   Version 3.0


t_param $SSW/soho/lasco/idl/las-c2/t_param.pro
[Previous] [Next]
 PROJECT:
      SOHO - LASCO
 NAME:
     t_param.pro
 PURPOSE:
     Gets main telescope parameters
 CALLING SEQUENCE:
     value = t_param( detector, key )
 EXAMPLE
     pixsze = t_param('C2','PIXEL')
 INPUTS:
     detector   'C1','C2','C3'                       STRING
     key        parameter name                       STRING
                'PIXEL'   pixelsize  (in mm)
                'SCALE'   angular scale for pixel  (in deg)
                'FOCAL'   equivalent focal (in mm)
                'FIELD'   field (in deg)
                'DFIELD'  diagonal field (in deg)
                'BIAS'    electric bias of each amplifier (in ADU)
                            get byas from  offset_bias.pro (needs the header)
                'OCCULTER' radius of occlusion due to internal oculter
                           in 'CCD pixel units'
                'DISTORTION' set of coefs of distortion (to be used in mm)
 CALLED BY:
	getl05hdrparam
                              NOTE: drho = a0*rho+a1*rho^3+a2*rho^5
                'DISCNTR' distortion center (in mm)
                'CENTER'  Sun center (in pixels)
                'OCCENTER' occulter center (in pixels)
 KEYWORD INPUT
     none
 OUTPUTS:
     value      searched value
 OUTPUTS INPUTS:
     none
 PROCEDURE:
     Gets parameters from a set of internal data 
 CALLED PROCEDURES:
     none

 HISTORY:
     Def. and code: A.Llebaria (LAS-CNRS)    Aug 1996 
     Corrected and modified by Dr. M.-V. Bout on March, 4th, 1998
 NOTA :

   Distortion parameters:               ; rho*(a0+a1*rho^2+a2*rho^4)
   history
           pm.distortion = [0.0060519645, -0.00014672423, 2.0899603e-07]
 list9604_1ora_00_g_ldist.dat
           pm.distortion = [0.0051344125, -0.00012233862, 1.0978595e-07]  
 list9603_1ora_00_a_ldist.dat
           pm.distortion = [0.0044836143, -0.00011276272, 5.9968042e-08]  
 list9602_2ora_00_a_ldist.dat
           pm.distortion = [0.0051344125, -0.00012233862, 1.0978595e-07]  
 list9603_1ora_00_a_ldist.dat
           pm.distortion = [0.0056511656, -0.00013827504, 1.6940201e-07]  
 list9604_1ora_00_h_ldist.dat


T_POLAR $SSW/soho/lasco/idl/display/t_polar.pro
[Previous] [Next]

 NAME:
	T_POLAR
 PURPOSE:
	Polar coordinate transform
 CATEGORY:
	Image manipulation.
 CALLING SEQUENCE:
	T_POLAR,P,P1,X,Y,RAD1,RAD2,AZ1,AZ2,COL,LIN
 INPUTS:
	P = input array
	X,Y = centre of rotation
	RAD1,RAD2 = inner and outer radius
	AZ1,AZ2 = starting and finishing azimuth in degrees.
	COL = number of samples in radius
	LIN = number of samples in azimuth
 OPTIONAL INPUT PARAMETERS:
	NONE
 KEYWORDS:
	NONE
 OUTPUTS:
	P1 = OUTPUT ARRAY
 OPTIONAL OUTPUT PARAMETERS:
	NONE
 CALLS: ***
	XY_BILIN
 CALLED BY:
	WC2P
 COMMON BLOCKS:
	NONE
 SIDE EFFECTS:
	NONE
 RESTRICTIONS:
	NONE
 PROCEDURE:
	TRIVIAL
 MODIFICATION HISTORY:
	10-JUN-1987  NT
	5-12-1989  NT  Modified to speed up but uses larger arrays!!
	14-6-1993  NT  Version 3.0 IDL


t_utplot [2] $SSW/soho/mdi/idl_old/gen/utplot/t_utplot.pro
[Previous] [Next]

 NAME: t_utplot


 PURPOSE: 
	Given the input time vector, x0, prepare the time variable, xplot, for utplot.
	Put it in a standard form, seconds from 79/1/1, set the plot range, xrange,
	determine the plot reference time, xstart, and decide whether utbase needs to
	be set or changed.

 CATEGORY: Graphics


 CALLING SEQUENCE: t_utplot, x0, xplot=x, xrange=xrange, xstart=xst, utbase=utbase, $
			timerange=timerange


 CALLED BY: utplot, set_utplot


 CALLS TO: anytim

 INPUTS:
	x0 - time axis variable in any accepted anytim format
	utbase - current value of utbase
	xstart - current value of plot reference time
	timerange - xrange specified with two fully referenced times
	base_time - passed reference time for double precession seconds time array
 OUTPUTS:
       xrange - plot range relative to xstart
	utbase
	xstart

 CALLS: ***
	CHECKVAR [1], DATATYPE [1], DATATYPE [2], DATATYPE [3], FCHECK, GETUT [1], GETUT [2]
	SETUT [1], SETUT [2], SETUTBASE [1], SETUTBASE [2], anytim [1], anytim [2]
	anytim [3], anytim [4], anytim [5], checkvar [2]
 CALLED BY:
	DEF_UTPLOT
 MODIFICATION HISTORY:
	pulled from utplot and set_utplot, ras- 5-jan-94
	xst is set to a yohkoh time format (external 7xn Int2) prior to return, ras, 25-jan-94


tag_index [2] $SSW/soho/mdi/idl_old/gen/ys_util/tag_index.pro
[Previous] [Next]
   Name: tag_index

   Purpsose: return tag position (index) of 'tag' within 'str'

   Input Parameters: 
	str - structure
	tag - tag name (string scaler or vector )

   Output:
       function returns indices of tag within str (-1 if not found)
	longword scaler returned if tag is scaler, else longword vector 

 CALLED BY:
	BFITS, FIX_OLD_ATT [1], FIX_OLD_ATT [2], GET_LATLON, GET_TAG_INDEX, HXTPIXON
	HXT_ERROR, HXT_LCURVE, HXT_QLOOK, IDEPROJECT, MK_SOHO_MAP_EARTH, PIXSQUARE, PLOT_HSI
	PLOT_HXT, RD_BDA [1], RD_BDA_DATA, REP_TAG_VALUE, diff_str [1], diff_str [2]
	fitshead2struct, get_index_ver, goes2str, gt_dp_mode [1], gt_dp_mode [2], gt_hxa
	gt_iru, gt_tagval [1], gt_tagval [2], gt_tfss, hxtpix, make_mirror, mreadfits_fixup
	plot_ace, plot_eit_filters, plot_eit_mirror, plotman, pr_evn [2], read_eit, sav_bsc
	soon_search_www, ssw_install [1], ssw_install [2], sswstruct_fill [1]
	str_tagval [1], str_tagval [2], struct2fitshead, timeavg [1], timeavg [2]
	trace_scale, write_trace, xspr [1], xspr [2], yoh_orb_interp [1]
	yoh_orb_interp [2]
   History: slf 
   	     modified, 21-feb-92 for to allow tag vector


TAI2OBT $SSW/soho/gen/idl/plan/science/tai2obt.pro
[Previous] [Next]
 Project     :	SOHO - CDS

 Name        :	TAI2OBT()

 Purpose     :	Converts TAI to OBT/LOBT

 Explanation :	This procedure takes a double precision number containing the
		Atomic International Time (TAI) in seconds from midnight, 1
		January 1958, and converts it into the 6 byte (local) on-board
		time from the spacecraft.

 Use         :	Result = TAI2OBT( TAI )

 Inputs      :	TAI = The time in TAI format as a double precision number or
		      array.

 Opt. Inputs :	None.

 Outputs     :	The result of the function will be a byte array with the first
		dimension having six elements.

 Opt. Outputs:	None.

 Keywords    :	ERRMSG	= If defined and passed, then any error messages 
			  will be returned to the user in this parameter 
			  rather than being handled by the IDL MESSAGE 
			  utility.  If no errors are encountered, then a null 
			  string is returned.  In order to use this feature, 
			  the string ERRMSG must be defined first, e.g.,

				ERRMSG = ''
				RESULT = TAI2OBT( TAI, ERRMSG=ERRMSG )
				IF ERRMSG NE '' THEN ...

 Calls       : ***
	DATATYPE [1], DATATYPE [2], DATATYPE [3], HOST_TO_IEEE [1], HOST_TO_IEEE [2]
	HOST_TO_IEEE [3], HOST_TO_IEEE [4]
 Common      :	None.

 Restrictions:	None.

 Side effects:	If an error is encountered and the ERRMSG keyword is set, 
		TAI2OBT returns a byte array of all zeros.

 Category    :	Utilities, Time.

 Prev. Hist. :	None.

 Written     :	William Thompson, GSFC, 6 July 1995

 Modified    :	Version 1, William Thompson, GSFC, 6 July 1995

 Version     :	Version 1, 6 July 1995


TAI_HEAD $SSW/soho/sumer/idl/contrib/germerott/sumer_head/tai_head.pro
[Previous] [Next]
 PROJECT:
       SOHO - SUMER

 NAME:
       TAI_HEAD()

 PURPOSE: 
       Calculates the TAI-Time when the integration of a SUMER image started

 CATEGORY:
       RAW Processing
 
 EXPLANATION:
       
 SYNTAX: 
       Result = tai_head(header)

 EXAMPLES:
       
 INPUTS:
       header

 OPTIONAL INPUTS: 
       None.

 OUTPUTS:
       Tai Time in double presition Value

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS: 
       None.

 CALLS: ***
	OBT2TAI
 COMMON:
       None.

 RESTRICTIONS: 
       Calls OBT2TAI

 SIDE EFFECTS:
       None.

 HISTORY:
       Version 1, January 6, 1998, Dietmar Germerott, MPAE Lindau. Written

 CONTACT:
       Dietmar Germerott, MPAE Lindau (Dietmar Germerott@linmpi.mpg.de)


TAPRD [2] $SSW/soho/mdi/idl_old/gen/ssw_lib/taprd.pro
[Previous] [Next]
 Project     :	SOHO - CDS

 Name        :	TAPRD

 Purpose     :	Emulates VMS TAPRD procedure on UNIX machines.

 Explanation :	Emulates VMS TAPRD procedure on UNIX machines.  However, the
		actions of this routine may differ from the VMS equivalent in
		nonstandard situations.

		*** Unix only ***

 Use         :	TAPRD, ARRAY, UNIT  [, BYTE_REVERSE ]

 Inputs      :	ARRAY	= Variable into which the data should be read.  The
			  datatype and number of values to attempt to read is
			  based on this array.

		UNIT	= Specifies the magnetic tape unit.  Not to be confused
			  with logical unit numbers.  In UNIX, the number
			  refers to one of the environment variables MT0, MT1,
			  etc., which translate into a physical device name,
			  e.g.

					setenv MT0 /dev/nrst0

 Opt. Inputs :	BYTE_REVERSE = If present, then even and odd bytes are swapped.

 Outputs     :	The output is read into ARRAY. Also, !ERR is set to the number
		of bytes actually read.

 Opt. Outputs:	None.

 Keywords    :	None.

 Calls       : ***
	CHECK_TAPE_DRV [1], CHECK_TAPE_DRV [2]
 CALLED BY:
	FITSTAPE, RD_EXB, TCOPY, mt, vmscopytape
 Common      :	None.

 Restrictions:	This routine may not have all the abilities of the VMS
		equivalent, particularly in regards to the !ERR system
		variable.

		The environment variable "MTn", where n corresponds to the
		variable UNIT, must be defined.  E.g.,

			setenv MT0 /dev/nrst0

		Requires IDL v3.1 or later.

 Side effects:	The device file is opened.

 Category    :	Utilities, I/O, Tape.

 Prev. Hist. :	William Thompson, GSFC, June 1991.

 Written     :	William Thompson, GSFC, June 1991.

 Modified    :	Version 1, William Thompson, GSFC, 21 December 1993.
			Rewrote to use READU with TRANSFER_COUNT keyword.
		Version 2, William Thompson, GSFC, 22 December 1993.
			Added check of ARRAY variable.

 Version     :	Version 2, 22 December 1993.


TAPWRT [2] $SSW/soho/mdi/idl_old/gen/ssw_lib/tapwrt.pro
[Previous] [Next]
 Project     :	SOHO - CDS

 Name        :	TAPWRT

 Purpose     :	Emulates VMS TAPWRT procedure on UNIX machines.

 Explanation :	Emulates VMS TAPWRT procedure on UNIX machines.

		*** Unix only ***

 Use         :	TAPWRT, ARRAY, UNIT  [, BYTE_REVERSE ]

 Inputs      :	ARRAY	= Variable into which the data should be read.
		UNIT	= Specifies the magnetic tape unit.  Not to be confused
			  with logical unit numbers.  In UNIX, the number
			  refers to one of the environment variables MT0, MT1,
			  etc., which translate into a physical device name,
			  e.g.

					setenv MT0 /dev/nrst0

 Opt. Inputs :	BYTE_REVERSE = If present, then even and odd bytes are swapped.

 Outputs     :	None.

 Opt. Outputs:	None.

 Keywords    :	None.

 Calls       : ***
	CHECK_TAPE_DRV [1], CHECK_TAPE_DRV [2]
 CALLED BY:
	FITSTAPE, TCOPY, vmscopytape
 Common      :	None.

 Restrictions:	The environment variable "MTn", where n corresponds to the
		variable UNIT, must be defined.  E.g.,

			setenv MT0 /dev/nrst0

		Requires IDL v3.1 or later.

 Side effects:	The device file is opened.

 Category    :	Utilities, I/O, Tape.

 Prev. Hist. :	William Thompson, GSFC, June 1991.

 Written     :	William Thompson, GSFC, June 1991.

 Modified    :	Version 1, William Thompson, GSFC, 21 December 1993.
			Rewrote to use WRITEU.

 Version     :	Version 1, 21 December 1993.


TARGET [1] $SSW/soho/sumer/idl/contrib/germerott/sumer_head/target.pro
[Previous] [Next]
 PROJECT:
       SOHO - SUMER

 NAME:
       TARGET()

 PURPOSE: 
       Return the Target Zone Number

 CATEGORY:
       
 
 EXPLANATION:
       
 SYNTAX: 
       Result = target()

 CALLED BY:
	ar_prep, background, darklimb_correct, gbo_rot_t, rd_lonlat, rect_rot, rm_darklimb
	rt_hdha, rt_mag, rt_nkr, set_back, wl_process
 EXAMPLES:
       
 INPUTS:
       header - BYTARR(92) Image Header

 OPTIONAL INPUTS: 
       None.

 OUTPUTS:
       None.

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS: 
       None.

 COMMON:
       None.

 RESTRICTIONS: 
       None.

 SIDE EFFECTS:
       None.

 HISTORY:
       Version 1, October 7, 1996, Dietmar Germerott, MAPE Lindau. Written

 CONTACT:
       Dietmar Germerott, MAPE Lindau (germerott@linax1.mpae.gwdg.de)


tbb_info [1] $SSW/soho/mdi/idl_old/gen/ys_util/tbb_info.pro
[Previous] [Next]
   Name: tbb_info

   Purpose: team bb information

   Calling Sequence:
      tbb_info,'name',/address

 CALLS: ***
	CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], MORE [1], MORE [2], concat_dir [4]
	rd_tfile [1], rd_tfile [2], wc_where [1], wc_where [2]
   History:
      24-Feb-1994


tbeep [2] $SSW/soho/mdi/idl_old/gen/ys_util/tbeep.pro
[Previous] [Next]
   Name: tbeep

   Purpose: beep terminal

   Input Paramters:
      nbeeps - number of beeps (defalut=1)
      ibwait - inter-beep wait

   Keyword Parameters:
      waitn  - inter-beep wait (can be positional too)

   History - slf, 2-Sep-92 (couldnt rembember existing one)

 CALLED BY:
	ACOPY [1], CH_XMENU_SEL, COVER_PAGE [1], COVER_PAGE [2], DPE_GUESS
	FIX_OLD_ATT [1], FIX_OLD_ATT [2], GET_SUNCENTER [1], GET_SUNCENTER [2], HXT_EFF
	PICK_CAN_PRELIM, RD_HXT_DBOOK, ROT, STEPPER [3], STEPPER [4], SXT_PREP0, SXT_TE
	SXT_TEEM [1], SXT_TEEM [2], SXT_TEEM1 [1], SXT_TEEM1 [2], SXT_TEEM1 [3]
	SXT_TEEM2 [1], SXT_TEEM2 [2], SXT_TEEM2 [3], UNIX_CMD [1], UNIX_CMD [2]
	WL_CUBE_II, XMENU_SEL [1], XMENU_SEL [2], azimuth_avg, cancel_dsn
	check_compile [1], check_compile [2], check_log [1], check_log [2], collexc [1]
	collexc [2], cont2time [1], cont2time [2], cube_edit, daily_forecast [2]
	dark_sub [1], dark_sub [2], dark_sub [3], dbase2disk, delete_week [1]
	delete_week [2], do_demo [1], do_demo [2], dont_use_this [1], dont_use_this [2]
	dummy [10], dummy [11], dummy [12], dummy [13], dummy [14], dummy [1], dummy [2]
	dummy [3], dummy [4], dummy [5], dummy [6], dummy [7], dummy [8], dummy [9]
	eit_getobs, evt_demo, evt_grid, file_compress [1], file_compress [2]
	file_uncompress [1], file_uncompress [2], first_bcs, first_over, fitstap2tap [1]
	fitstap2tap [2], flares2disk, fort2hxi [1], fort2hxi [2], ftp_copy2sites
	genx_newver [1], genx_newver [2], get_last_tfr, get_sfc_info, get_utevent [1]
	get_utevent [2], goes_plot [1], goes_plot [2], goes_plot [3], goes_plot [4]
	goes_plot [5], gt_day [1], gt_day [2], gt_expdur [1], gt_expdur [2], gt_time [1]
	gt_time [2], gtt_info, hardcopy [1], hardcopy [2], hxt_survey, is_alive [1]
	is_alive [2], jitter_gif_xyimg, lcur_image, mdi_display, mk_mdi_load, mk_pix [1]
	mk_pix [2], mk_sdm, mk_sfc [1], mk_sfc [2], mk_trace_i0, mk_vcr, mk_week_file [1]
	mk_week_file [2], mo_check, mo_init [1], mo_init [2], mo_patch, mo_prep, mod_res
	nobeyama_update, ocontour [1], ocontour [2], ocontour [5], op_pass_sheets [1]
	op_pass_sheets [2], op_same_time [1], op_same_time [2], op_times, pass_sheets
	plot_eit_flux, pointing, pr_visible, pref_super, radial_avg, rd_atodat [1]
	rd_atodat [2], rd_old_obs, rd_tr_seq_head, rd_trace_i0 [1], rd_ydbtap, res_freq
	run_dsnfil, sector_avg, sel_dc_image [1], sel_dc_image [2], sel_dc_image [3]
	set_printer [1], set_printer [2], set_printer [5], sft2sfc, show_contacts
	show_pixf, sonyloop [1], sonyloop [2], soon_search [1], soon_search [3]
	sxt_cen [1], sxt_cen [2], sxt_decon [1], sxt_decon [2], sxt_dn_unc, sxt_eff_area
	sxt_etemp, sxt_flux [1], sxt_flux [2], sxt_flux [3], sxt_interp [1]
	sxt_interp [2], sxt_mwave, sxt_prep [1], sxt_prep [2], sxt_prep [3], sxt_sumtime
	sxt_sumxy, sxt_vignette, sxt_xsaa, tim2dbase, tim2pass, timeavg [1], timeavg [2]
	timeline, topsdb [1], topsdb [2], tr_build_img [1], ut_time [1], ut_time [2]
	video_menu, web_seq, where_change [1], where_change [2], where_pattern [1]
	where_pattern [2], xcheckip, xdisp_fits, xdisp_sci5k, xdisp_tfr, xdisp_trace [1]
	xdisp_trace2, xdisp_trace3, xhkplot, xread_hist, xsearch_obs, xset_chain [1]
	xset_chain [2], xso_butevents [1], xso_butevents [2], xso_search, xspr [1]
	xspr [2], xsw2tree, xsw2tree_event, xswlist [2], xsxt_prep, xsxt_prep_event
	ydb_install [1], ydb_install [2], yoyo_man2, zcurs_ok
   Restrictions:
      if ibwait is less then .15, not all beeps are visible


teambb [1] $SSW/soho/mdi/idl_old/gen/ys_util/teambb.pro
[Previous] [Next]
 NAME:
   teambb
 PURPOSE:
   Display items from the teambb

 CALLS: ***
	ADD, BAN, BREAK_FILE [1], BREAK_FILE [2], BREAK_FILE [3], CDIR, CHECK_TREE, CLEAR
	CLEAR_SCREEN [1], CLEAR_SCREEN [2], ET_TOPIC, ET_TOPIC_NOLIST, INTER_STIR
	MORE [1], MORE [2], MORE_TBB, NEWS, OLD, PRINT_AST, QUIT_TEAM_BB, SCI, SCI_CL, SCI_EA
	SCI_ET, SCI_EV, SCI_SU, SCI_TH, SCI_UW, SETLOG, SET_TREE, SPACE_RETURN, SU_NOLIST
	TBB_HELP, break_file [4], rd_tfile [1], rd_tfile [2], scratch [1], scratch [2]
	str_replace [1], str_replace [2], yesnox [1], yesnox [2]
 Note: needs logical or environment variable DIR_GEN_TBB defined.

 CALLING SEQUENCE:
   teambb
   teambb,'add'	; Access member addresses
   teambb,'sci'	; Access the science menu
 INPUTS:
   command	= The entry top level menu item
 MODIFICATION HISTORY:
   D.M. fecit, 9 December, 1993. Version A.0.3.
   11-dec-93, J. R. Lemen, V A.0.4 Changed to a procedure;
		            write temporary files to user's home directory
   13-dec-93, JRL,  V A.0.5 Changed directory name strategy; Fixed some bugs
   14-dec-93, DMZ,  V A.0.6 Changed DIR_GEN_TBB to $DIR_GEN_TBB
   10-feb-94, JRL,  V A.0.7 Deleted the trailing '\' in inter_stir. Save the
			     entry directory to return there on exiting.  
			     Renamed "more" procedure to more_tbb.
			     Renamed file_list variables to file_list_t
   17-feb-94, JRL,  V A.0.8 Call clear_screen if VMS
   13-oct-94, NN,   V A.0.81 Add 'mi' in the author search
   13-feb-95, JRL,  V A.0.9 Added access to completed items.  Changed code
 			     to use break_file so that items are correctly
			     listed on an VMS system

   28-apr-95, SLF,  	     Add SCI_EV procedure


TEK [2] $SSW/soho/mdi/idl_old/gen/ssw_lib/tek.pro
[Previous] [Next]
 Project     : SOHO - CDS

 Name        : TEK

 Purpose     : Sets graphics device to Tektronix 4010 mode.

 Explanation : SETPLOT is called to save and set the system variables.

 Use         : TEK

 Inputs      : None.

 Opt. Inputs : None.

 Outputs     : A message is printed to the screen.

 Opt. Outputs: None.

 Keywords    : None.

 Calls       : ***
	SETPLOT [1], SETPLOT [2]
 Common      : None.  But calls SETPLOT, which uses common block PLOTFILE.

 Restrictions: It is best if the routines TEK, REGIS, etc. (i.e.  those
		routines that use SETPLOT) are used to change the plotting
		device.

		In general, the SERTS graphics devices routines use the special
		system variables !BCOLOR and !ASPECT.  These system variables
		are defined in the procedure DEVICELIB.  It is suggested that
		the command DEVICELIB be placed in the user's IDL_STARTUP file.

 Side effects: If not the first time this routine is called, then system
		variables that affect plotting are reset to previous values.

 Category    : Utilities, Devices.

 Prev. Hist. : W.T.T., Nov. 1987.

 Written     : William Thompson, GSFC, November 1987.

 Modified    : Version 1, William Thompson, 27 April 1993.
			Renamed to TEK, and incorporated into CDS library.

 Version     : Version 1, 27 April 1993.


TEK4105 [2] $SSW/soho/mdi/idl_old/gen/ssw_lib/tek4105.pro
[Previous] [Next]
 Project     : SOHO - CDS

 Name        : TEK4105

 Purpose     : Sets the graphics device for Tektronix 4105 terminals.

 Explanation : SETPLOT is called to save and set the system variables.  Then
		DEVICE is called to enable TEK4100 mode with 8 colors.

 Use         : TEK4105

 Inputs      : None.

 Opt. Inputs : None.

 Outputs     : A message is printed to the screen.

 Opt. Outputs: None.

 Keywords    : None.

 Calls       : ***
	SETPLOT [1], SETPLOT [2]
 Common      : None.  But calls SETPLOT, which uses common block PLOTFILE.

 Restrictions: It is best if the routines TEK, REGIS, etc. (i.e.  those
		routines that use SETPLOT) are used to change the plotting
		device.

		In general, the SERTS graphics devices routines use the special
		system variables !BCOLOR and !ASPECT.  These system variables
		are defined in the procedure DEVICELIB.  It is suggested that
		the command DEVICELIB be placed in the user's IDL_STARTUP file.

 Side effects: If not the first time this routine is called, then system
		variables that affect plotting are reset to previous values.

 Category    : Utilities, Devices.

 Prev. Hist. : W.T.T., Nov. 1987.
		W.T.T., Mar. 1991, split TEK into TEK4105 and TEK4211.

 Written     : William Thompson, GSFC, November 1987.

 Modified    : Version 1, William Thompson, GSFC, 27 April 1993.
			Incorporated into CDS library.

 Version     : Version 1, 27 April 1993.


TEK4211 [2] $SSW/soho/mdi/idl_old/gen/ssw_lib/tek4211.pro
[Previous] [Next]
 Project     : SOHO - CDS

 Name        : TEK4211

 Purpose     : Sets graphics device for Tektronix 4211 color terminal.

 Explanation : SETPLOT is called to save and set the system variables.  Then
		DEVICE is called to enable TEK4100 mode with 64 colors.

 Use         : TEK4211

 Inputs      : None.

 Opt. Inputs : None.

 Outputs     : A message is printed to the screen.

 Opt. Outputs: None.

 Keywords    : None.

 Calls       : ***
	SETPLOT [1], SETPLOT [2]
 Common      : None.  But calls SETPLOT, which uses common block PLOTFILE.

 Restrictions: It is best if the routines TEK, REGIS, etc. (i.e.  those
		routines that use SETPLOT) are used to change the plotting
		device.

		In general, the SERTS graphics devices routines use the special
		system variables !BCOLOR and !ASPECT.  These system variables
		are defined in the procedure DEVICELIB.  It is suggested that
		the command DEVICELIB be placed in the user's IDL_STARTUP file.

 Side effects: If not the first time this routine is called, then system
		variables that affect plotting are reset to previous values.

 Category    : Utilities, Device.

 Prev. Hist. : W.T.T., Nov. 1987.
		W.T.T., Mar. 1991, split TEK into TEK4105 and TEK4211.

 Written     : William Thompson, GSFC, November 1987.

 Modified    : Version 1, William Thompson, GSFC, 27 April 1993.
			Incorporated into CDS library.

 Version     : Version 1, 27 April 1993.


TEKMONO [2] $SSW/soho/mdi/idl_old/gen/ssw_lib/tekmono.pro
[Previous] [Next]
 Project     : SOHO - CDS

 Name        : TEKMONO

 Purpose     : Sets graphics device for Tek 4100+ terminals, mono mode.

 Explanation : SETPLOT is called to save and set the system variables.  Then
		DEVICE is called to enable TEK4100 mode with 2 colors (black
		and white).

 Use         : TEKMONO

 Inputs      : None.

 Opt. Inputs : None.

 Outputs     : A message is printed to the screen.

 Opt. Outputs: None.

 Keywords    : None.

 Calls       : ***
	SETPLOT [1], SETPLOT [2]
 Common      : None.  But calls SETPLOT, which uses common block PLOTFILE.

 Restrictions: It is best if the routines TEK, REGIS, etc. (i.e.  those
		routines that use SETPLOT) are used to change the plotting
		device.

		In general, the SERTS graphics devices routines use the special
		system variables !BCOLOR and !ASPECT.  These system variables
		are defined in the procedure DEVICELIB.  It is suggested that
		the command DEVICELIB be placed in the user's IDL_STARTUP file.

 Side effects: If not the first time this routine is called, then system
		variables that affect plotting are reset to previous values.

 Category    : Utilities, Devices.

 Prev. Hist. : W.T.T., Nov. 1987.
		W.T.T., Mar. 1991, split TEK into TEKMONO and TEK4211.

 Written     : William Thompson, GSFC, November 1987.

 Modified    : Version 1, William Thompson, GSFC, 27 April 1993.
			Incorporated into CDS library.

 Version     : Version 1, 27 April 1993.


TELESCOPE_POINTING $SSW/soho/lasco/idl/data_anal/telescope_pointing.pro
[Previous] [Next]
 NAME:
	TELESCOPE_POINTING

 PURPOSE:
	This function returns the telescope pointing information for SUNDIST.

 CATEGORY:
	LASCO DATA_ANAL

 CALLING SEQUENCE:
	Result = TELESCOPE_POINTING (Hdr)

 INPUTS:
	Hdr:	The image header as a LASCO header structure.

 OUTPUTS:
	This function returns a 4 element floating point array of the
	telescope pointing information:
	word 1:	 column coordinates of the center of the sun
	word 2:  row coordinates of the center of the sun
	word 3:  roll angle to solar north, in degrees, measured westward
	word 4:  size of the solar radius in pixels

 CALLS: ***
	DATATYPE [1], DATATYPE [2], DATATYPE [3], FXPAR [1], FXPAR [2], GET_SEC_PIXEL
	GET_SOLAR_RADIUS, GET_SOLAR_ROLL, GET_SUN_CENTER [1], GET_SUN_CENTER [2]
	GET_SUN_CENTER [3], LASCO_FITSHDR2STRUCT, MLO_FITSHDR2STRUCT
 CALLED BY:
	CALC_CME_MASS
 SIDE EFFECTS:
	Calls GET_SUN_CENTER, GET_SEC_PIXEL, GET_SOLAR_RADIUS, GET_SOLAR_ROLL

 PROCEDURE:
	The SUNDIST procedure needs the pointing information to be supplied
	in an array.

 EXAMPLE:
	Return the pointing information for the image pointed to by header.

		Coords = TELESCOPE_POINTING(Hdr)

 MODIFICATION HISTORY:
 	Written by:	RA Howard, 30 Apr 1997
	Mods to accept MLO headers

	@(#)telescope_pointing.pro	1.3 08/28/98 LASCO IDL LIBRARY


TEXT_ANOMALY $SSW/soho/gen/idl/util/text_anomaly.pro
[Previous] [Next]
 PROJECT:
       SOHO - CDS/SUMER

 NAME:
       TEXT_ANOMALY()

 PURPOSE: 
       Convert the contents of an anomaly structure into an ascii array

 CATEGORY:
       SOHO Anomaly report
 
 SYNTAX: 
       Result = text_anomaly(anomaly)

 INPUTS:
       ANOMALY - Anomaly structure

 OPTIONAL INPUTS: 
       None.

 OUTPUTS:
       RESULT - String array, containing contents of an anomaly
                report entry

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS: 
       ALL   - Set this keyword to get all tags even when their
               values are empty

 CALLS: ***
	ANYTIM2UTC [1], ANYTIM2UTC [2], DATATYPE [1], DATATYPE [2], DATATYPE [3]
	STR2LINES
 CALLED BY:
	XREPORT, XREPORT_EDIT
 COMMON:
       None.

 RESTRICTIONS: 
       None.

 SIDE EFFECTS:
       None.

 HISTORY:
       Version 1, January 25, 1996, Liyun Wang, GSFC/ARC. Written

 CONTACT:
       Liyun Wang, GSFC/ARC (Liyun.Wang.1@gsfc.nasa.gov)


TEXTARRAY $SSW/soho/lasco/idl/display/textarray.pro
[Previous] [Next]
 NAME:  
	TEXTARRAY

 PURPOSE:
	To create a two dimensional array containing 
	text in vector font.

 CATEGORY:
	PICO

 CALLING SEQUENCE:
	result=TEXTARRAY(text)

 INPUTS:
	text:  A string containing the text

 OPTIONAL INPUTS:
	None

 KEYWORD PARAMETERS:
	CHARSIZE, CHARTHICK: Normal signification
		as for other graphical output
	COLOR:  The color index to be used.
		Default: 255

 OUTPUTS:
	result: a two dimensional array. The background
		is 0 whereas the text is written in 
		the specified color. The textarray
		can be inserted in an image using 
		PUT_TEXT.

 OPTIONAL OUTPUTS:
	None

 CALLED BY:
	LAYOUT
 COMMON BLOCKS:
	None

 SIDE EFFECTS:
	Unknown

 RESTRICTIONS:
	None

 PROCEDURE:
	Straightforward

 MODIFICATION HISTORY:
	V1.0 Alexander Epple, Pic Du Midi, 15-OCT-1995
	Jun-2000, B. Podlipnik - Add BOLD, XP, YP keywords


TEXTCLOSE [3] $SSW/soho/mdi/idl_old/gen/ssw_lib/textclose.pro
[Previous] [Next]
 Project     :	SOHO - CDS

 Name        :	
	TEXTCLOSE                   
 Purpose     :	
	Closes file specified by !TEXTOUT.  Used by ASTRON routines.
 Explanation :	
	Procedure to close file for text output as specifed
	by the (non-standard) system variable !TEXTOUT. 

 Use         :	
	textclose, [ TEXTOUT = ]

 Inputs      :	None.

 Opt. Inputs :	None.

 Outputs     :	None.

 Opt. Outputs:	None.

 Keywords    :	
	textout - Indicates output device that was used by
		TEXTOPEN

 Calls       :	None.
 CALLED BY:
	DBCOMPARE [1], DBCOMPARE [2], DBHELP [1], DBHELP [2], DBHELP [3], DBPRINT [1]
	DBPRINT [2], DBPRINT [3], FITSDIR, FITS_INFO [1], FITS_INFO [2], FORPRINT, FTAB_HELP
	FTHELP, FTPRINT, IMLIST, IRAFDIR, PCA, TABLE_HELP, TABLE_LIST, TABLE_PRINT [1]
	TAB_PRINT, TBHELP, TBPRINT, UVBYBETA, table_print [2]
 Common      :	None.

 Restrictions:	None.

 Side effects:	
	if !textout is not equal to 5 and the textunit is
	opened.   Then unit !textunit is closed and released

 Category    :	Utilities, User_interface

 Prev. Hist. :	
	D. Lindler  Dec. 1986  (Replaces PRTOPEN)
	Test if TEXTOUT is a scalar string   W. Landsman   August 1993

 Written     :	D. Lindler, GSFC/HRS, December 1986

 Modified    :	Version 1, William Thompson, GSFC, 30 March 1994
			Incorporated into CDS library

 Version     :	Version 1, 30 March 1994


TEXTOPEN [3] $SSW/soho/mdi/idl_old/gen/ssw_lib/textopen.pro
[Previous] [Next]
 Project     :	SOHO - CDS

 Name        :	
	TEXTOPEN
 Purpose     :	
	Opens file for text output.
 Explanation :	
	Procedure to open file for text output.   The type of output 
	device (disk file or terminal screen) is specified by the 
	TEXTOUT keyword or the (nonstandard) system variable !TEXTOUT.

 Use         :	
	textopen, program, [ TEXTOUT = ]

 Inputs      :	
	program - scalar string giving name of program calling textopen

 Opt. Inputs :	None.

 Outputs     :	
	The following dev/file is opened for output.

		textout=0 	Nowhere
		textout=1	TERMINAL using /more option
		textout=2	TERMINAL without /more option
		textout=3	<program>.prt
		textout=4	laser.tmp
		textout=5      user must open file
		textout = filename (default extension of .prt)

	The unit it is opened to is obtained with the procedure GET_LUN
	unless !TEXTOUT=5.  The unit number is placed in system variable 
	!TEXTUNIT.  For !TEXTOUT=5 the user must set !TEXTUNIT to the 
	appropriate unit number.

 Opt. Outputs:	None.

 Keywords    :	
	TEXTOUT - Integer scalar (0-6) specifying output file/device to be 
		opened (see below) or scalar string giving name of output file.
		If TEXTOUT is not supplied, then the (non-standard) system 
		variable !TEXTOUT is used.

 Calls       : ***
	FILEPATH
 CALLED BY:
	DBCOMPARE [1], DBCOMPARE [2], DBHELP [1], DBHELP [2], DBHELP [3], DBPRINT [1]
	DBPRINT [2], DBPRINT [3], FITSDIR, FITS_INFO [1], FITS_INFO [2], FORPRINT, FTAB_HELP
	FTHELP, FTPRINT, IMLIST, IRAFDIR, PCA, TABLE_HELP, TABLE_LIST, TAB_PRINT, TBHELP, TBPRINT
	UVBYBETA
 Common      :	None.

 Restrictions:	
	Uses the following non-standard system variables:

		DEFSYSV,'!TEXTOUT',1
		DEFSYSV,'!TEXTUNIT',0

 Side effects:	
	Note that TEXTOUT = 1 or TEXTOUT = 2 will open a unit to the terminal,
	SYS$OUTPUT (VMS) or /dev/tty (Unix).     However, this terminal 
	output will *not* appear in an IDL JOURNAL session, unlike text
	printed with the PRINT command.	

 Category    :	Utilities, User_interface.

 Prev. Hist. :	
	D. Lindler  Dec. 1986  
	Keyword textout added, J. Isensee, July, 1990
	Made transportable, D. Neill, April, 1991
	Trim input PROGRAM string W. Landsman  Feb 1993
	Don't modify TEXTOUT value   W. Landsman   Aug 1993

 Written     :	D. Lindler, GSFC/HRS, December 1986

 Modified    :	Version 1, William Thompson, GSFC, 30 March 1994
			Incorporated into CDS library

 Version     :	Version 1, 30 March 1994


tfr_decom $SSW/soho/mdi/idl/egse/tfr_decom.pro
[Previous] [Next]
NAME:
	tfr_decom
PURPOSE:
	To decompress a single telemetry frame
SAMPLE CALLING SEQUENCE:
	decom_rec = tfr_decom(rec)
COMMENTS:
	idl_speed & read_mdi,'/md54/mdisw_idl_guide/940422_035054',1,img,h  & idl_speed,1
 CALLS: ***
	CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], concat_dir [4], get_host [1]
	get_host [2]
 CALLED BY:
	mdifocus2, rdtfr, tfr_summary, tfr_summary2
HISTORY:
	Written Apr-94 by M.Morrison & R.Chevalier
	31-Mar-95 (MDM) - Added a new option to use CALL_EXTERNAL
			  for MDI SGI machines.  The old method is
			  still available which uses a pipe with STDIO
			  which is much slower
	 3-Apr-95 (MDM) - Added umbra to the machines that can use
			  CALL_EXTERNAL
	 6-Apr-95 (MDM) - Expanded to work with Ultrix machines
	19-Jun-95 (MDM) - Removed using CALL_EXTERNAL for mdisas
			- Added ON_IOERROR logic to trap on problems
	28-Feb-96 (MDM) - Removed using CALL_EXTERNAL for umbra (now nobody
			  uses it)
	 3-Sep-96 (MDM) - Added protection againgst TFR_DECOM crashing
			  and causing IDL to exit.


tfr_summary $SSW/soho/mdi/idl/egse/tfr_summary.pro
[Previous] [Next]
NAME:
	tfr_summary
SAMPLE CALLING SEQUENCE:
	tfr_summary, file_list('/md66/log/sci160k','950329_000458*.tfr', /bydate)
	tfr_summary, file_list('/md66/log/sci160k','*.tfr', /bydate)
 CALLS: ***
	BREAK_FILE [1], BREAK_FILE [2], BREAK_FILE [3], FILE_EXIST [2], anytim2ints [1]
	anytim2ints [2], break_file [4], data_type [1], data_type [2], dec2sun [1]
	dec2sun [2], file_exist [1], file_exist [3], fmt_tim [1], fmt_tim [2], list_tfi
	read_mdi, tfr_decom
HISTORY:
	Written 3-Apr-95 by M.Morrison


tfr_summary2 $SSW/soho/mdi/idl/egse/tfr_summary2.pro
[Previous] [Next]
NAME:
	tfr_summary2
PURPOSE:
	To display information on a per-image basis for a tfr file.
SAMPLE CALLING SEQUENCE:
	tfr_summary2, file_list('/md65/log/sci160k','950921_222120*.tfr')
	tfr_summary2, file_list('/md65/log/sci160k','95092*.tfr', /bydate)
 CALLS: ***
	BREAK_FILE [1], BREAK_FILE [2], BREAK_FILE [3], FILE_EXIST [2], STDEV
	anytim2ints [1], anytim2ints [2], break_file [4], data_type [1], data_type [2]
	dec2sun [1], dec2sun [2], file_exist [1], file_exist [3], fmt_tim [1], fmt_tim [2]
	list_tfi, read_mdi, tfr_decom
HISTORY:
	Written 25-Sep-95 by M.Morrison


three_moment $SSW/soho/cds/idl/sci/data_anal/ql/line_fit/three_moment.pro
[Previous] [Next]
 Project     : SOHO - CDS     
                   
 Name        : three_moment
               
 Purpose     : calculate 3-moment of line profile
               
 Explanation : 3-moment calculated using simpson intergration
               
 Use         : IDL> three_moment, x-array, y-array, dispersion,
                    max. intensity, line shift, line width   
    
 Inputs      : x-array, y-array, dispersion
               
 Opt. Inputs : None
               
 Outputs     : intensity, shift, width 
               
 Opt. Outputs: None
               
 Keywords    : None

 Calls       : ***
	simpson_a
 CALLED BY:
	hrts_w [1], hrts_w [2]
 Common      : None
               
 Restrictions: None
               
 Side effects: None
               
 Category    : ?
               
 Prev. Hist. : ?

 Written     : Olav Kjeldseth-Moe, ITA, UiO
               
 Modified    : Version 1 Nils Brynildsen, ITA, UiO, 1-July-1993

 Version     : Version 1 1-July-1993


threeg_afit $SSW/soho/cds/idl/sci/data_anal/ql/line_fit/threeg_afit.pro
[Previous] [Next]
 NAME:
 CALLS:


TILT_NIS1_DEMO $SSW/soho/cds/idl/sci/engineering/tilt_nis1_demo.pro
[Previous] [Next]
 Project     : SOHO - CDS     
                   
 Name        : TILT_NIS1_DEMO
               
 Purpose     : Demonstrate variation of NIS1 spectral line tilt.
               
 Explanation : The spectral lines in NIS1 are tilted with respect to the 
               dispersion direction.  This tilt is a function of wavelength
               (or equivalently spectral bin) as shown in this plot.
               Note that the sign convention is such that spectral lines at
               the bottom (south) of the slit are moved to larger bin numbers.

 Use         : IDL> tilt_nis1_demo
    
 Inputs      : None
               
 Opt. Inputs : None
               
 Outputs     : None
               
 Opt. Outputs: None
               
 Keywords    : None

 Calls       : ***
	CDS_PLOT_ERR, CIRCLE_SYM, FIND_WITH_DEF [1], FIND_WITH_DEF [2]
	FIND_WITH_DEF [3], LINECOLOR, OPLOT_ERR, POLYFITW, POLY_FIT
 Common      : None
               
 Restrictions: None
               
 Side effects: None
               
 Category    : Calibration
               
 Prev. Hist. : None

 Written     : C D Pike, RAL, 12-Nov-96
               
 Modified    : Version 2, 2-Jul-1998, William Thompson, GSFC
			Brought up-to-date with latest data

 Version     : Version 2, 2-Jul-1998


TILT_NIS2_DEMO $SSW/soho/cds/idl/sci/engineering/tilt_nis2_demo.pro
[Previous] [Next]
 Project     : SOHO - CDS     
                   
 Name        : TILT_NIS2_DEMO
               
 Purpose     : Demonstrate variation of NIS2 spectral line tilt.
               
 Explanation : The spectral lines in NIS2 are tilted with respect to the 
               dispersion direction.  This tilt is a function of wavelength
               (or equivalently spectral bin) as shown in this plot. Note 
               that the convention is that the spectral line at the bottom
               (south) of the slit is shifted towards larger bin numbers.
               Note also that the data are fitted with a quadratic mainly
               because the values at bins ~990 are well defined from other
               observations and would be inconsistent with a linear fit
               through the data.
               
 Use         : IDL> tilt_nis2_demo
    
 Inputs      : None
               
 Opt. Inputs : None
               
 Outputs     : None
               
 Opt. Outputs: None
               
 Keywords    : None

 Calls       : ***
	CDS_PLOT_ERR, CIRCLE_SYM, FIND_WITH_DEF [1], FIND_WITH_DEF [2]
	FIND_WITH_DEF [3], LINECOLOR, OPLOT_ERR, POLYFITW, POLY_FIT
 Common      : None
               
 Restrictions: None
               
 Side effects: None
               
 Category    : Calibration
               
 Prev. Hist. : None

 Written     : C D Pike, RAL, 12-Nov-96
               
 Modified    : Version 2, 2-Jul-1998, William Thompson, GSFC
			Brought up-to-date with latest data

 Version     : Version 2, 2-Jul-1998


tim2dset [2] $SSW/soho/mdi/idl_old/gen/ys_util/tim2dset.pro
[Previous] [Next]
NAME:
	tim2dset
PURPOSE:
	Given a structure (roadmap or index), find the dataset with
	the time closest to an input time.
CALLING SEQUENCE:
	xx = tim2dset(roadmap, tarr)
	xx = tim2dset(roadmap, '12:33 5-Nov-91',delta_sec=delta_sec)
	print, tim2set(roadmap)
INPUT:
	struct	- The roadmap or index structure to search
	tim_in	- The reference time to search the dataset for.
		  Form can be (1) structure with a .time and .day
		  field, (2) the standard 7-element external representation
		  or (3) a string of the format "hh:mm dd-mmm-yy"
		- If no input is passed, the user is prompted for the
		  time to use
OPTIONAL OUTPUT KEWORDS:
	delta_sec - Absolute value of the time difference in secs.
	offset	- The time difference in seconds
 CALLS: ***
	Int2Ex [1], Int2Ex [2], anytim2ints [1], anytim2ints [2], gt_day [1], gt_day [2]
	gt_time [1], gt_time [2], input [1], input [2], int2secarr [1], int2secarr [2]
 CALLED BY:
	ACRIM_READER, ALIGN_AR, ANAL_STIMS, CHECK_SFC_PNT, ECL_FRAC, GET_SUNCENTER [1]
	GET_SUNCENTER [2], GET_TRANGE, Goes_bck0, HELIO_FOOT, HXA2HEL, HXA_SUNC, HXA_SUNC2
	HXA_SUNCENTER, HXTPIXON, HXT_QLOOK, IRUHXASCAN2SXT [1], IRUHXASCAN2SXT [2]
	PFI_CENT, PR_PATROLS, QUICKDARK [2], QUICKLIMB [1], QUICKLIMB [2], RD_AR, SFD_PHOT
	TERM_FIDS, TERM_QUICK, TERM_REVIEW, TERM_REVIEW_GIF, TIM2UPOS, TRACE_SSWHERE [1]
	WBS_DB, WBS_DB2, XMOVIE_SFM, ada2str, ads_into_att, ads_into_pnt
	check_oldprocess [1], check_oldprocess [2], check_oldprocess [3]
	check_oldprocess [4], choose_pairs, disp_sci5k, eit_files, get_ads [1], get_atr
	get_att, get_gevloc_data, get_mk3 [1], get_mk3 [2], get_pnt, get_sfm
	get_solar_indices, get_suncenter2, get_sxa, go_lasdisk golaserdisk
	go_lasdisk2 golaserdisk, go_nvs5, goes_log, grid_data [1], grid_data [2]
	hkplot_info, hxtaccumulate, iperr_sea, kluge_att, lapalma_files, lastsfd [1]
	lastsfd [2], les_archive_info, match_index [1], match_index [2], mdi_files
	mk_coal_movie, mk_obs_str, mk_pnt, mk_sd2, mk_sdc [2], mk_sdc [3], mk_sdc [4], mk_sdm
	mk_sfc [1], mk_sfc [2], mk_sff_pair [1], mk_sff_pair [2], mk_ssc [1], mk_ssc [2]
	new_disp_sci5k [1], new_disp_sci5k [2], op_term_score, pfi_loc, plot_fov [1]
	rd_sxtgoes, rd_xda_same, read_genxcat, ref_term [2], reget_dc_image, sft2sfc
	show_contacts, ssc_files [1], ssc_files [2], ssc_files [3], ssc_scan2
	ssw_build_trace, ssw_fov_context, ssw_fs_cat2db, ssw_timestat, ssw_track_fov
	sswdb_files, sxi_files, sxl2radiance, sxl_select, sxt_adjacent_image, sxt_chk_era
	sxt_his2dbase, sxt_mornint, sxt_patch_att, sxt_prep [1], sxt_prep [2]
	sxt_prep [3], tim2orbit [1], tim2orbit [2], tim2tfss, trace_files, trace_isorbevt
	trace_orbevt, trace_sswhere [2], trace_sswhere [3], trace_sswhere [4]
	wrt_fits_bin_exten [2], xspr [1], xspr [2], yohkoh_legacy_files [1]
	yohkoh_legacy_files [2]
HISTORY:
	Written Oct-91 by M.Morrison
	20-apr-92, J.R. Lemen, Speeded up the alogorithm.
	2-May-92 (MDM) Removed call to make_str - hardwired
			the structure name
	20-may-92, JRL, Added the delta_sec keyword
	 9-Jun-92, MDM, Removed code and used ANYTIM2INTS
	27-Jul-92, MDM, Return a scalar if there is only one element
	 9-Mar-93, MDM, Made the FOR loop an integer*4 value
	20-Jul-93, MDM, Added OFFSET option
	11-Jan-94, MDM, Updated document header


tim2file [1] $SSW/soho/mdi/idl_old/gen/ys_util/tim2file.pro
[Previous] [Next]
Name:
       tim2file
Purpose:
       Given a time (or array of times) return the file that
	the data should be in.
Input:
       tim_in - Can be a structure with the .TIME and .DAY
                fields
                       (OR)
                The "standard" 7 element external representation
                of time (HH,MM,SS,MSEC,DD,MM,YY)
Optional Input:
	keyfile	- The file prefix to use for the directory search
		  If not present, it uses ADA.
	dirs	- An array of the directories to search.  If not
		  present, it calls "DATA_PATH".
		  The path does NOT include a trailing '/'
	qstop	- Stop at the bottom of the program for debuggin
		  purposes.
Output:
       Returns the whole data path to the file in question

	dir_out	- An array of the directory path.  The path
		  DOES include a trailing '/'
	fileid	- An array of only the fileIDs
Method:
	Perform a directory listing (with FINDFILE) on all of
	the directories, sort, and find where the input time
	falls.

	TODO - Later?
	What it should do is look at the observing log and
	get a list of FileIDs

       day_str - Optional) just the date part of the string
       time_str - (Optional) just the time part of the string
 CALLS: ***
	BREAK_FILE [1], BREAK_FILE [2], BREAK_FILE [3], DATA_PATHS, Int2Ex [1], Int2Ex [2]
	break_file [4]
 CALLED BY:
	chk_flares [1], chk_flares [2]
History:
       19-Oct-91 by M.Morrison


tim2intstr [1] $SSW/soho/mdi/idl_old/gen/ys_util/tim2intstr.pro
[Previous] [Next]
   Name: tim2intstr 

   Purpose: convert ext/int to standard yohkoh structure
				         {xx,Time:0l,Day:0} 

   Input Parameters:
      time0 - external time if one parameter, msod if two parameters
      time1 - days since 1/1/79

 CALLS: ***
	Ex2Int [1], Ex2Int [2], MAKE_STR [1], MAKE_STR [2]
   History: slf, 17-Apr-1992


TIM2JD [2] $SSW/soho/mdi/idl_old/gen/jhuapl/tim2jd.pro
[Previous] [Next]
 NAME:
       TIM2JD
 PURPOSE:
       Compute Julian day number from item.
 CATEGORY:
 CALLING SEQUENCE:
       jd = tim2jd(item)
 INPUTS:
 KEYWORD PARAMETERS:
 OUTPUTS:
       jd = Julian Day number (like 2447000).   out
 CALLS: ***
	anytim2ex [1], anytim2ex [2], anytim2ints [1], anytim2ints [2], gt_time [1]
	gt_time [2]
 CALLED BY:
	GET_SUN [1], GET_SUN [2], JD2EX, get_zenang
 COMMON BLOCKS:
 NOTES:
 MODIFICATION HISTORY:
       R. Sterner,  23 June, 1985 --- converted from FORTRAN.
       Johns Hopkins University Applied Physics Laboratory.
       RES 18 Sep, 1989 --- converted to SUN

 Copyright (C) 1985, Johns Hopkins University/Applied Physics Laboratory
 This software may be used, copied, or redistributed as long as it is not
 sold and this copyright notice is reproduced on each copy made.  This
 routine is provided as is without any express or implied warranties
 whatsoever.  Other limitations apply as described in the file disclaimer.txt.


tim2match [2] $SSW/soho/mdi/idl_old/gen/ys_util/tim2match.pro
[Previous] [Next]
NAME:
	tim2match
PURPOSE:
	Give an array of reference times, determine if the input times fall
	within any of the time ranges
SAMPLE CALLING SEQUENCE:
	out = tim2match(evn, gev)			;uses GOES start
	out = tim2match(evn, gev, /entim_dur)		;uses GOES time span
	out = tim2match(evn, gev, /peak)		;uses GOES peak time
	ii = where(tim2match(sttim, gev, entim_ref=entim) gt 0)	;subscript of GEV where match
INPUT:
	sttim_ref	- 



sttim_ref/entim_ref:    ...........xxxxxxxxxxxxx...........
sttim_input:            ......x............................  0000 = 0
			 ..................x................  0001 = 1
sttim_input/entim_input:...xxx.............................  0000 = 0
			 ................xxxx...............  0011 = 3
			 ...............xxxxxxxxxxxxxxx.....  0001 = 1
			 ......xxxxxxxxxxxxx................  0010 = 2
			 ......xxxxxxxxxxxxxxxxxxxxxxxx.....  0100 = 4

Special cases:
 CALLS:
 CALLED BY
	gtt_orbit, obs_summary, soon_search [1], soon_search [3]


tim2orbit [1] $SSW/soho/mdi/idl_old/gen/ys_util/tim2orbit.pro
[Previous] [Next]
NAME:
	tim2orbit
PURPOSE:
	Given a time, find the orbit for which that time falls within.
CALLING SEQUENCE:
	tim2orbit, roadmap, fid=fid
	tim2orbit, roadmap, wid=wid
	tim2orbit, '1-apr-92 2:22', fid=fid, wid=wid, tim2fms=tim2fms, orbit=orbit
	tim2orbit, index, fem=fem
INPUT:
	tim_in	- The reference time to search the orbit for.
		  Form can be (1) structure with a .time and .day
		  field, (2) the standard 7-element external representation
		  or (3) a string of the format "hh:mm dd-mmm-yy"
 CALLS: ***
	CHECK_TIME, anytim2ints [1], anytim2ints [2], fmt_tim [1], fmt_tim [2]
	gt_time [1], gt_time [2], int2secarr [1], int2secarr [2], rd_fem, tim2dset [1]
	tim2dset [2]
 CALLED BY:
	BCS_CAT, GET_SUBARR2, GET_TRACUBE, HXAXY2SXT, HXT_AUTOIMG, MK_SSX, SXT2HXAXY
	ads_into_att, ads_into_pnt, adsdirs [1], adsdirs [2], atr2hxa_dbase, att_exst
	chk_pointing, daily_forecast [2], dark_orbit, delete_week [1], delete_week [2]
	find_dbo_dir, gen_file_id [1], gen_file_id [2], get_afile_size [1]
	get_afile_size [2], get_atr, get_att, get_info [3], get_pnt, get_sfc_info
	get_suncenter2, get_sxa, getwid, lastsfd [1], lastsfd [2], mk_att [1], mk_att [2]
	mk_orbit [1], mk_orbit [2], mk_pnt, mk_sdmi, mk_sdp, mk_sfc [1], mk_sfc [2]
	mk_sfd [1], mk_sfd [2], mk_sfd [3], mk_sfd [4], mk_sff_pair [1], mk_sff_pair [2]
	mk_sfs, mk_sft [1], mk_sft [2], mk_sfw, mk_sl [1], mk_sl [2], mk_sot, mk_spd
	mk_week_file [1], mk_week_file [2], mo_check, op_term_score, op_terminator [1]
	op_terminator [2], pnt_exst, pr_evn [2], pr_sxt_term, rd_week_file [2], saa_in [1]
	saa_in [2], sxt_clean [1], sxt_clean [2], sxt_uvf_info [1], sxt_uvf_info [3]
	term_obs, tim2tfss, trace_goodobs, weekid [2], wl_process, ydb_exist [1]
	ydb_exist [2], ydb_exist [3], ydb_exist [4], yoyo_man2
OPTIONAL KEYWORD INPUT:
	print	- If set, print out a summary of the conditions to the screen
	simple	- If set, just calculate the "tim2fms" and "tim2night"
	nowid	- If set, calculate everything except the WID (takes a while)
KEYWORD OUTPUT:
	fid	- a string array with the file ID for the input times
	wid	- a string array with the week ID for the input times
	tim2fms	- a floating point array with the number of minutes from
		  the first minute of sun (FMS) that the dataset exists for
	tim2night- a floating point array with the number of minutes before
		  S/C night starts
	orbit	- an integer array with the orbit number (approximately the
		  revolution number)
	scday	- a boolean array set true if the input time happens during
		  S/C day
	saa	- a boolean array set true if the input time happens in the
		  middle of a SAA passage.
	fem	- The FEM structures for the time range covered by the input
		  times (It is NOT the full FEM structure for the orbit for 
		  EACH INPUT TIME as it was originally)
HISTORY:
	Written 25-May-92 by M.Morrison
	30-May-92 (MDM) - Added "scday" and "saa"
	 8-Jun-92 (MDM) - Added "print" option
	 9-Jun-92 (MDM) - Added "tim2night" option
	17-Jul-92 (MDM) - Corrected an error in weekID generation 
			  (string formats)
	19-Aug-92 (MDM) - Fixed a problem with WeekID generation.  IDL trunactes
			  at 256 (or 128) lines when using command "string(array)"
	15-Sep-92 (MDM) - Fixed problem with WeekID generation.  Since the user
			  might only specify HH:MM, and the FEM resolution is 
			  better than 1 second, the WeekID (and FileID for that
			  matter) might be off.  The fix is to add 59 seconds to
			  the input time when the seconds/milliseconds is zero.
			  (User could ask for 1-SEP-91 03:03 (FID 910901.0303) and
			  it would give FID 910901.0126 because the true orbit
			  start time is 03:03:45).  The 59 seconds is only added
			  if ALL input times have seconds and milliseconds = 0.
	23-Feb-93 (MDM) - Added case where the information of the SAA time is in
			  the prior orbit record.  For example:
				   SSSSSSSS
				NNNNNNNDDDDDDDD
				        ^	- time of interest
	 9-Apr-93 (MDM) - Changed call to RD_FEM to use /FULL_WEEKS
	29-Apr-93 (MDM) - Modification to handle bad input times
	24-May-93 (MDM) - Modified to make the for loop variable integer*4
	20-Jun-93 (MDM) - Changed the definition of the FEM output.  It used to be
			  a FEM structure for each input time, now it is only a
			  single FEM structure for each orbit for the range of 
			  input times.
	20-Jul-93 (MDM) - Changed logic considerably (removed for loops) 
			  which sped things up
			- Added /SIMPLE and /NOWID options
	18-Feb-94 (MDM) - Corrected header information


TIME_CORRECTION $SSW/soho/lasco/idl/data_anal/time_correction.pro
[Previous] [Next]
 Name:
    TIME_CORRECTION

 Purpose:
    To return the OBE - LOBT time difference that is equal to or right before the
    the input obe-time from the values in TIME_DIFFERENCE_DB.

 Input Parameters:
    OBE_TIME           -       An input obe_time for which the time offset is to be obtained.

 Output:
    DELTA_ERROR        -       A two element string array.

 RETURN VALUE:
    DT                 -       A two element long array containing the time offset as
                               delta_mjd and delta_ms.

 Keywords:
    CORRECTION_STRING	-	Used to return an ASCII string with the
				time difference.
    VERBOSE            -       If set, print out time selection info.

 Calling Sequence:
    dt = TIME_CORRECTION(obe_time, delta_error, CORRECTION_STRING = CORRECTION_STRING, /VERBOSE)
 
 CALLS: ***
	ANYTIM2UTC [1], ANYTIM2UTC [2], CONVERT_TIME, FILEPATH, MODIFIED_BINARY_SEARCH
	TAI2UTC, UTC2STR, UTC2TAI, WORD_SWAP
 Restrictions:
    If large jumps in the difference occur between realtime contacts, this
	routine could return inaccurate values.

 History:
    1997 April 17  - D.M. fecit.
    1997 August 27 - Added CORRECTION_STRING keyword		D.M. fecit.
    1999 Feb 7     - Added binary search and indexing to speed finding
                     the right record, created unix version for Solaris -  DW
    2002 Jul 10    - Added DELTA_ERROR parameter                        -  Ed Esfandiari
    2002 Jul 10    - Also added a true binary search                    -  Ed Esfandiari
    2003 Mar 11    - Add REDUCE_HISTORY common block; 
			change datafile calls; delta_error=N/A for c2_offsets - NRich
    2004 Sep 15 - Change OS_version check to 'endian-ness' check, since
			not all unix platforns are necessarily big-endian - GR Lawrence

 @(#)time_correction.pro	1.4, 10/03/05  NRL IDL LIBRARY


time_vec [1] $SSW/soho/mdi/idl_old/gen/ys_util/time_vec.pro
[Previous] [Next]
NAME:
	time_vec
PURPOSE:
	Given a time vector (in the form of "days since
	1979" and "millisec of day" and a rate, and a
	number of repeats within a major frame, return
	a single time vector (in units of minutes from
	the first time)
	
	It is used to plot parameters where there is
	more than value in a major frame (since there
	is only one time returned for each major frame)
INPUT:
	time	- millisec of day
	day	- days since 1979
	rate	- DP telemetry rate
	nrep_mf	- Number of repeats for this entry
		  per major frame
OUTPUT:
	Returns	- Number of minuts since first entry
 CALLS:


timeavg [2] $SSW/soho/mdi/idl_old/gen/ys_util/timeavg.pro
[Previous] [Next]
   Name: timeavg

   Purpose: sum & average data values, 

   Input Parameters:
      intimes - input (assume yohkoh data structure)
      tag - string tag name or integer (tag index), scaler or array

   Output:
      function returns structure with standard Yohkoh structure format

   Optional Keyword:
      bin    -  (in)  bin width in seconds (integration time)
      center -  (in)  switch, if set, time is bin center  (default)
      start  -  (in)  switch, if set, time is bin start
      alltags - (in)  switch, if set, average all vector tags
      nsamp  - (out) lonarr, number of valid samples per summed time

   Calling Sequence:
      outstr=timeavg(instr [,tagarray, bin=bin, /alltags, nsamp=nsamp] )

   Calling Examples:
      rd_gxd, t0, t1, goesdata		       ; read 3 second goes data
      onemin=timeavg(goesdata)		       ; 1min avgs,all 1D tags (default)
      fivemin=timeavg(goesdata,'lo',bin=300.) ; 5min avgs,lo channel only
      (illustration for goes 3 second data averaging)   
      IDL> help,goesdata,onemin,fivemin
         GOESDATA        STRUCT    = -> GXD_DATA_REC Array(1176)
         ONEMIN          STRUCT    = -> MS_159127700002 Array(59)
         FIVEMIN         STRUCT    = -> MS_159127700002 Array(13)
      IDL> help,onemin,fivemin,/str
         ** Structure MS_159127700002, 4 tags, length=16:
         TIME            LONG          50402212
         DAY             INT           5146
         LO              FLOAT       1.57314e-06
         HI              FLOAT       5.15764e-08
         ** Structure MS_159138295005, 3 tags, length=12:
         TIME            LONG          50402212
         DAY             INT           5146
         LO              FLOAT       1.55500e-06

 CALLED BY:
	mk_week_file [1], mk_week_file [2]
   History:
      10-Jan-1995 (SLF) dusted off / revamped avg_data.pro 
      13-Jan-1995 (SLF) fix problem with tag subset
       2-sep-1995 (SLF) protect against outgrid has 1 elements

 CALLS: ***
	ARR2STR [1], Arr2Str [2], MAKE_STR [1], MAKE_STR [2], data_chk [1], data_chk [2]
	deriv_arr [1], deriv_arr [2], int2secarr [1], int2secarr [2], rem_elem [1]
	rem_elem [2], tag_index [1], tag_index [2], tbeep [1], tbeep [2], tbeep [3]
	timegrid
   Restrictions:
      maybe good to 1 second or so, maybe plus or minus I think.


timstr2ex [2] $SSW/soho/mdi/idl_old/gen/ys_util/timstr2ex.pro
[Previous] [Next]
NAME:
	timstr2ex
PURPOSE:
	Subroutine to convert a date/time string to a seven element array
CALLING SEQUENCE:
	tarr = timstr2ex('4-oct-91 15:22')
	tarr = timstr2ex(!stime)
INPUT:
	dattim_str -	Character string 
				 4-OCT-91  14:20
				 4-OCT-91 4:20:00
				 4-OCT-91 4:20:00.10
				 14:20:00 4-Oct-91
				 14:20:00 4-Oct-1991

				 92/12/25	OK
				 25/12/92	OK
				 12/25/92	NEED "MDY" SWITCH
			If the year is missing, it will assume the current year
 CALLS: ***
	ARR2STR [1], Arr2Str [2], STR2ARR [1], STR2ARR [2]
 CALLED BY:
	BCS_24HR_PLOT [1], BCS_24HR_PLOT [3], BCS_BROWSE24, LIST_BDA, MANY_DAYS
	WR_PLAN_AREA, XMOVIE_SFM, anytim [1], anytim [2], anytim [3], anytim [4], anytim [5]
	anytim2ex [1], anytim2ex [2], anytim2ints [1], anytim2ints [2], doytim2ex [1]
	doytim2ex [2], dsn_input, eis_timeline_plot_gui [1], eis_timeline_plot_gui [2]
	gettime, go_get_sirius, input_time [1], input_time [2], mk_orbit_sum, mon_sci5k
	op_times, pr_fem, pr_gbe, pr_gev, pr_nar, pr_nel, redo_disploi, redo_mon_sci5k
OPTIONAL KEYWORD INPUT:
	mdy	- When using the "/" notation for the date, and having the 
		  order MM/DD/YY, then it is necessary to use this switch.
OUTPUT:
       returns	-       7 ELEMENT INTEGER*2 ARRAY CONTAINING, IN ORDER,
                       HRS  MIN  SECS  MILLISECS  DAY  MON  YR ('90)
ASSUMPTIONS:
	Date is separated by - and comes before the month
	No spaces before/after the -
	Month is three letters
	Time is separated by :
	Number of characters for minutes is two
	Number of characters for seconds is two
	Fractions of seconds is designated by a decimal after the seconds
	Need at least one space between date and time

	For "/" notation for the date:
		No spaces before/after the /
		Assumes month is the middle number unless using the /mdy switch
		Must include all three items (date, month, year)
		Year must be the first or last item

HISTORY:
	Written Sep-91 by M.Morrison
	15-Nov-91 (MDM) - Modified to break the string into two parts 
			  before tackling the decompression.  That fixed
			  some problems that were found.
	 7-Jun-92 (MDM) - Modified to accept an array of times
	 4-Jan-93 (MDM) - Modified to accept the "/" notation for date
	 7-May-93 (MDM) - Modified the millisec extraction due to a
			  roundoff error(?)


TKI_ASSIGN $SSW/soho/sumer/idl/newtki/tki/tki_assign.pro
[Previous] [Next]
 PROJECT:
       SOHO - SUMER

 NAME:
       TKI_ASSIGN

 PURPOSE: 
       Assign Value to Variable

 CATEGORY:
       
 
 EXPLANATION:
       
 SYNTAX: 
       tki_assign, 

 CALLED BY:
	TKI_EXECINSTR
 EXAMPLES:
       
 INPUTS:
       None.

 OPTIONAL INPUTS: 
       None.

 OUTPUTS:
       None.

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS: 
       None.

 CALLS: ***
	TKI_MESSAGE, TKI_POPDATA
 COMMON:
       @tki_common_priv

 RESTRICTIONS: 
       None.

 SIDE EFFECTS:
       None.

 HISTORY:
       Version 1, September 13, 1996, Dietmar Germerott, MAPE Lindau. Written

 CONTACT:
       Dietmar Germerott, MAPE Lindau (germerott@linax1.mpae.gwdg.de)


TKI_ATPOINTER $SSW/soho/sumer/idl/newtki/tki/tki_atpointer.pro
[Previous] [Next]
 PROJECT:
       SOHO - SUMER

 NAME:
       TKI_ATPOINTER

 PURPOSE: 
       Load Data found on Address to Stack

 CATEGORY:
       
 
 EXPLANATION:
       
 SYNTAX: 
       tki_atpointer, 

 CALLED BY:
	TKI_EXECINSTR
 EXAMPLES:
       
 INPUTS:
       None.

 OPTIONAL INPUTS: 
       None.

 OUTPUTS:
       None.

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS: 
       None.

 CALLS: ***
	TKI_LOADDATA, TKI_MESSAGE, TKI_POPDATA
 COMMON:
       @tki_common_priv

 RESTRICTIONS: 
       None.

 SIDE EFFECTS:
       None.

 HISTORY:
       Version 1, September 13, 1996, Dietmar Germerott, MAPE Lindau. Written

 CONTACT:
       Dietmar Germerott, MAPE Lindau (germerott@linax1.mpae.gwdg.de)


TKI_BINARY $SSW/soho/sumer/idl/newtki/tki/tki_binary.pro
[Previous] [Next]
 PROJECT:
       SOHO - SUMER

 NAME:
       TKI_BINARY

 PURPOSE: 
       Execute the binary function indicated by the token

 CATEGORY:
       
 
 EXPLANATION:
       
 SYNTAX: 
       tki_binary, 

 CALLED BY:
	TKI_EXECINSTR
 EXAMPLES:
       
 INPUTS:
       token - the token (Byte)

 OPTIONAL INPUTS: 
       None.

 OUTPUTS:
       None.

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS: 
       None.

 CALLS: ***
	TKI_MESSAGE, TKI_POPDATA, TKI_PUSHDATA
 COMMON:
       @tki_common_priv

 RESTRICTIONS: 
       None.

 SIDE EFFECTS:
       None.

 HISTORY:
       Version 1, September 13, 1996, Dietmar Germerott, MAPE Lindau. Written

 CONTACT:
       Dietmar Germerott, MAPE Lindau (germerott@linax1.mpae.gwdg.de)


TKI_CALCMOT $SSW/soho/sumer/idl/newtki/tki/tki_calcmot.pro
[Previous] [Next]
 PROJECT:
       SOHO - SUMER

 NAME:
       TKI_CALCMOT()

 PURPOSE: 
       Compute MotionTime of Mechanisms 

 CATEGORY:
       
 
 EXPLANATION:
       
 SYNTAX: 
       Result = tki_calcmot()

 CALLED BY:
	TKI_DO_MC_CMD, TKI_MCPOS2, TKI_MC_TST_REL, TKI_SPHEL
 EXAMPLES:
       
 INPUTS:
       s_steps - number of motor steps
     s_ramplen - steps per start and stop ramp
     f_freqmax - maximum step frequency
        sfirst - first or following motion

 OPTIONAL INPUTS: 
       None.

 OUTPUTS:
       None.

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS: 
       None.

 CALLS: ***
	CALCSTEP, FREQ_RAMP
 COMMON:
       None.

 RESTRICTIONS: 
       None.

 SIDE EFFECTS:
       None.

 HISTORY:
       Version 1, September 13, 1996, Dietmar Germerott, MAPE Lindau. Written

 CONTACT:
       Dietmar Germerott, MAPE Lindau (germerott@linax1.mpae.gwdg.de)


TKI_CALL $SSW/soho/sumer/idl/newtki/tki/tki_call.pro
[Previous] [Next]
 PROJECT:
       SOHO - SUMER

 NAME:
       TKI_CALL

 PURPOSE: 
       Main Calling Routine for Simulator as Standalone

 CATEGORY:
       
 
 EXPLANATION:
       
 SYNTAX: 
       tki_call, file_spec [,/inter[,/advance[,/noscreen]]]

 CALLED BY:
	FULLTEST_TKI
 EXAMPLES:
       
 INPUTS:
       file_spec - Name of UDP to be simulated
       tmp_par - Dummy to avoid error in case of former usage   

 OPTIONAL INPUTS: 
       None.

 OUTPUTS:
       None.

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS: 
       interactive - start Simulater in interactive Mode
       advance     - start Simulater in advanced Mode
       noscreen    - no graphic screen output   
       test        - do not load compiled routines

 CALLS: ***
	CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], DATATYPE [1], DATATYPE [2]
	DATATYPE [3], GET_COMPILED_TKI, GET_UDP_HEAD, RSTRPOS, TAG_EXIST [1]
	TAG_EXIST [2], TEST_OPEN, TKI_CALL_PAR, TKI_CHKIT, TKI_EVAL, TKI_GRAPH_STC
	TKI_LAMBDA11, TKI_MASTER, TKI_MASTER_ADV, TKI_MESSAGE, TKI_TCMD, concat_dir [4]
 COMMON:
       @tki_common_share


 RESTRICTIONS: 
       None.

 SIDE EFFECTS:
       None.

 HISTORY:
       Version 1, September 13, 1996, Dietmar Germerott, MAPE Lindau. Written
       Version 2, November 10, 1998, Dietmar Germerott, MPAE Lindau
           modified detection of current set detector
       Version 3, November 11, 1998, Dietmar Germerott, MPAE Lindau
           added detector sensitive global parameter loading   
   
 CONTACT:
       Dietmar Germerott, MAPE Lindau (germerott@linax1.mpae.gwdg.de)


TKI_CALL_PAR $SSW/soho/sumer/idl/newtki/tki/tki_call_par.pro
[Previous] [Next]
 PROJECT:
       SOHO - SUMER

 NAME:
       TKI_CALL_PAR()

 PURPOSE: 
       Check for Parameter and load them into a Structure

 CATEGORY:
       
 
 EXPLANATION:
       
 SYNTAX: 
       Result = tki_call_par()

 CALLED BY:
	TKI_CALL, XTKI
 EXAMPLES:
       
 INPUTS:
       file_spec - Name of File with Parameters
      par_struct - Structure where Parameters are load in

 OPTIONAL INPUTS: 
       None.

 OUTPUTS:
       None.

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS: 
       None.

 CALLS: ***
	TKI_LOAD_PAR_C
 COMMON:
       None.

 RESTRICTIONS: 
       None.

 SIDE EFFECTS:
       None.

 HISTORY:
       Version 1, September 13, 1996, Dietmar Germerott, MAPE Lindau. Written

 CONTACT:
       Dietmar Germerott, MAPE Lindau (germerott@linax1.mpae.gwdg.de)


TKI_CALLFUNC $SSW/soho/sumer/idl/newtki/tki/tki_callfunc.pro
[Previous] [Next]
 PROJECT:
       SOHO - SUMER

 NAME:
       TKI_CALLFUNC

 PURPOSE: 
       Call a function inside a UDP/POP

 CATEGORY:
       
 
 EXPLANATION:
       
 SYNTAX: 
       tki_callfunc

 CALLED BY:
	TKI_EXECINSTR
 EXAMPLES:
       
 INPUTS:
       None.

 OPTIONAL INPUTS: 
       None.

 OUTPUTS:
       None.

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS: 
       None.

 CALLS: ***
	TKI_MESSAGE, TKI_PUSH16, TKI_PUSHDATA
 COMMON:
       @tki_common_priv

 RESTRICTIONS: 
       None.

 SIDE EFFECTS:
       None.

 HISTORY:
       Version 1, September 13, 1996, Dietmar Germerott, MAPE Lindau. Written

 CONTACT:
       Dietmar Germerott, MAPE Lindau (germerott@linax1.mpae.gwdg.de)


TKI_CELOBJ $SSW/soho/sumer/idl/newtki/tki/tki_celobj.pro
[Previous] [Next]
 PROJECT:
       SOHO - SUMER

 NAME:
       TKI_CELOBJ()

 PURPOSE: 
       Simulate the Celestial Object Function

 CATEGORY:
       
 
 EXPLANATION:
       
 SYNTAX: 
       Result = tki_celobj()

 CALLED BY:
	TKI_L3CTRL
 EXAMPLES:
       
 INPUTS:
       tmax - maximal search time in seconds
      tstp  - TimeStep (see SCL Celestial_obj)
       nimg - Number of Images per WAVL (see...)
       dark - dark signal value (see..)
     lambda - start wavelength
   d_lambda - wavelength increment
      nrinc - Number of WAVL increments (see...)

 OPTIONAL INPUTS: 
       None.

 OUTPUTS:
       None.

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS: 
       None.

 CALLS: ***
	TKI_CLOCK, TKI_DO_MC_CMD, TKI_DO_POW_CMD, TKI_GET_MCPOWER, TKI_IIM_READ
	TKI_LAMBDA, TKI_MCMOVE, TKI_MESSAGE
 COMMON:
       @tki_common_priv

 RESTRICTIONS: 
       None.

 SIDE EFFECTS:
       None.

 HISTORY:
       Version 1, September 13, 1996, Dietmar Germerott, MAPE Lindau. Written

 CONTACT:
       Dietmar Germerott, MAPE Lindau (germerott@linax1.mpae.gwdg.de)


TKI_CHANGE_PAR $SSW/soho/sumer/idl/newtki/tki/tki_change_par.pro
[Previous] [Next]
 PROJECT:
       SOHO - SUMER

 NAME:
       TKI_CHANGE_PAR

 PURPOSE: 
       Writing the parameters (global/UDP) to their position

 CATEGORY:
       
 
 EXPLANATION:
       
 SYNTAX: 
       tki_change_par, 

 EXAMPLES:
       
 INPUTS:
       par_nr        - Parameter index                        #
       par_ty        - Parameter type                         #
       par_val       - Parameter value                        #
       par_base_ptr  - Parameter base pointer (Glob/UDP)      #

 OPTIONAL INPUTS: 
       None.

 OUTPUTS:
       None.

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS: 
       None.

 COMMON:
       @tki_common_priv

 RESTRICTIONS: 
       None.

 SIDE EFFECTS:
       None.

 HISTORY:
       Version 1, September 13, 1996, Dietmar Germerott, MAPE Lindau. Written

 CONTACT:
       Dietmar Germerott, MAPE Lindau (germerott@linax1.mpae.gwdg.de)


TKI_CHECK_CNT $SSW/soho/sumer/idl/newtki/tki/tki_check_cnt.pro
[Previous] [Next]
 PROJECT:
       SOHO - SUMER

 NAME:
       TKI_CHECK_CNT()

 PURPOSE: 
       Check the Countrates for SUMER

 CATEGORY:
       
 
 EXPLANATION:
       
 SYNTAX: 
       Result = tki_check_cnt()

 CALLED BY:
	TKI_L3CTRL, TKI_LAMBDA
 EXAMPLES:
       
 INPUTS:
       lam_511 - lambda on Pixel 511
       specwave - Array of Wavelength
       specint - Array of Intensities
       slit - slitnr
       detector - used Detector

 OPTIONAL INPUTS: 
       None.

 OUTPUTS:
       None.

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS: 
       None.

 CALLS: ***
	TKI_DET_RANGE
 COMMON:
       None.

 RESTRICTIONS: 
       None.

 SIDE EFFECTS:
       None.

 HISTORY:
       Version 1, September 22, 1996, Dietmar Germerott, MAPE Lindau. Written

 CONTACT:
       Dietmar Germerott, MAPE Lindau (germerott@linax1.mpae.gwdg.de)


TKI_CHECK_COMP $SSW/soho/sumer/idl/newtki/tki/tki_check_comp.pro
[Previous] [Next]
 PROJECT:
       SOHO - SUMER

 NAME:
       TKI_CHECK_COMP()

 PURPOSE: 
       Check for right Compression Format

 CATEGORY:
       
 
 EXPLANATION:
       
 SYNTAX: 
       Result = tki_check_comp()

 CALLED BY:
	TKI_FULLDISK, TKI_L3CTRL, TKI_REFSPEC
 EXAMPLES:
       
 INPUTS:
       informat -
         m_info -	     
       p_format -	     

       @tki_image_tab

 OPTIONAL INPUTS: 
       None.

 OUTPUTS:
       None.

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS: 
       None.

 CALLS: ***
	TKI_IMAGE_FORM, TKI_MESSAGE
 COMMON:
       @tki_common_priv

 RESTRICTIONS: 
       None.

 SIDE EFFECTS:
       None.

 HISTORY:
       Version 1, September 13, 1996, Dietmar Germerott, MAPE Lindau. Written

 CONTACT:
       Dietmar Germerott, MAPE Lindau (germerott@linax1.mpae.gwdg.de)


TKI_CHKIT $SSW/soho/sumer/idl/newtki/tki/tki_chkit.pro
[Previous] [Next]
 PROJECT:
       SOHO - SUMER

 NAME:
       TKI_CHKIT

 PURPOSE: 
       CHeck User

 CATEGORY:
       
 
 EXPLANATION:
       
 SYNTAX: 
       Res = tki_chkit() 

 CALLED BY:
	ST_TKI_INIT, TKI_CALL, XTKI
 EXAMPLES:
       
 INPUTS:
       None.

 OPTIONAL INPUTS: 
       None.

 OUTPUTS:
       Res = Structure of User information

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS: 
       None.

 CALLS: ***
	CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], concat_dir [4]
 COMMON:
       @tki_common_priv

 RESTRICTIONS: 
       None.

 SIDE EFFECTS:
       None.

 HISTORY:
       Version 1, October 29, 1996, Dietmar Germerott, MAPE Lindau. Written
       Version 2, February 9, 1999, Dietmar Germerott, MPAE Lindau
            mod default level to 'f0'xb   

 CONTACT:
       Dietmar Germerott, MAPE Lindau (germerott@linax1.mpae.gwdg.de)


TKI_CINT $SSW/soho/sumer/idl/newtki/tki/tki_cint.pro
[Previous] [Next]
 PROJECT:
       SOHO - SUMER

 NAME:
       TKI_CINT

 PURPOSE: 
       Main Program for Tokencode interpreter

 CATEGORY:
       
 
 EXPLANATION:
       
 SYNTAX: 
       tki_cint, 

 CALLED BY:
	TKI_INSERT_UDP, TKI_TCMD_EXEC
 EXAMPLES:
       
 INPUTS:
       None.

 OPTIONAL INPUTS: 
       None.

 OUTPUTS:
       None.

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS: 
       None.

 CALLS: ***
	TKI_CLOCK, TKI_CONVERT, TKI_EXECINSTR, TKI_GETINSTR, TKI_PUSH16, TKI_PUSHDATA
	TKI_P_SEARCH
 COMMON:
       @tki_common_priv

 RESTRICTIONS: 
       None.

 SIDE EFFECTS:
       None.

 HISTORY:
       Version 1, September 13, 1996, Dietmar Germerott, MAPE Lindau. Written

 CONTACT:
       Dietmar Germerott, MAPE Lindau (germerott@linax1.mpae.gwdg.de)


TKI_CLOCK $SSW/soho/sumer/idl/newtki/tki/tki_clock.pro
[Previous] [Next]
 PROJECT:
       SOHO - SUMER

 NAME:
       TKI_CLOCK

 PURPOSE: 
       Processing Timeline of simulation

 CATEGORY:
       
 
 EXPLANATION:
       
 SYNTAX: 
       tki_clock, 

 CALLED BY:
	TKI_CELOBJ, TKI_CINT, TKI_DO_MC_CMD, TKI_DO_POW_CMD, TKI_IIM_READ, TKI_L34EXEC
	TKI_L3CTRL, TKI_LIBCTRL, TKI_MCPOS2, TKI_MC_TST_REL, TKI_POWERUP, TKI_RSCON
	TKI_RSC_EXEC, TKI_SETMCPHIGHV, TKI_TCMD_EXEC
 EXAMPLES:
       
 INPUTS:
       d_time - Deltatime to process

 OPTIONAL INPUTS: 
       None.

 OUTPUTS:
       None.

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS: 
       None.

 CALLS: ***
	TKI_COMP_HANDLE, TKI_FDELETE, TKI_IMAGE_FORM, TKI_MESSAGE, TKI_TELEMETRY
 COMMON:
       @tki_common_priv

 RESTRICTIONS: 
       None.

 SIDE EFFECTS:
       None.

 HISTORY:
       Version 1, September 13, 1996, Dietmar Germerott, MAPE Lindau. Written
                  April 29, 1997 Dietmar Germerott, MAPE Lindau.
                        Move tm_info.ratio = tm_info.ratio + step to
                        tki_telemetry for more exact calculation.

 CONTACT:
       Dietmar Germerott, MAPE Lindau (germerott@linax1.mpae.gwdg.de)


TKI_CLOSE_UNIT $SSW/soho/sumer/idl/newtki/tki/tki_close_unit.pro
[Previous] [Next]
 PROJECT:
       SOHO - SUMER

 NAME:
       TKI_CLOSE_UNIT

 PURPOSE: 
       Close all needed UNITs for Output

 CATEGORY:
       
 
 EXPLANATION:
       
 SYNTAX: 
       tki_close_unit, 

 CALLED BY:
	TKI_TCMD_EXEC
 EXAMPLES:
       
 INPUTS:
       None.

 OPTIONAL INPUTS: 
       None.

 OUTPUTS:
       None.

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS: 
       None.

 COMMON:
       @tki_common_priv

 RESTRICTIONS: 
       None.

 SIDE EFFECTS:
       None.

 HISTORY:
       Version 1, September 13, 1996, Dietmar Germerott, MAPE Lindau. Written

 CONTACT:
       Dietmar Germerott, MAPE Lindau (germerott@linax1.mpae.gwdg.de)


TKI_CMD_FUNC $SSW/soho/sumer/idl/newtki/tki/tki_cmd_func.pro
[Previous] [Next]
 PROJECT:
       SOHO - SUMER

 NAME:
       TKI_CMD_FUNC()

 PURPOSE: 
       Return Function Information in a STRUCT

 CATEGORY:
       
 
 EXPLANATION:
       
 SYNTAX: 
       Result = tki_cmd_func()

 CALLED BY:
	TKI_L34EXEC, TKI_LIBCALL, TKI_SCAN_PAR, TKI_TCMD, XTKI
 EXAMPLES:
       
 INPUTS:
       

 OPTIONAL INPUTS: 
       None.

 OUTPUTS:
       None.

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS: 
       None.

 COMMON:
       None.

 RESTRICTIONS: 
       None.

 SIDE EFFECTS:
       None.

 HISTORY:
       Version 1, September 13, 1996, Dietmar Germerott, MAPE Lindau.
          Written
       Version 1.1, December 7, 2004, Dietmar Germerott, MPAE Lindau
          Modified user cmd level for PutSystemX Cmd from 0xc0 to
          0xff (allow everyone to use the CMD in UDP)

   
 CONTACT:
       Dietmar Germerott, MAPE Lindau (germerott@linax1.mpae.gwdg.de)


TKI_COMMON_PRIV $SSW/soho/sumer/idl/newtki/tki/tki_common_priv.pro
[Previous] [Next]
 PROJECT:
       SOHO - SUMER

 NAME:
       TKI_COMMON_PRIV

 PURPOSE: 
       Common Variables for Simulator Internal

 CATEGORY:
       
 
 EXPLANATION:
       
 SYNTAX: 
       @tki_common_priv

 EXAMPLES:
       
 INPUTS:
       None.

 OPTIONAL INPUTS: 
       None.

 OUTPUTS:
       None.

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS: 
       None.

 COMMON: