[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_5vdpu()
PURPOSE:
Return HK0 Voltage DPU +5 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_5vdpu()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_detchax()
PURPOSE:
Return HK0 Detector X-charge Threshold
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_detchax()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_detchay()
PURPOSE:
Return HK0 Detector Y-charge Threshold
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_detchay()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_dethighv()
PURPOSE:
Return HK0 Detector High Voltage in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_dethighv()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_detlvpi()
PURPOSE:
Return HK0 Detector LVPS Current Monitor
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_detlvpi()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_detmcpi()
PURPOSE:
Return HK0 Detector MCP Current in uA
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_detmcpi()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_dettimx()
PURPOSE:
Return HK0 Detector X-timing Threshold
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_dettimx()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_dettimy()
PURPOSE:
Return HK0 Detector Y-timing Threshold
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_dettimy()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_ecpb()
PURPOSE:
Return HK0 ECP Bank Registers (Byte 44)
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_ecpb()
EXAMPLES:
INPUTS:
HK0 - HK) Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_ecpbsr()
PURPOSE:
Return HK0 ECP Bank Select Registers (Byte 45)
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_ecpbsr()
EXAMPLES:
INPUTS:
HK0 - HK) Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_ecperr()
PURPOSE:
Return HK0 ECP Error Status Register (Byte 47)
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_ecperr()
EXAMPLES:
INPUTS:
HK0 - HK) Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_HELP
PURPOSE:
CATEGORY:
EXPLANATION:
SYNTAX:
s_hk0_help,
EXAMPLES:
INPUTS:
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
None.
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, January 3, 2000, GERMEROTT, MPAE LINDAU. Written
CONTACT:
GERMEROTT, MPAE LINDAU (GERMEROTT@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_IBB1M18V()
PURPOSE:
Return HK0 Current IBB1 -18 V in mA
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_IBB1M18V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_IBB2M18V()
PURPOSE:
Return HK0 Current IBB2 -18 V in mA
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_IBB2M18V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_IBOARDP28V()
PURPOSE:
Return HK0 Current Board +28 V in mA
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_IBOARDP28V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_ICCP5V()
PURPOSE:
Return HK0 Current Board +5 V in mA
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_ICCP5V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_IDD1P18V()
PURPOSE:
Return HK0 Current IDD1 +18 V in mA
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_IDD1P18V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_IDD2P18V()
PURPOSE:
Return HK0 Current IDD2 +18 V in mA
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_IDD2P18V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_IDDRSCP15V()
PURPOSE:
Return HK0 Current IDDRSC +15 V in mA
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_IDDRSCP15V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_IDEFL()
PURPOSE:
Return HK0 Current Deflector in mA
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_IDEFL()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_ideta()
PURPOSE:
Return HK0 Current Detector A in mA
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_ideta()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_idetb()
PURPOSE:
Return HK0 Current Detector B in mA
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_idetb()
EXAMPLES:
INPUTS:
HK0 - HK) Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_idpup5v()
PURPOSE:
Return HK0 Current DPU +5 V in mA
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_idpup5v()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_iheaterd()
PURPOSE:
Return HK0 Current Heater D in mA
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_iheaterd()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_IRSCM15()
PURPOSE:
Return HK0 RSC minus 15 V current
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_IRSCM15()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_IRSCM15V()
PURPOSE:
Return HK0 RSC -15 V Current in mA
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_irscm15v()
EXAMPLES:
INPUTS:
HK0 - HK) Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_iwaxmotor()
PURPOSE:
Return HK0 Current WAX Motor Door in mA
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_iwaxmotor()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC1M15V()
PURPOSE:
Return HK0 MC1 -15 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC1M15V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC1P15V()
PURPOSE:
Return HK0 MC1 +15 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC1P15V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC1P5V()
PURPOSE:
Return HK0 MC1 +5 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC1P5V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC1POS()
PURPOSE:
Return HK0 MC1 Encoder Value
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC1POS()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC1STAT()
PURPOSE:
Return HK0 MC1 Status (Byte 79)
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC1STAT()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC2M15V()
PURPOSE:
Return HK0 MC2 -15 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC2M15V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC2P15V()
PURPOSE:
Return HK0 MC2 +15 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC2P15V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC2POS()
PURPOSE:
Return HK0 MC2 Encoder Value
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC2POS()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC2STAT()
PURPOSE:
Return HK0 MC2 Status (Byte 85)
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC2STAT()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC3M15V()
PURPOSE:
Return HK0 MC3 -15 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC3M15V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC3P15V()
PURPOSE:
Return HK0 MC3 +15 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC3P15V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC3POS()
PURPOSE:
Return HK0 MC3 Encoder Value
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC3POS()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC3STAT()
PURPOSE:
Return HK0 MC3 Status (Byte 91)
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC3STAT()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC4M15V()
PURPOSE:
Return HK0 MC4 -15 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC4M15V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC4P15V()
PURPOSE:
Return HK0 MC4 +15 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC4P15V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC4POS()
PURPOSE:
Return HK0 MC4 Encoder Value
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC4POS()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC4STAT()
PURPOSE:
Return HK0 MC4 Status (Byte 97)
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC4STAT()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC5M15V()
PURPOSE:
Return HK0 MC5 -15 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC5M15V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC5P15V()
PURPOSE:
Return HK0 MC5 +15 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC5P15V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC5POS()
PURPOSE:
Return HK0 MC5 Encoder Value
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC5POS()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC5STAT()
PURPOSE:
Return HK0 MC5 Status (Byte 103)
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC5STAT()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC6M15V()
PURPOSE:
Return HK0 MC6 -15 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC6M15V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC6P15V()
PURPOSE:
Return HK0 MC6 +15 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC6P15V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC6POS()
PURPOSE:
Return HK0 MC6 Encoder Value
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC6POS()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC6STAT()
PURPOSE:
Return HK0 MC6 Status (Byte 109)
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC6STAT()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC8M15V()
PURPOSE:
Return HK0 MC8 -15 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC8M15V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC8P15V()
PURPOSE:
Return HK0 MC8 +15 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC8P15V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC8POS()
PURPOSE:
Return HK0 MC8 Encoder Value
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC8POS()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_MC8STAT()
PURPOSE:
Return HK0 MC8 Status (Byte 115)
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_MC8STAT()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_RECTIME()
PURPOSE:
Get the SUMER HK0 Record compilation time in TAI
CATEGORY:
HK0 Decode
EXPLANATION:
SYNTAX:
Result = s_hk0_rectime(hk_record_array)
EXAMPLE:
INPUTS:
hk_record_array - SUMER HK0 byte_array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
errmsg - return Error Message
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, November 12, 2006, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_spub()
PURPOSE:
Return HK0 SPU Bank Registers (Byte 49)
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_spub()
EXAMPLES:
INPUTS:
HK0 - HK) Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_spubsr()
PURPOSE:
Return HK0 SPU Bank Select Registers (Byte 46)
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_spubsr()
EXAMPLES:
INPUTS:
HK0 - HK) Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_spuerr()
PURPOSE:
Return HK0 SPU Error Status Register (Byte 48)
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_spuerr()
EXAMPLES:
INPUTS:
HK0 - HK) Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_STATUS0()
PURPOSE:
Return HK0 Status 0 (Byte 1)
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_status0()
EXAMPLES:
INPUTS:
HK0 - HK) Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_STATUS1()
PURPOSE:
Return HK0 Status 1 (Byte 1)
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_status1()
EXAMPLES:
INPUTS:
HK0 - HK) Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_STATUS2()
PURPOSE:
Return HK0 Status 2 (Byte 1)
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_status2()
EXAMPLES:
INPUTS:
HK0 - HK) Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_STATUS3()
PURPOSE:
Return HK0 Status 3 (Byte 1)
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_status3()
EXAMPLES:
INPUTS:
HK0 - HK) Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_STATUS4()
PURPOSE:
Return HK0 Status 4 (Byte 1)
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_status4()
EXAMPLES:
INPUTS:
HK0 - HK) Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_SYSCONFIG
PURPOSE:
Display SUMER Config Words in plain text
CATEGORY:
EXPLANATION:
S_HK0_SYSCONFIG displays the plain text meaning of'
the SUMER hk0 SysConfig Words of the first present'
HK0 record in the array. The others can be displayed'
by choosing the record position'
SYNTAX:
s_hk0_sysconfig,hk0 [,errmsg=errmsg]
EXAMPLES:
hk0=read_bin_hk0(date='9-Sep-2005')"
s_hk0_sysconfig,xx'
or to test the config words
sysword=['17'xb,'b9'xb,'fe'xb,'ff'xb,'ff'xb,'ff'xb,'ff'xb,'3f'xb,3a'xb] ;bytarr(9)
s_hk0_sysconfig,sysword
INPUTS:
HK0 - HK Byte Array (200,*) or bytarr(9)
OPTIONAL INPUTS:
position - position of hk0 record in array to be displayed
(default is position 0, first entry)
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
ermsg - Return Error Message if one
CALLS: ***
ANYTIM2UTC [1], ANYTIM2UTC [2], OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, September 23, 2005, Dietmar Germerott, MPS Lindau. Written
CONTACT:
Dietmar Germerott, MPS Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_tdcm13v()
PURPOSE:
Return HK0 Detector TDC -13 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_tdcm13v()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_tdcm15v()
PURPOSE:
Return HK0 Detector TDC -15 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_tdcm15v()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_tdcm5v()
PURPOSE:
Return HK0 Detector TDC -5 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_tdcm5v()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_tdcp10v()
PURPOSE:
Return HK0 Detector TDC +10 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_tdcp10v()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_tdcp13v()
PURPOSE:
Return HK0 Detector TDC +13 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_tdcp13v()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_tdcp5v()
PURPOSE:
Return HK0 Detector TDC +5 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_tdcp5v()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
Version 1.1, November 10, 2006, Dietmar Germerott, MPAE Lindau
Corrected REFORM call
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_TDCPM5V()
PURPOSE:
Return HK0 Detector TDC +5 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_TDCPM5V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_tdpucu1()
PURPOSE:
Return HK0 Temperature DPU CU1 in deg C
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_tdpucu1()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_tdpucu2()
PURPOSE:
Return HK0 Temperature DPU CU2 in deg C
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_tdpucu2()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_tdpudcc()
PURPOSE:
Return HK0 Temperature DPU DCC in deg C
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_tdpudcc()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_tdpuebx()
PURPOSE:
Return HK0 Temperature DPU EBX in deg C
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_tdpuebx()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_TSUMER4()
PURPOSE:
Return HK0 SUMER4 Temperature in deg C Resolution 0.35 K
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_tsumer4()
EXAMPLES:
INPUTS:
HK0 - HK) Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_utc()
PURPOSE:
Return UTC of HK0 Packages
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_utc(hk0[,/EXTERNAL,/CCSDS,/ECS])
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
struct or string Array of dimension n
The result of the function will be the UTC calendar time in one
of several formats, depending on the keywords passed.
Internal: A structure containing the tags:
MJD: The Modified Julian Day number.
TIME: The time of day, in milliseconds since
the beginning of the day.
Both are long integers. This is the default
format.
External: A structure containing the integer tags
"18-JAN-1988 17:20:43.12", "18-JAN-1988 17:20:43.123"
"1988-01-18T17:20:43.123Z", "1988/01/18 17:20:43.123"
CCSDS: An ASCII string containing the UTC time to, DAY
ECS: Similar to CCSDS, HOUR, MILLISECOND., MINUTE, MONTH, None.
OPTIONAL OUTPUTS:, SECOND, STIME: The date and time has the format
See UTC2STR for more information.
VMS: The date and time has the format, YEAR, and, e.g.
except that the date has, for Space Data Systems (ISO 8601)
millisecond accuracy in the format
recommended by the Consultative Committee, the format:
Keywords : EXTERNAL = If set, then the output is in external format, as
explained above.
CCSDS = If set, then the output is in CCSDS format, as
explained above.
ECS = If set, then the output is in ECS format, as
explained above.
VMS = If set, then the output will be in VMS format, as
described above.
STIME = If set, then the output will be in STIME format, as
described above.
The following keywords are only valid if one of the string
formats is selected.
TRUNCATE = If set, then the time will be truncated to 1 second
accuracy. Note that this is not the same thing as
rounding off to the nearest second, but is a
rounding down.
DATE_ONLY = If set, then only the date part of the string is
returned.
TIME_ONLY = If set, then only the time part of the string is
returned.
UPPERCASE = If set, then the month field in either the VMS or
STIME format is returned as uppercase.
The following keyword is always valid.
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 = UTC_HEAD( head, ERRMSG=ERRMSG )
IF ERRMSG NE '' THEN ...
CALLS: ***
OBT2TAI, TAI2UTC
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, January 7, 1999, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_VBB1M18V()
PURPOSE:
Return HK0 Voltage VBB1 -18 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_VBB1M18V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_VBB2M18V()
PURPOSE:
Return HK0 Voltage VBB2 -18 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_VBB2M18V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_VBBRSCM15V()
PURPOSE:
Return HK0 RSC -15 V VBB Voltage
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_vbbrscm15v()
EXAMPLES:
INPUTS:
HK0 - HK) Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_VBOARDP28V()
PURPOSE:
Return HK0 Voltage Board +28 V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_VBOARDP28V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_VCCP5V()
PURPOSE:
Return HK0 Voltage Board +5 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_VCCP5V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_VDD1P18V()
PURPOSE:
Return HK0 Voltage Board +18 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_VDD1P18V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_VDD2P18V()
PURPOSE:
Return HK0 Voltage VDD2 +18 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_VDD2P18V()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_vddrscp15v()
PURPOSE:
Return HK0 Voltage VDDRSC +15 V in V
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_vddrscp15v()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_XEVENT()
PURPOSE:
Return HK0 MC1 Encoder Value
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_XEVENT()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_XPHA()
PURPOSE:
Return HK0 Detector XPHA as Bytarr (12,*)
CATEGORY:
EXPLANATION:
This Routine Returns the XPHA as BYTARR(12,*)
displaying the PHA distribution do:
PLOT,HISTOGRAM(S_HK0_XPHA(hk0_array))
SYNTAX:
Result = s_hk0_XPHA()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_YEVENT()
PURPOSE:
Return HK0 MC1 Encoder Value
CATEGORY:
EXPLANATION:
SYNTAX:
Result = s_hk0_YEVENT()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_HK0_YPHA()
PURPOSE:
Return HK0 Detector YPHA as Bytarr (12,*)
CATEGORY:
EXPLANATION:
This Routine Returns the YPHA as BYTARR(12,*)
displaying the PHA distribution do:
PLOT,HISTOGRAM(S_HK0_YPHA(hk0_array))
SYNTAX:
Result = s_hk0_YPHA()
EXAMPLES:
INPUTS:
HK0 - HK0 Byte Array (200,*)
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
Timeline - Return the timeline for plotting
ermsg - Return Error Message if one
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
S_MC2POSFIT
PURPOSE:
Print the expected SUMER MC2 Encoder / Step Position
CATEGORY:
EXPLANATION:
SYNTAX:
s_mc2posfit, inpos
EXAMPLES:
s_mc2posfit, inpos,/step
prints Encoder Position for Step position inpos
s_mc2posfit, inpos,/enco
prints Step Position for Encoder position inpos
INPUTS:
inpos - either Pointing Coordinates or Steps
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
STEP_ - indicates that inpos is in Steps
OUTPOS - Return the Encoder Values
P_CENTER - Set Pointing Center (default is 5830)
P_SLOPE - Set Pointing Slope (default is 2.66876)
ENCODER_ - indicates that input is Encoder Value
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, March 13, 2000, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
Project:
SOHO - SUMER
Name: sa_gt_specrange
Purpose:
Enables user to select spatial ranges from a sumer reference spectrum
Use:
SpecRange=sa_gt_specrange('data3$disk:[fits]SUM_960126_022347.FITS')
Inputs:
Filename - name of FITS file containing reference spectrum.
The first scan in the file will be shown and only
the data from the KBr coated part of the detector.
Outputs:
Array of dimentions 2 x N, where N is the number of ranges selected.
Calls: ***
XLOADCT [1], XLOADCT [2], XLOADCT [3], rd_sumer [1], rd_sumer [2], sgt_detector
sgt_dims
CALLED BY:
smk_atlas
Common:
None
Written:
Terry Kucera, 27 Feb 1996
Modifications
Changed to use rd_sumer rather
than ft_sumread_fits 13 Nov 1996
Added BLOCK keyword to xloadct call 15 Sep 1999
[Previous]
[Next]
Name: saa_in
Purpose: boolean - is input time in SAA? Use Yohkoh ephemeris OR/AND RBM
Input Paramters:
index - Yohkoh index record (roadmap ok, but cant check RBM)
Keyword Parameters:
rbm_only - just check rbm veto flag
fem_only - just check FEM file (via tim2orbit,saa=saa)
rbm_and_fem - if set, do logical AND of FEM and RBM (default is OR)
Restrictions - need to handle flares in rbm_status
CALLS: ***
MASK, str_is [1], str_is [2], tim2orbit [1], tim2orbit [2]
CALLED BY:
QUICKDARK [2], chk_pointing, may_eclipse, mk_sdc [2], mk_sdc [3], mk_sdc [4]
mk_sff_pair [1], mk_sff_pair [2]
History:
8-Sep-1993 (SLF) - Written
8-Jul-1994 (SLF) - Return ephem saa if roadmap, just print warning
[Previous]
[Next]
NAME:
sat_obs_loc
PURPOSE:
To return the location of a saturated point source.
INPUT:
img - a single image or array of images
OUTPUT:
x - The x location in pixels
y - The y location
CALLS: ***
PAUSE [1], SUMCOL [1], SUMCOL [2], SUMROW [1], SUMROW [2], SUMROW [3], pause [2]
CALLED BY:
mdidust
OPTIONAL KEYWORD INPUT:
qplot - If set, display plots of the summed rows/columns
METHOD:
It assumes that there is some scatter and that if you
add up all of the line you can find the x location, and
the same is true for adding the columns and finding
the y location
HISTORY:
Written 4-Apr-94 by M.Morrison
27-Apr-94 (MDM) - Patch to work on MDIBBS (??) - segment
fault at "total" line.
[Previous]
[Next]
Name: sav_string
Purpose: save string to xdr file for Yohkoh !path, documentation, filemaps
Input Parameters:
infile - filename of file to write
CALLS: ***
CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], concat_dir [4]
NOTE: by default, the extention .strx is forced
string - string variable to save
Optional Keyword Parameters:
Method:
special files contain a single string (but the string may be long)
in XDR format for transporability
Calling Sequence:
sav_string, string, infile [,type=type] [,/path] [,/doc] [,/refdata]
Categories:
swmaint, file i/o, gen, util
Notes:
The pair of routines [sav_string/get_string] were developed to allow
saving and restoring of several yohkoh parameters (ex: !path) to help
manage the Yohkoh idl environment but they are generic in nature and
other uses may be considered. They can be used in conjunction with
arr2str and str2arr to allow storing of string 'arrays'
History: slf, 30-July-92
slf, 22-Jul-93 (use SITE instead of GEN)
[Previous]
[Next]
Project : SOHO - CDS
Name : SAVE_CDS_ADEF
Purpose : Save a CDS Analysis Definition (ADEF)
Explanation : Saves the contents of a CDS ADEF to the file name found in the
ADEF structure (ADEF.FILENAME). If the file name is empty, or
if the keyword SAVE_AS is set, the user is prompted (by
pickfile) for the file name. The FILENAME tag of the ADEF will
be updated to reflect the actual file name where the data were
saved.
Use : SAVE_CDS_ADEF,ADEF
Inputs : ADEF : CDS ANALYSIS DEFINITION structure.
Opt. Inputs : None
Outputs : None
Opt. Outputs: None.
Keywords : VERBOSE : Propagated to the SAVE command.
SAVE_AS : Set to prompt the user for a file name.
Calls : ***
BIGPICKFILE, BREAK_FILE [1], BREAK_FILE [2], BREAK_FILE [3], CDS_ADEF_PARSEFILE
CHK_DIR [1], CHK_DIR [2], DEFAULT, TEST_OPEN, break_file [4]
CALLED BY:
XCDS_ANALYSIS
Common : None
Restrictions: Needs widgets to prompt the user.
Side effects: Modifies ADEF.FILENAME
Category : QuickLoook,Analysis
Prev. Hist. : None
Written : SVH Haugan, UiO, 25 September 1997
Modified : Not yet.
Version : 1, 25 September 1997
[Previous]
[Next]
Name: save_data
Purpose: save data(images and text descriptions as widget user values.
an index is maintained to allow queue type operation
Input Parameters:
data - data set to save
descrip - string descriptor - for SolarA, probably -idx2list
put - could be fileid and string indicating indices
str - any other associated data - for SolarA, is probably
structure or array of structures defining data
Original intent of three input arguments was to allow association
of 1, 2, or 3 data sets under a single index
**** update to return structure
Can be used for non-images (cubes, other things, etc)
CALLS:
CALLED BY
sda_look [1]
[Previous]
[Next]
Name: save_data
Purpose: save relavent roadmap and roadmap derived data
as widget uvalues for communicaton between widgets
CALLS:
CALLED BY
sda_look [1]
[Previous]
[Next]
Project : SOHO - CDS
Name : SAVE_QLDS
Purpose : Save a QLDS to an IDL save-file.
Explanation : With the new storage scheme using handles it's impossible to
simply use the SAVE command to store all the data in a QLDS
with just one simple statement. This routine (together with
the function QLDS_RESTORE) provides a simple interface to save
and restore Quick Look Data Structures.
By default, the /XDR switch to SAVE is used, to enable
platform-independent save files under VMS. This can be turned
off by setting XDR=0.
If the QLDS has been read in with the old storage system, the
whole QLDS is simply SAVEd.
Use : SAVE_QLDS,QLDS [ ,FILENAME=FILENAME ]
Inputs : QLDS : Quick Look Data Structure
Opt. Inputs : FILENAME : Name of file to store the QLDS in. Default is the
file name (e.g., 's3300r00') plus extension
'.qlsave'.
Outputs : None.
Opt. Outputs: None.
Keywords : XDR : Set to zero to avoid XDR format on VMS.
Calls : ***
BREAK_FILE [1], BREAK_FILE [2], BREAK_FILE [3], DEFAULT, TAG_EXIST [1]
TAG_EXIST [2], TRIM, break_file [4]
Common : None.
Restrictions: Only handles 60 data windows.
Side effects: None known.
Category : Data_Handling, I_O, Quicklook.
Prev. Hist. : None.
Written : Stein Vidar H. Haugan (UiO), 3 October 1996
Modified : Not yet.
Version : 1, 3 October 1996
[Previous]
[Next]
Project : SOHO - CDS
Name : SAVE_WAVECAL()
Purpose : Returns wavecal from common block for temporary storage
Explanation : In some circumstances a routine may wish to temporarily load
a wavecal into the wavecal common block and to restore the
original calibration when it has finished. This function
retrieves the common block entries. Use LOAD_WAVECAL with
the cal_struct keyword for the reverse process.
Use : IDL> wcal = save_wavecal(detector)
Inputs : detector - either 'NIS' or 'GIS' (can be abbreviated)
Opt. Inputs : None
Outputs : Function returns either NIS or GIS wavecal structure from
common block.
Opt. Outputs: None
Keywords : None
Calls : ***
DATATYPE [1], DATATYPE [2], DATATYPE [3]
CALLED BY:
MK_RASTER, UPDATE_DEX
Common : CDS_WAVECAL
Restrictions: None
Side effects: None
Category : Data analysis, wavelength calibration
Prev. Hist. : None
Written : C D Pike, RAL, 14-Mar-96
Modified :
Version : Version 1, 14-Mar-96
[Previous]
[Next]
Name: saveenv
Purpose: save current environment (UNIX environmentals/VMS logicals)
(for temporary change and later restoration via restenv.pro)
History:
9-Jan-1994 (SLF)
Method:
calls get_logenv.pro to return envrionment
CALLS: ***
get_logenv [1], get_logenv [2]
Common Blocks:
saveenv_blk (store environmentals and translation)
Assumptions/Restrictions
[Previous]
[Next]
NAME: savegen
Purpose: save user specified parameters (idl variables) in a generic file
[front end to wrt_genx - files are restored via savegen.pro]
Input Parameters:
p1, p2, p3... p15 - idl variables to save
Optional Keyword Parameters
file - file name for save - default is 'save.genx' in current direct
if name is supplied and notype keyword is not set, the
actual file name used will have .genx appended
names - strarr or delimited string containg saved variable names -
number elements in array (or expanded array) should equal
the number of input parameters - Use to document saved names
text - string or string array describing file (for user internal
documentation)
notype - if set, inhibits default file type assignment
by default, filename=file+'.gen' for non xdr and
filename=file+'.genx' for xdr format
replace - [note: version 1.0 replace is default]
xdr - [note: version 1.0 and greater is always xdr]
Calling Sequence:
savegen,v1 [,v2, v3..., v15, name=name, file=file, text=text]
Calling Examples: [file name]
savegen, spectra , times, file='spec_01' 'spec_01.genx'
savegen, temp, EM, index(3:4), text=info_array(3:4), $ 'save.genx'
names=['temp', 'EM']
savegen, pimage,infil,ss, file='sxt_kp', $ 'sxt_kp.genx'
text=['SXT:KP Mag Overlay',info_array(4:5)], $
CALLS: ***
BUILDGEN, STR2ARR [1], STR2ARR [2], WRT_GENX [1], WRT_GENX [2]
CALLED BY:
CH_SYNTHETIC, EIS_LIST_EXPER [1], EIS_LIST_EXPER [2], EIS_LIST_MAIN [1]
EIS_LIST_MAIN [2], GE_WINDOW [1], GOES_TF, GOES_TF_COEFF
HW_SYNSPEC__DEFINE defines the class HW_SYNSPEC Objects of this [1]
HW_SYNSPEC__DEFINE defines the class HW_SYNSPEC Objects of this [2]
MAKE_GOES_RESP, MK_MER_CONT, MK_SUMER_DBASE, RATIO_PLOTTER [1], UPDATE_KAP
UPDATE_TERM, XCDS_BOOK, XCPT, atr2hxa_dbase, av_dt_genx, ccd_sunc [1], ccd_sunc [2]
ch_ss, eit_genx_cat, eit_proton_summary, fl_goesplot [1], fl_goesplot [2]
fl_goesplot [3], fl_suntoday [1], fl_suntoday [2], fl_suntoday [3]
fl_sxtobsnar [1], fl_sxtobsnar [2], genx_newver [1], genx_newver [2]
hsi_spectrum__filewrite, hsi_spectrum__genxwrite, jitter_gif_xyimg
make_goes_chianti_response [1], make_goes_chianti_response [2]
make_goes_chianti_response [3], make_goes_chianti_response [4]
mk_mapfile [1], mk_mapfile [2], mk_mo_log, mk_pix [1], mk_pix [2], mk_sdmi
mk_soup_hcat, msok_poi_copy [1], msok_poi_copy [2], ratio_plotter [2]
rd_dpc_table, res_freq, search_obs, sun_today [1], sun_today [2], sun_today [3]
sxt2file, sxt_etemp, sxt_mornint, sxt_summary, synop_movie, timeline, topsdb [1]
topsdb [2], trace_last_movie [1], trace_last_movie [3]
trace_special_movie [1], trace_special_movie2, video_title, web_seq
write_genxcat, xr_mk_abun_file, xsearch_obs, xset_chain [1], xset_chain [2]
History:
30-oct-91 - SLF (originally for Calibration files)
8-Nov-91 - MDM Expanded from 10 to 15 parameters
15-Apr-93 - SLF file name updates (dont clobber input)
16-Mar-93 - SLF - add struct input keyword
24-Mar-93 - SLF - update documentation and 'unclutter'
30-Mar-93 - SLF - error check positional paramter(0)
31-Mar-93 - SLF - allow names keyword to be delimited string
some documentation upgrades
Hints - if you intend on keeping a file around, it pays to include
internal documentation which will jog your memory later. The simplest
method is to supply a string or string array via the TEXT keyword.
You could save additional documentation via additional input paramters.
For example, if you journal your idl session while creating a final
data product, you could pass that in as internal documentation.
For this, you could use the generic text reader <rd_tfile.pro> to
transform the journal file to a string array - this could then
be passed in as a positional parameter (or via keyword TEXT)
For example, the following call might save an image, an index record,
reformated file info, and the journal file used during image creation:
savegen, fltimage, index, fileid, rd_tfile('idlsave.pro'), $
text='Nobel Candidate', file='apj_fig1'
An additional level of internal documentation is available through
the use of the NAMES keyword - you should use this if you desire to
retain the actual names used in the call to savegen.
EX: (may use X-cut and paste of call sequence)
savegen,index,data,info_array,names='index,data,info_array'
|-------cut---------| |----- paste -------|
Use of savegen/restgen pair (simple example):
savegen,v1,v2,v3 ; saves user variables v1,v2,v3 in 'save.genx'
restgen,a,b,c ; restores them (now named a,b,c)
To verify your file after writing, use restgen inquire option:
restgen,/inquire [,/nodata] ; displays summary of 'save.genx' contents
[Previous]
[Next]
Name: savesys
Purpose: save idl system variables for later restoration via restsys
(variables saved in yohkoh system variable: !ys_idlsys_temp)
Input Keyword Parameters:
all - if set, save all (writeable) idl system variables
aplot - if set, save all plot related variables (!x,!y,!z,!p)
x,y,z - if set, save specified axis variable (!x, !y, and/or !z)
c,order,map,more - save associated system variable(s)
Calling Examples:
savesys,/x,/y ; save !x, !y
savesys,/p ; save !p
savesys,/aplot ; save !x,!y,!z,!p
savesys,/all ; save above plus some others (!c, !map..)
Generally, a routine would use this routine paired with restsys.pro
pro junk,a,b,c
savesys,/aplot ; save plot variables
<change !x,!y,!p> ; routine plays with global variables
restsys,/aplot ; restore plot values
return
CALLED BY:
DRAW_GRID [1], DRAW_GRID [2], HSI_CWTOOLS_LINESET, HSI_FORWARDFIT, NORH_GRID [1]
NORH_GRID [2], PLOT_CLON, POLAR_GRID, SXT_GRID [1], SXT_GRID [2], SXT_GRID [3]
TV_SYNOP, event_movie [1], event_movie [2], goes_summary, goes_widget, last_lc
lcur_image, plot_nar [1], plot_nar [2], sun_grid
Side Effects:
def_yssysv.pro is called if it has not been done already to define
Yohkoh system variables
CALLS: ***
def_yssysv [1], def_yssysv [2]
Common Blocks:
def_yssysv_blk - determine if Yohkoh system variables are defined
History:
21-Apr-1993 (SLF)
22-apr-1993 (SLF) ; remove !more references
[Previous]
[Next]
NAME:
SC
PURPOSE:
To convert a numerical value in a string cutting all
trailing blanks (performed with STRCOMRESS)
CATEGORY:
PICO
CALLING SEQUENCE:
result=SC(value)
INPUTS:
value: The numerical value to be converted into a
string. This might also be a vector (one
dimensional array)
OPTIONAL INPUTS:
None
KEYWORD PARAMETERS:
DECIMALS: gives the number of decimals returned in
the string. Numbers are rounded.
SIGNIFICANT: gives the number of significant digits.
The number of decimals is automatically de-
termined.
FIELD: The number of characters in the output string
result. If the number can not be displayed
with the number of characters, asterisks are
returned (as in FORTRAN); If field is greater
than the number of characters, blanks are added
in front of the string so that the string
always ends with a character.
OUTPUTS:
result: The string without any leading or trailing
blank
OPTIONAL OUTPUTS:
None
EXAMPLE:
To print the result of a calculation execute
print,'The result is: '+SC(result,DEC=3)
Or: print a number with a width of 5 characters:
print, SC(13,FIELD=5) -> ' 13'
print, SC(100000,FIELD=3) -> '**'
COMMON BLOCKS:
None
SIDE EFFECTS:
Unknown
RESTRICTIONS:
None
PROCEDURE:
Straightforward. For Vectors recursive calls are
executed
MODIFICATION HISTORY:
Alo Epple, 31-AUG-1994
Extension for vectors 4-MAY-1995 MPAe Lindau
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
SC_CRE_POP_TRT, event
PURPOSE:
UDP creation
CATEGORY:
SC_SUMER
SYNTAX:
sc_cre_pop_trt [, event]
INPUTS:
None.
OPTIONAL INPUTS:
EVENT - Event structure from SC_SUMER
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
None.
COMMON:
Too many to mention
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, June 8, 1995, Emmanuel Petit, IAS. Written
Version 2, May 13, 1996, Liyun Wang, NASA/GSFC
Added filename confliction check
Version 3, August 7, 1996, Liyun Wang, NASA/GSFC
Started using the new technical simulator
Version 4, August 26, 1996, Liyun Wang, NASA/GSFC
Modified such that .OBJ and .SCL files are copied to the UDP
directory only when POP/UDP is registered in the DB
CONTACT:
Liyun Wang, NASA/GSFC (Liyun.Wang.1@gsfc.nasa.gov)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
SC_MNG_POP_SIM
PURPOSE:
Manage POP/UDP simulation
CATEGORY:
SC_SUMER
SYNTAX:
sc_mng_pop_sim, err
EXAMPLES:
INPUTS:
None.
OPTIONAL INPUTS:
None.
OUTPUTS:
ERR - Error flag. 0: successful, otherwise: failed
OPTIONAL OUTPUTS:
None.
KEYWORDS:
None.
COMMON:
Too many to mention
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, August 24, 1994, Emmanual Petit, IAS. Written
Version 2, September, 28, 1994, Emmanual Petit, IAS
Added common blocks
Version 3, November 3, 1994, Emmanual Petit, IAS
Added simu call
Version 4, January 24, 1996, Nicolas Morisset, IAS
Added current_det parameter for I_SIM7
Version 5, August 7, 1996, Liyun Wang, NASA/GSFC
Started using new technical simulator
CONTACT:
Liyun Wang, NASA/GSFC (Liyun.Wang.1@gsfc.nasa.gov)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
SC_MNG_STD_SIM
PURPOSE:
Manage study simulation
CATEGORY:
SC_SUMER
SYNTAX:
sc_mng_std_sim, err
INPUTS:
None.
OPTIONAL INPUTS:
None.
OUTPUTS:
ERR - Error flag. 0: successful, otherwise: failed
OPTIONAL OUTPUTS:
None.
KEYWORDS:
None.
COMMON:
Too many to mention
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, May 15, 1995, Emmanuel Petit. Written
Version 2, January 24, 1996, Nicolas Morisset, IAS
Added current_det parameter for I_SIM7
Version 3, June 12, 1996, Liyun Wang, GSFC/ARC
Converted some time and point related parameters into the
right units before calling technical simulator
Version 4, August 7, 1996, Liyun Wang, NASA/GSFC
Started using new technical simulator
CONTACT:
Liyun Wang, NASA/GSFC (Liyun.Wang.1@gsfc.nasa.gov)
[Previous]
[Next]
PROJECT:
SOHO - CDS/SUMER
NAME:
SC_MNG_TKI_SSIM
PURPOSE:
Manage sequence simulation
CATEGORY:
SC_SUMER
SYNTAX:
sc_mng_tki_ssim, err
EXAMPLES:
INPUTS:
None.
OPTIONAL INPUTS:
None.
OUTPUTS:
ERR - Error flag. 0: successful, otherwise: failed
OPTIONAL OUTPUTS:
None.
KEYWORDS:
None.
COMMON:
Too many to mention
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, July 4, 1995, Emmanuel Petit, IAS. Written
Version 2, January 24, 1996, Nicolas Morisset, IAS
Added current_det parameter for I_SIM7
Version 3, August 6, 1996, Liyun Wang, NASA/GSFC
Started using the new technical simulator
CONTACT:
Liyun Wang, NASA/GSFC (Liyun.Wang.1@gsfc.nasa.gov)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
SC_TKI_INIT
PURPOSE:
Set up some TKI parameters based on SC_SUMER status
CALLING SEQUENCE:
SC_TKI_INIT
INPUTS:
None.
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORD PARAMETERS:
None.
CALLED BY:
ST_SUMER, ST_TKI_INIT
COMMON BLOCKS:
SC_COM, @TKI_COMMON_SHARE
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
PREVIOUS HISTORY:
Written March 4, 1996, Liyun Wang, GSFC/ARC
MODIFICATION HISTORY:
Version 1, Liyun Wang, GSFC/ARC, March 4, 1996
VERSION:
Version 1, March 4, 1996
[Previous]
[Next]
PROJECT:
SOHO - CDS/SUMER
NAME:
SC_UPDATE_STATUS()
PURPOSE:
Return status of database update status
CATEGORY:
Database, planning
SYNTAX:
Result = sc_update_status()
INPUTS:
Noe required
OPTIONAL INPUTS:
NODE_NAME - Node name (applicable only to VMS system)
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
USER - Name of current IDL user; Default: sys$login
SITE - A named variable containing name of the operations site
CALLED BY:
ST_SUMER
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, May 12, 1997, Liyun Wang, NASA/GSFC. Written
CONTACT:
Liyun Wang, NASA/GSFC (Liyun.Wang.1@gsfc.nasa.gov)
[Previous]
[Next]
NAME:
SCALE_ROTATE
PURPOSE:
This function moves, scales and rotates an
image to a new position and plate scale
factor.
CATEGORY:
ANALYSIS
CALLING SEQUENCE:
Result = SCALE_ROTATE (Img,Roll,
Oldscale,Xcen,Ycen,
Newscale,Newxcen,Newycen)
INPUTS:
Img: Input image array
Roll: Angle between solar north and the top
of the image measured eastward (radians)
Oldscale: Plate scale (arc sec/pixel) of input image
Xcen: Column of sun center of input
Ycen: Row of sun center of input
Newscale: Plate scale (arc sec/pixel) of output image
Newxcen: Column of sun center to move to
Newycen: Row of sun center to move to
OPTIONAL INPUTS:
None
KEYWORD PARAMETERS:
Xsize: Number of columns in output image
Default is input image
Ysize: Number of rows in output image
Default is input image
OUTPUTS:
Result: The scaled and rotated image
OPTIONAL OUTPUTS:
None
COMMON BLOCKS:
None
SIDE EFFECTS:
None
RESTRICTIONS:
PROCEDURE:
EXAMPLE:
MODIFICATION HISTORY:
Written by: RA Howard, NRL, 27 Nov 1995.
@(#)scale_rotate.pro 1.2 05/14/97 :NRL Solar Physics
[Previous]
[Next]
Project : SOHO - LASCO
Name :
Purpose :
Category :
Explanation :
Syntax :
CALLED BY:
WC2P, mk_minim, mk_stdim, mk_stdim_list
Examples :
Inputs : None
Opt. Inputs : None
Outputs : None
Opt. Outputs: None
Keywords : None
CALLS: ***
SXADDPAR [1], SXADDPAR [2], SXADDPAR [3], WFLIMB, chk_h4s
Common :
Restrictions:
Side effects: Not known
History : Version 1, 02-Sep-1995, B Podlipnik. Written
Contact : BP, borut@lasco1.mpae.gwdg.de
[Previous]
[Next]
NAME: SCAN_PROFILE
PURPOSE:
This function returns the values of the Img in a straight line between
the end points specified by P0 and P1.
CATEGORY:
LASCO ANALYSIS
CALLING SEQUENCE:
Result = SCAN_PROFILE(Img,P0,P1,Col,Row)
INPUTS:
Img: A 2-D array containing the image intensities
P0: A 2 element array containing the column and row
values of one of the end points
P1: A 2 element array containing the column and row
values of the other end point
OUTPUTS:
Result: An array containing the scan profile from P0 to P1
OPTIONAL OUTPUTS:
COL: An array containing the image column values,
where the Function result has been computed.
ROW: An array containing the image row values,
where the Function result has been computed.
MODIFICATION HISTORY:
Written by: RA Howard, 17 Mar 1996
@(#)scan_profile.pro 1.2 05/14/97 :NRL Solar Physics
[Previous]
[Next]
NAME:
SCAN_SC_HDR
PURPOSE:
This procedure identifies the subpacket headers in the science packets
CATEGORY:
LASCO PACKETS
CALLING SEQUENCE:
SCAN_SC_HDR,Sc
INPUTS:
Sc: A 2D byte array of the packet data as read in by
READ_TM_PACKET
OUTPUTS:
This procedure writes the subpacket information to a file in
the current directory. The file name is scan_YYYY-MM-DD,
where the date is today's date.
CALLS: ***
GET_UTC, OBT2TAI, TAI2UTC, UTC2STR
PROCEDURE:
The science packet is scanned for the 4-byte subpacket headers.
The first byte is the number of 2-byte data words in the
subpacket. The second byte is the subpacket type. The
packet data are only valid when the OBE is running. WHen
OBE is not running the packets will contain 'FF'X.
MODIFICATION HISTORY:
Written by: R.A. Howard, NRL, 1993
Sep, 1999 RAH, The input data is now a byte array
@(#)scan_sc_hdr.pro 1.4 09/08/99 LASCO IDL LIBRARY
[Previous]
[Next]
Project:
SOHO - SUMER
Name:
SCONV_TAGNAMES
Purpose:
Formulate new wavelength tagnames for sumer index and data structures.
Use:
res = sconv_tagnames(waves,bte)
Inputs:
Index - A list of wavelengths, either number or string
Output:
If WAVES is an array of numbers, outputs array of strings. If
input is string with the same format as a wavelength tagname,
it will output a floating point array of wavelengths. (This
is mostly redundant with sgt_refval)
Optional Input/Output
BTE - a list of binary table extension numbers. An input is WAVES is
a list of numbers, an output if WAVES is an array of strings.
CALLS: ***
DATATYPE [1], DATATYPE [2], DATATYPE [3]
CALLED BY:
SGT_NEWREF, SUM_XINPUT
Common:
None
Written:
Terry Kucera, 14 Aug 1996
[Previous]
[Next]
Project : SOHO - CDS
Name :
SCR_ATTRIB
Purpose :
Set screen attributes to those given, in the given order.
Explanation :
To set the screen attribute to those given, in the given order.
A string containing the appropriate DEC terminal command is put
together and printed. NOTE: In general, the DEC commands correspond
to the ANSI escape sequences.
Use :
scr_attrib [, a1, a2, a3, a4, a5]
Inputs :
a1 - a5 -- The attribute codes. The attributes are set in the
command string in the given order. Thus, if a1 turns
the attributes off and a2 sets reverse video, the final
attribute will reset and then set to reverse video. If
the order were reversed, then the current attribute
would have reverse video added to it, and then would be
reset, leaving the terminal with all attributes off. Up
to five attribute codes may be specified. The codes are:
0 : all attributes off (default)
1 : bold on
2 : underscore on
3 : blink on
4 : reverse video on
Opt. Inputs : None.
Outputs : None.
Opt. Outputs: None.
Keywords : None.
Calls : None.
CALLED BY:
SELECT_O [1], SELECT_O [2], SELECT_O [3]
Common : None.
Restrictions:
This procedure will only work with DEC compatible equipment (or
terminal emulators).
Side effects: None.
Category : Utilities, User_interface
Prev. Hist. :
Written by Michael R. Greason, STX, May 1990.
Written : Michael R. Greason, GSFC/UIT (STX), May 1990
Modified : Version 1, William Thompson, GSFC, 29 March 1994
Incorporated into CDS library
Version : Version 1, 29 March 1994
[Previous]
[Next]
Project : SOHO - CDS
Name :
SCR_CHARSET
Purpose :
To change the character sets.
Explanation :
To change the character sets.
A string containing the appropriate DEC terminal command is put
together and printed. NOTE: In general, the DEC commands correspond
to the ANSI escape sequences.
Use :
scr_charset [, g, cset]
Inputs :
g -- The terminal character set to change (either 0, for the
G0 designator, or 1, for the G1 designator). 0 = default.
cset -- The character set to use:
0 : United Kingdom.
1 : United States (USASCII) -- default.
2 : Special graphics characters and line drawing set.
3 : Alternate character ROM.
4 : Alternate character ROM special graphics chars.
Opt. Inputs : None.
Outputs : None.
Opt. Outputs: None.
Keywords : None.
Calls : None.
Common : None.
Restrictions:
This procedure will only work with DEC compatible equipment (or
terminal emulators).
Side effects: None.
Category : Utilities, User_interface
Prev. Hist. :
Written by Michael R. Greason, STX, May 1990.
Written : Michael R. Greason, GSFC/UIT (STX), May 1990
Modified : Version 1, William Thompson, GSFC, 29 March 1994
Incorporated into CDS library
Version : Version 1, 29 March 1994
[Previous]
[Next]
Project : SOHO - CDS
Name :
SCR_CURMOV
Purpose :
Moves the cursor relative to its original position.
Explanation :
To move the cursor around the screen relative to its original position.
A string containing the appropriate DEC terminal command is put
together and printed. NOTE: In general, the DEC commands correspond
to the ANSI escape sequences.
Use :
scr_curmov [, cmd, n]
Inputs :
cmd -- An integer indicating the direction in which to move the curs.
0 : Up
1 : Down (Default)
2 : Left
3 : Right
n -- The number of spaces to move the cursor. If not specified
(or if less than or equal to zero), this is set to one.
Opt. Inputs : None.
Outputs : None.
Opt. Outputs: None.
Keywords : None.
Calls : None.
CALLED BY:
CURS
Common : None.
Restrictions:
This procedure will only work with DEC compatible equipment (or
terminal emulators).
Side effects: None.
Category : Utilities, User_interface
Prev. Hist. :
Written by Michael R. Greason, STX, May 1990.
Written : Michael R. Greason, GSFC/UIT (STX), May 1990
Modified : Version 1, William Thompson, GSFC, 29 March 1994
Incorporated into CDS library.
Version : Version 1, 29 March 1994
[Previous]
[Next]
Project : SOHO - CDS
Name :
SCR_CURPOS
Purpose :
Positions the cursor at the specified screen location.
Explanation :
To position the cursor at the specified screen location. Unspecified
coordinates are set to one. Please note that the ESCAPE sequence
expects the coordinates to be counted from (1,1).
A string containing the appropriate DEC terminal command is put
together and printed. NOTE: In general, the DEC commands correspond
to the ANSI escape sequences.
Use :
scr_curpos [, lin, col]
Inputs :
lin -- The screen line coordinate.
col -- The screen column coordinate.
Opt. Inputs : None.
Outputs : None.
Opt. Outputs: None.
Keywords : None.
Calls : None.
CALLED BY:
SELECT_O [1], SELECT_O [2], SELECT_O [3]
Common : None.
Restrictions:
This procedure will only work with DEC compatible equipment (or
terminal emulators).
Side effects: None.
Category : Utilities, User_interface
Prev. Hist. :
Written by Michael R. Greason, STX, May 1990.
Written : Michael R. Greason, GSFC/UIT (STX), May 1990
Modified : Version 1, William Thompson, GSFC, 29 March 1994
Incorporated into CDS library
Version : Version 1, 29 March 1994
[Previous]
[Next]
Project : SOHO - CDS
Name :
SCR_ERASE
Purpose :
To erase portions of the terminal screen.
Explanation :
To erase portions of the terminal screen.
A string containing the appropriate DEC terminal command is put
together and printed. NOTE: In general, the DEC commands correspond
to the ANSI escape sequences.
Use :
scr_erase [, cmd]
Inputs : None.
Opt. Inputs :
cmd -- An integer telling the procedure what part of the screen to
erase. If not specified, it is set to 5. Key:
0 : From cursor to end-of-line.
1 : From beginning-of-line to cursor.
2 : Entire line containing cursor.
3 : From cursor to end-of-screen.
4 : from beginning-of-screen to cursor.
ELSE : Entire screen.
Outputs : None.
Opt. Outputs: None.
Keywords : None.
Calls : None.
CALLED BY:
SELECT_O [1], SELECT_O [2], SELECT_O [3]
Common : None.
Restrictions:
This procedure will only work with DEC compatible equipment (or
terminal emulators).
Side effects: None.
Category : Utilities, User_interface
Prev. Hist. :
Written by Michael R. Greason, STX, May 1990.
Written : Michael R. Greason, GSFC/UIT (STX), May 1990
Modified : Version 1, William Thompson, GSFC, 29 March 1994
Incorporated into CDS library
Version : Version 1, 29 March 1994
[Previous]
[Next]
Project : SOHO - CDS
Name :
SCR_OTHER
Purpose :
To allow the user to issue any ESCAPE sequence.
Explanation :
To allow the user to issue any ESCAPE sequence.
A string containing the appropriate DEC terminal command is put
together and printed. NOTE: In general, the DEC commands correspond
to the ANSI escape sequences.
Use :
scr_other, str
Inputs :
str -- A string containing the escape sequence. The initial ESCAPE
should not be included; this will be added by this procedure.
This parameter is NOT optional; if not available, the
procedure will return without doing anything.
Opt. Inputs : None.
Outputs : None.
Opt. Outputs: None.
Keywords : None.
Calls : None.
CALLED BY:
SELECT_O [1], SELECT_O [2], SELECT_O [3]
Common : None.
Restrictions:
This procedure will only work with DEC compatible equipment (or
terminal emulators).
Side effects: None.
Category : Utilities, User_interface
Prev. Hist. :
Written by Michael R. Greason, STX, May 1990.
Written : Michael R. Greason, GSFC/UIT (STX), May 1990
Modified : Version 1, William Thompson, GSFC, 29 March 1994
Incorporated into CDS library
Version : Version 1, 29 March 1994
[Previous]
[Next]
Project : SOHO - CDS
Name :
SCR_RESET
Purpose :
To reset the terminal.
Explanation :
To reset the terminal.
A string containing the appropriate DEC terminal command is put
together and printed. NOTE: In general, the DEC commands correspond
to the ANSI escape sequences.
Use :
scr_reset
Inputs : None.
Opt. Inputs : None.
Outputs : None.
Opt. Outputs: None.
Keywords : None.
Calls : None.
Common : None.
Restrictions:
This procedure will only work with DEC compatible equipment (or
terminal emulators).
Side effects: None.
Category : Utilities, User_interface
Prev. Hist. :
Written by Michael R. Greason, STX, May 1990.
Written : Michael R. Greason, GSFC/UIT (STX), May 1990
Modified : Version 1, William Thompson, GSFC, 29 March 1994
Incorporated into CDS library
Version : Version 1, 29 March 1994
[Previous]
[Next]
Project : SOHO - CDS
Name :
SCR_SCROLL
Purpose :
Defines the scrolling area on the screen.
Explanation :
To define the scrolling area on the screen. Please note that the
line coordinates should be counted from 1.
A string containing the appropriate DEC terminal command is put
together and printed. NOTE: In general, the DEC commands correspond
to the ANSI escape sequences.
Use :
scr_scroll [, top, bot]
Inputs :
top -- The line to be the top of the scrolling area.
The default value is 1 and the maximum value is 23.
bot -- The line to be the bottom of the scrolling area.
The default value is 24 and the minimum value is 2.
Opt. Inputs : None.
Outputs : None.
Opt. Outputs: None.
Keywords : None.
Calls : None.
Common : None.
Restrictions:
This procedure will only work with DEC compatible equipment (or
terminal emulators).
Side effects:
NOTE: The screen coordinate system is NOT effected. (1,1) is not
the top of the scrolling area but the top of the screen.
Category : Utilities, User_interface
Prev. Hist. :
Written by Michael R. Greason, STX, May 1990.
Written : Michael R. Greason, GSFC/UIT (STX), May 1990
Modified : Version 1, William Thompson, GSFC, 29 March 1994
Incorporated into CDS library
Version : Version 1, 29 March 1994
[Previous]
[Next]
Name: scratch
Purpose: manage scratch files (names, auto-delete, units,...)
(compatible with VMS/Unix)
Input Parameters:
u0, u1, ... u9 ;if defined on input, log units to close and delete
Output Parameters:
u0, u1, ... u9 ;if undefined, logical units assigned during open
Keyword Parameters:
nodelete - (input) dont delete on close (default is to delete)
cleanup - (input) deletes all scratch generated files (even old stuff)
open - (input) force open mode (default if u0 present and undefined)
close - (input) force close mode (default if u0 present and defined)
names - (output) scratch file names acted upon (open/close/delete)
file - (input) use this name, not system derived
Calling Sequence:
scratch,u1,u2,u3 ; if parameters undefined, open 3 scratch files
; if parameters defined, close/delete files
Calling Examples:
scratch, u1, u2, u3, /open ; open 3 files, return luns in u1, u2, u3
scratch, u1, u2, /close ; close and delete files open w/luns u1/u2
scratch, u2, /print ; same, but print before deleting
scratch, u1, /nodelete ; close, dont delete
scratch, u1, u2 ; if u1 is undfined: open 2 files
(same as scratch, u1, u2 ,/open)
if u1 is defined, close/delete 2 files
(same as scratch, u1, u2, /close)
scratch, u1, name=name ; return system derived file name used
scratch ; close/delete all open scratch files
scratch,/cleanup ; same plus any old scratch files from
scratch,/clean,/nodel,name=name ; new and old scratch file names
scratch,u1,file='fname',/open ; opens fname
CALLS: ***
CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], DPRINT, LPRINT, concat_dir [4]
CALLED BY:
F0READ, RICE, prstr [1], prstr [2], teambb [1], teambb [2]
Restrictions:
uses execute statement, so no recursion allowed
if user supplies file names (with file= keyword), then some
auto-mangagement functions are lost (ex: /cleanup function)
History: slf, 3-March-1993
slf, 1-jun-93 ; dont force file in home directory
slf, 3-jun-93 ; openw not openu
[Previous]
[Next]
Project : SOHO - CDS
Name :
SCREEN_SELECT
Purpose : Interactively select from list using widgets, X or terminal
Explanation :
Routine to allow a user to make an interactive screen selection
from a list (array) of strings. This procedure determines whether
to use dumb terminal version, the non- widget x-windows version or
the widget version by examining the !D.NAME system variable.
The actual processing is farmed out to different procedures depending
on the terminal type.
Widget Terminal ==> SELECT_W.PRO
Vanilla X windows ==> SELECT_X.PRO
VT100 Terminal ==> SELECT_O.PRO
Use :
screen_select, selections, iselected, comments, command_line, only_one
Inputs :
selections - string array giving list of items that can be
selected.
Opt. Inputs :
comments - comments which can be requested for each item in
array selections. It can be:
string array - same length as array selections.
null string - no comments available
scalar string - name of a procedure which will
return comments. It will take selections
as its first argument and return comments
as its second argument.
command_line - optional command line to be placed at the bottom
of the screen. It is usually used to specify what the
user is selecting.
only_one - integer flag. If set to 1 then the user can only select
one item. The routine returns immediately after the first
selection is made.
Outputs :
iselected - list of indices in selections giving the selected
items.
Opt. Outputs: None.
Keywords : None.
Calls : ***
SELECT_O [1], SELECT_O [2], SELECT_O [3], SELECT_W [1], SELECT_W [2], SELECT_W [3]
SELECT_X
CALLED BY:
DBOPEN [1], DBOPEN [2], DBOPEN [3], DB_ITEM [1], DB_ITEM [2], DB_ITEM [3]
Common : None.
Restrictions: None.
Side effects:
!err is set to the number of selections made
Category : Utilities, User_interface
Prev. Hist. :
Written by M. Greason, STX, May 1990.
Added widget support W. Landsman January, 1992
Written : M. Greason, GSFC/UIT (STX), May 1990
Modified : Version 1, William Thompson, GSFC, 29 March 1994
Incorporated into CDS library
Version : Version 1, 29 March 1994
[Previous]
[Next]
CALLS:
[Previous]
[Next]
[Previous]
[Next]
Name: search
Purpose: emulate VMS search utility
Input Parameters:
file - file to search (can be string array also)
string - string to search for
Keyword Parameters:
window - number of lines above/below matches to display
case_ignore - force search to be case insensitive
Calling Sequence:
search, file, string [, window=[above,below], /case_ignore]
search, file, string, window=delta
search, array, string
CALLS: ***
FILE_EXIST [2], data_chk [1], data_chk [2], file_exist [1], file_exist [3]
prstr [1], prstr [2], rd_tfile [1], rd_tfile [2], uniqo [1], uniqo [2], wc_where [1]
wc_where [2]
CALLED BY:
check_log [1], check_log [2], sfc_check
History:
15-Apr-1994 (SLF) Written (uses rd_tfile and wc_where)
18-Apr-1994 (SLF) Minor change to delimit logic
22-Apr-1994 (SLF) Allow string array, add FIRST and LAST keywords
[Previous]
[Next]
Name: search_file
Purpose: Search data path list for input file
Input: filename
Output: function returns file name with path or '' if not found
Method: quick and dirty (calls data_paths)
CALLS: ***
DATA_PATHS, browse_files
CALLED BY:
CkFurFiles
History: slf, 10/91
[Previous]
[Next]
NAME:
sel_filetimes
PURPOSE:
To select the files within a time range (assuming the file
date/time is in the filename in YYMMDD.HHMM format
SAMPLE CALLING SEQUENCE:
files = sel_filetimes('1-jun','1-jul',files)
files = sel_filetimes('1-jun','1-jul',dir='/data14/mdi_summary/daily/mag')
INPUTS:
sttim - the starting date/time
entim - the ending date/time
INPUT/OUTPUT:
files - The full list of files to search through. It is output
if it is not defined coming in
CALLS: ***
BREAK_FILE [1], BREAK_FILE [2], BREAK_FILE [3], anytim2ints [1], anytim2ints [2]
break_file [4], fid2ex [1], fid2ex [2], file_list [1], file_list [2]
sel_timrange [1], sel_timrange [2]
CALLED BY:
QUICKSTRAY [2], TR_DARK_SUB, TR_FLAT_SUB, edac_summary, get1hk_info [1]
get1hk_info [2], get_epoch_sfcs [1], get_epoch_sfcs [2], hxt_impulsivness
new_edac_summary, rd_fdss, rd_raw_station_plan, ssc_files [1], ssc_files [2]
ssc_files [3], sxt_files, tr_rd_index, tr_rd_inventory, yohkoh_files
OPTIONAL KEYWORD INPUT:
dir - The director(ies) to search
filter - The wildcard filter to use to select files in the
directories
position- The starting position of the YYMMDD.HHMM string. It is
derived by looking for the charcter "9" otherwise.
RESTRICTION:
All file names must be of the same form
HISTORY:
Written 30-Aug-96 by M.Morrison
4-Feb-97 (MDM) - Modification to not call BREAK_FILE if FILE_LIST
was used and passed the file name back already
[Previous]
[Next]
Project : SOHO - CDS
Name : SEL_LINE_EVENT
Purpose : Processes events from the SEL_LINE_MENU.
Explanation : Any events originating within the widgets realized by
SEL_LINE_MENU are handled by this routine.
Use : Only by XMANAGER
Inputs : ev - the event structure
Opt. Inputs : None
Outputs : None
Opt. Outputs: None
Keywords : None
Calls : ***
ARR2STR [1], Arr2Str [2], Bell, REM_DUP [1], REM_DUP [2], REM_DUP [3], WAVE2PIX
WHICH_GIS_BAND, WHICH_NIS_BAND
Restrictions: For use with SEL_LINE_MENU.
Side effects: None
Category : Telemetry
Prev. Hist. : None
Written : C D Pike, RAL, 3-Apr-95
Modified : Improve sorting by element. CDP, 12-Apr-95
Limit number of lines to size of array given. CDP, 9-Nov-95
Version : Version 3, 9-Nov-95
[Previous]
[Next]
Project : SOHO - CDS
Name : SEL_LINE_MENU
Purpose : Defines the mk_raster line selection window.
Explanation : Creates the widgets which form the window within which
the spectral lines can be selected.
Use : sel_line_menu
Inputs : None
Opt. Inputs : None
Outputs : None
Opt. Outputs: None
Keywords : None
Calls : ***
CDS_SLINE, CONCAT2D, PIX2WAVE, STRPAD, XMANAGER, XPDMENU, XREGISTERED
Restrictions: None
Side effects: None
Category : Technical, planning
Prev. Hist. : None
Written : C D Pike, RAL, 3-Apr-95
Modified :
Version : Version 1, 3-Apr-95
[Previous]
[Next]
NAME:
sel_timrange
PURPOSE:
Given a range of times (or a single time) and a time array, return the
subscripts of the times between the selected time range. If /BOOLEAN,
then return a bytarr the length of the input marking where within range.
SAMPLE CALLING SEQUENCE:
ss = sel_timrange(timarr, st_tarr, en_tarr)
ss = sel_timrange(timarr, st_tarr, en_tarr, /between)
ss = sel_timrange(roadmap, '1-nov-91 22:00', '1-nov-91 22:30')
ist = sel_timrange(neworb_p, st_tarr, st_before1st=st_before1st)
ien = sel_timrange(neworb_p, en_tarr, en_afterlast=en_afterlast, /after)
INPUT:
timarr - An array of times
st_tarr - The specified start time
OPTIONAL INPUT:
en_tarr - The specified end time. If it is not passed, then the
start time is used (time range of 0 seconds)
CALLS: ***
anytim2ints [1], anytim2ints [2], int2secarr [1], int2secarr [2]
CALLED BY:
GET_SUNCENTER [1], GET_SUNCENTER [2], IRUHXA2SXT, IRUHXASCAN2SXT [1]
IRUHXASCAN2SXT [2], IRU_S2Y, SXT_BAKEOUT_IN, SXT_OBSRPT, Sxt_goes_teem
ads_into_att, atr2hxa_dbase, cdrom_files [2], choose_interval, contact_num [1]
contact_num [2], eit_files, eit_proton_summary, get_acedata, get_selsis
get_utevent [1], get_utevent [2], goes3sec_copy, goes_widget, gtab_summary
hkplot_info, lapalma_cat, lapalma_files, lasco_time2file, les_archive_info
mdi_cat, mdi_files, mk_sdc [2], mk_sdc [3], mk_sdc [4], mk_sfc [1], mk_sfc [2]
mk_sft [1], mk_sft [2], pr_pnt_hist, pr_visible, rd_fdss, rd_goes_fits
rd_goesp_ascii, rd_goesx_ascii, rd_guf_ascii, rd_old_obs, rd_raw_station_plan
rd_sxa, rd_sxc, rd_sxl, rd_sxtgoes, rd_therm_rs232, rd_week_file [1]
rd_week_file [2], rd_week_file [3], rd_week_file [4], read_genxcat, ref_term [2]
res_freq, search_obs, sel_dc_image [1], sel_dc_image [2], sel_dc_image [3]
sel_filetimes [1], sel_filetimes [2], sel_leak_image [1], sel_leak_image [3]
sel_leak_image [4], show_contacts, sooncat_cadence, ssw_getdst, sswdb_files
sxi_files, sxt_imgtypes, term_times, timeline2html, tr_rd_index, weekid [2]
wrt_fits_bin_exten [2], ydb_exist [2], yohkoh_legacy_files [1]
yohkoh_legacy_files [2]
OPTIONAL KEYWORD INPUT:
between - The default is to give the last entry before the start time.
This is because the input time is usually a pointer (or file name)
with the time of the start of the orbit. So the selection
desired is needs to back up one element in the timarr. This
is only done when the input start time does not exactly match the
"timarr" value.
after - If set, get the first dataset after the input time range
boolean - If set, then return an array the same length as the input, and
set all values within the range to 1.
OPTIONAL KEYWORD OUTPUT:
st_before1st - If set, then the input start time is before the first time
in "timarr"
en_afterlast - If set, then the input end time is after the last time
in "timarr"
HISTORY:
Written Oct-92 by M.Morrison
29-Oct-92 (MDM) - Corrected an error in "en_afterlast" determination
30-Oct-92 (MDM) - Added /AFTER which corrected for a problem
with the RD_PNT logic
[Previous]
[Next]
Project : SOHO - CDS
Name :
SELECT_O
Purpose :
Allows interactive (text) screen selection from a list.
Explanation :
Routine to allow a user to make an interactive screen selection
from a list (array) of strings. This assumes a non-x-windows device.
Use :
select_o, selections, iselected, comments, command_line, only_one
Inputs :
selections - string array giving list of items that can be
selected.
Opt. Inputs :
comments - comments which can be requested for each item in
array selections. It can be:
string array - same length as array selections.
null string - no comments available
scalar string - name of a procedure which will
return comments. It will take selections
as its first argument and return comments
as its second argument.
command_line - optional command line to be placed at the bottom
of the screen. It is usually used to specify what the
user is selecting.
only_one - integer flag. If set to 1 then the user can only select
one item. The routine returns immediately after the first
selection is made.
Outputs :
iselected - list of indices in selections giving the selected
items.
Opt. Outputs: None.
Keywords : None.
Calls : ***
READ_KEY [1], READ_KEY [2], READ_KEY [3], SCR_ATTRIB [1], SCR_ATTRIB [2]
SCR_ATTRIB [3], SCR_CURPOS [1], SCR_CURPOS [2], SCR_CURPOS [3], SCR_ERASE [1]
SCR_ERASE [2], SCR_ERASE [3], SCR_OTHER [1], SCR_OTHER [2], SCR_OTHER [3]
CALLED BY:
SCREEN_SELECT [1], SCREEN_SELECT [2], SCREEN_SELECT [3]
Common : None.
Restrictions: None.
Side effects:
!err is set to the number of selections made
Category : Utilities, User_interface
Prev. Hist. :
version 1, D. Lindler April 88.
modified to IDL V2 (from screen_select). M. Greason, May 1990.
changed name from screen_select_o W. Landsman January 1993
Written : D. Lindler, GSFC/HRS, April 1988
Modified : Version 1, William Thompson, GSFC, 29 March 1994
Incorporated into CDS library
Version : Version 1, 29 March 1994
[Previous]
[Next]
Project : SOHO - CDS
Name :
SELECT_W
Purpose :
Creates a non-exclusive menu in widget form.
Explanation :
This procedure creates a non-exclusive menu of items
in widget form. More than one item may be selected or
'de-selected'. Normally called by SCREEN_SELECT
Use :
SELECT_W, items ,iselected, [ comments, command_line, only_one ]
Inputs :
items - string array giving list of items that can be
selected.
Opt. Inputs :
comments - comments which can be requested for each item in
array selections. NOT YET IMPLEMENTED
command_line - optional command line to be placed at the bottom
of the screen. It is usually used to specify what the
user is selecting.
only_one - integer flag. If set to 1 then the user can only select
one item. The routine returns immediately after the first
selection is made.
Outputs :
iselected - list of indices in selections giving the selected
items.
Opt. Outputs: None.
Keywords : None.
Calls : ***
SELECT_W_EVENT, XMANAGER, XMENU [1], XMENU [2]
CALLED BY:
SCREEN_SELECT [1], SCREEN_SELECT [2], SCREEN_SELECT [3]
Common :
SELECT_W - Used to communicate with the SELECT_W_EVENT procedure
Restrictions: None.
Side effects: None.
Category : Utilities, User_interface
Prev. Hist. :
Written, K. Venkatakrishna & W. Landsman, Hughes/STX January, 1992
Widgets made MODAL. M. Greason, Hughes STX, 15 July 1992.
Written : K. Venkatakrishna & W. Landsman, GSFC/UIT (Hughes/STX),
January 1992
Modified : Version 1, William Thompson, GSFC, 29 March 1994
Incorporated into CDS library
Version : Version 1, 29 March 1994
[Previous]
[Next]
Project : SOHO - LASCO/EIT
Name : SELECTD
Purpose : Select images on date
Category : Utils
Explanation : From a list of FITS files header is read and a keyword DATE-OBS
is checked .
Syntax : result = selectd ( files, start_date, end_date )
CALLED BY:
WOBSDATE
Examples :
Inputs : STRARR files : list with FITS files to be checked
STRING start_date, end_date in form : "95-MAR-8"
Opt. Inputs : None.
Outputs : STRARR result with a list of FITS files found.
Opt. Outputs: None.
Keywords : None.
Common : None.
Restrictions: None.
Side effects: None.
History : 22 mar 1995,Borut Podlipnik,MPAe,Written
Contact : BP, borut@lasco1.mpae.gwdg.de
Calls : anytim2utc(), grep(), headfits()
[Previous]
[Next]
Name: seq_cubes
Purpose: return indices corresponding to sequence table entries
13 element string array returned
CALLS:
CALLED BY
make_views
[Previous]
[Next]
Name: seq_dset
Purpose: return dset vector corresponding to one occurence of 1 sequence
table entry - uses serial number for grouping. Function return
value is used in rd_sda call.
Parameters:
Input - rmap=roadmap structure
sequence=sxt sequence number
occurence=which occurence
Output- function returns data set vector
Calling Sequence:
dset = SEQ_DSET(rmap, sequence#, occurence
CALLS:
[Previous]
[Next]
NAME:
seq_frame_info
PURPOSE:
To read the housekeeping data and to return information on the per-exposure
frames ("unwrap" the circular queue)
SAMPLE CALLING SEQUENCE:
seq_frame_info, '25-oct-95 19:50', '25-oct-95 20:10'
seq_frame_info, sttim, entim, mat, hk0
seq_frame_info, sttim, entim, mat, hk0, outfil='dd.dd', /qprint, /qplot
CALLS: ***
data_type [1], data_type [2], fmt_tim [1], fmt_tim [2], get_hk_info [1]
get_hk_info [2], int2secarr [1], int2secarr [2], plottime [1], plottime [2]
CALLED BY:
plot_expos_hist, pr_seq_frame_info
HISTORY:
Written Dec-95 by M.Morrison
20-Feb-96 (MDM) - Added header and put on-line
27-Feb-96 (DBG) - Patched a check for no data available
18-Mar-96 (MDM) - Made the FOR loop be a long word
- Added reftime output
17-Dec-96 (MDM) - Added shifting of the time by 3 sec per entry
[Previous]
[Next]
NAME:
seq_run_sum
PURPOSE:
To look through the Sequence ID and log all times when the
sequence was running
SAMPLE CALLING SEQUENCE:
seq_run_sum, '18-dec-95', !stime
seq_run_sum, month='Jan-96', outfil='$MDI_CAL_INFO/9601.seq_run_sum
seq_run_sum, sttim, entim, outfil=outfil, month=month, info=info
INPUTS:
sttim - starting time
entim - ending time
CALLS: ***
MASK, SEQ_SUM_P2, UNIQ [1], UNIQ [2], UNIQ [3], anytim2ex [1], anytim2ex [2]
anytim2ints [1], anytim2ints [2], data_type [1], data_type [2], fmt_tim [1]
fmt_tim [2], get_hk_info [1], get_hk_info [2], gt_day [1], gt_day [2]
hk_time_sort, int2secarr [1], int2secarr [2], restgen [1], restgen [2]
ut_time [1], ut_time [2]
CALLED BY:
MDI_SUMMARY
OPTIONAL KEYWORD INPUT:
outfil - an output file name to write to
month - Optionally specify the month rather than the sttim/entim
info - The get_hk_info returned structure
HISTORY:
Written Jan-96 by M.Morrison
15-Jan-96 (MDM) - Added documentation and cleaned it up
31-Jan-96 (MDM) - Added call to HK_TIME_SORT to clean up the slotted
file error problem
22-Feb-96 (MDM) - Corrected for case where the sequence was never running
- Modified to not corrupt/change the input variable
[Previous]
[Next]
NAME: set_cal_hdr.pro
PURPOSE: set some keywords in Calibration headers
CATEGORY: General tools low level routine
CALLING SEQUENCE: set_ima_hdr,ima_header,refpix_x,refpix_y
INPUTS: ima_header = structure
refpix_x = float, (position of reference 0.,0.)
refpix_y = float, (position of reference 0.,0.)
OPTIONAL INPUT PARAMETERS: None
KEYWORD PARAMETERS: None
OUTPUTS: ima_header
OPTIONAL OUTPUT PARAMETERS:
COMMON BLOCKS: None
SIDE EFFECTS:
RESTRICTIONS:
PROCEDURE:
MODIFICATION HISTORY:
All 4/25/93 for VMS files in general
SCCS variables for IDL use
@(#)set_ima_header.pro 1.3 4/10/93 :NRL Solar Physics
[Previous]
[Next]
NAME: SET_CATALOG.PRO
PURPOSE: Set a catalog of images in memory
CATEGORY: Preprocessing high level routine
CALLING SEQUENCE: SET_CATALOG
INPUTS: template Template For image names
db_dark Liste of images
ndarks Number of images in catalog
drk_name Associate dark name
OPTIONAL INPUT PARAMETERS: None
KEYWORD PARAMETERS: None
OUTPUTS: catalog list in the screen
OPTIONAL OUTPUT PARAMETERS: None
COMMON BLOCKS: None
SIDE EFFECTS: opens a catalog of darks if it don't exists
RESTRICTIONS:
PROCEDURE:
MODIFICATION HISTORY: defined by ALL 6/24/93
SCCS variables for IDL use
@(#)set_catalog.pro 1.0 25/6/93 :LAS
[Previous]
[Next]
Project : SOHO - CDS
Name : SET_CDS_FITS
Purpose : Define CDS_FITS_DATA environment variable to
available disks
Category : planning
Explanation :
Syntax : IDL>set_cds_fits
Inputs : None
Opt. Inputs : DEF_PATH = default path for CDS_FITS_DATA [def = current]
Keywords : IMAX = max disk number to search [def=20]
FIRST = put default path first
ROOT = lead root directory (def = '/')
CALLS: ***
ARR2STR [1], Arr2Str [2], DATATYPE [1], DATATYPE [2], DATATYPE [3], EXIST, IS_DIR
LOC_FILE [1], LOC_FILE [2], LOC_FILE [3], TRIM
Side effects: CDS_FITS_DATA is defined
History : Version 1, 31-May-1997, D.M. Zarro. Written
Contact : DZARRO@SOLAR.STANFORD.EDU
[Previous]
[Next]
Project : SOHO - CDS
Name : SET_CDS_SDB
Purpose : append 'sdb' directories to ZDBASE
Category : Planning
Syntax : IDL> set_cds_sdb
CALLS: ***
CHKLOG [1], CHKLOG [2], DEF_DIRLIST, DPRINT, FIND_ALL_DIR [1], FIND_ALL_DIR [2]
FIND_ALL_DIR [3], FIX_ZDBASE, IS_BLANK, IS_DIR, IS_STRING
CALLED BY:
CDS_FILES, GT_CDS_QL, RD_CDS_POINT, XCAT
Side effects: Environment/logical ZDBASE is reset
History : Version 1, 5-August-1997, D M Zarro. Written
Contact : DZARRO@SOLAR.STANFORD.EDU
[Previous]
[Next]
Name: set_fastpath
Purpose: use ys environmentals and path file to do fast path setup
Output:
function returns string in !path format
Optional Keyword Parameters:
arr - switch, if set, return as array, not delimited string
Calling Examples:
!path=set_fastpath() ; update IDL !path
parr =set_fastpath(/arr) ; array version
History:
21-Apr-93 (SLF) - to hide temp variables during IDL_STARTUP
10-oct-93 (slf) - allow '/ys/' <==> getenv('ys') for uniq check
29-Jun-94 (SLF) - dont eliminate astronomy library during fast start
30-Jun-94 (SLF) - dont add non-existant paths
CALLS: ***
ARR2STR [1], Arr2Str [2], STR2ARR [1], STR2ARR [2], rem_elem [1], rem_elem [2]
uniqo [1], uniqo [2]
Restrictions:
This routine must be in path already! UNIX only for today
[Previous]
[Next]
Project : SOHO - CDS
Name : SET_KAP_VERS()
Purpose : Sets version number of last KAP file read for given date
Explanation : This procedure sets the version number of the last KAP file
read for a given date.
Use : Result = SET_KAP_VERS( DATE, VERSION )
IF NOT SET_KAP_VERS( DATE, VERSION ) THEN ...
Inputs : DATE = The date that the user wishes to look up the version
for. This can be in any of the standard CDS time
formats.
VERSION = The version number. This must be a non-negative
integer number.
Opt. Inputs : None.
Outputs : The result of the function is a logical value representing
whether or not the operation was successful, where 1 is
successful and 0 is unsuccessful.
Opt. Outputs: None.
Keywords :
ERRMSG = If defined and passed, then any error messages will be
returned to the user in this parameter rather than
depending on the MESSAGE routine in IDL. If no errors are
encountered, then a null string is returned. In order to
use this feature, ERRMSG must be defined first, e.g.
ERRMSG = ''
Result = SET_KAP_VERS( ERRMSG=ERRMSG, ... )
IF ERRMSG NE '' THEN ...
Calls : ***
ANYTIM2UTC [1], ANYTIM2UTC [2], DBBUILD [1], DBBUILD [2], DBBUILD [3], DBCLOSE [1]
DBCLOSE [2], DBCLOSE [3], DBFIND [1], DBFIND [2], DBFIND [3], DBOPEN [1], DBOPEN [2]
DBOPEN [3], DBUPDATE [1], DBUPDATE [2], DBUPDATE [3], DBUPDATE [4], LAST_KAP_VERS
TRIM
CALLED BY:
READ_KAP
Common : None.
Restrictions: Only this routine can be used to add KAP version information to
the database. Modifying the database by hand could corrupt its
integrity.
!PRIV must be 2 or greater to use this routine.
Side effects: None.
Category : Planning, Databases.
Prev. Hist. : None.
Written : William Thompson, GSFC, 24 May 1995
Modified : Version 1, William Thompson, GSFC, 24 May 1995
Version : Version 1, 24 May 1995
[Previous]
[Next]
NAME:
set_list_addr
PURPOSE:
Given a bin list and a start address, modify all address
references within the list to allow the table to reside at
that address
CALLED BY:
check_dumps [1], mk_list_load, mk_mdi_load
HISTORY:
Written 24-Jul-95 by M.Morrison
25-Jul-95 (MDM) - Added header information
2-Aug-95 (MDM) - Fixed bug with IRBIN processing
19-Mar-96 (MDM) - Added capability to stop list processing when
reach the number of entries (for VWBIN) because
of problem with 6003 list.
23-May-96 (MDM) - Corrected error for IRBIN when going from addressed
offset back to an offset of 0
19-Jul-96 (MDM) - Removed address adjustment for crop list (the
addresses it was moving were ccd pixel address.
15-Nov-96 (MDM) - Removed "printf,lun"
6-Jan-97 (MDM) - Adjusted 23-May-96 mod to allow forward offsets
CALLS: ***
MOD_LIST_ADDR, RFITS [1], RFITS [2], RFITS [3], SEA_MARK_LIST, UNSIGN, bits [1]
bits [2]
RESTRICTIONS:
* The start table address must be 0000 for the input list
[Previous]
[Next]
Name: set_logenv
Purpose: set environmental variable (unix) and logicals (vms)
(allow dynamic updates of Yohkoh environment)
Input Paramters:
logenv - string or string vector - unix environ or vms logical names
value - string or string vector - values to assign to logenv
Calling Examples:
set_logenv,'DIR_GEN_PNT',curdir() ; redefine PNT to current
set_logenv,file=concat_dir('$DIR_SITE_SETUP','setup_dirs')
Keyword Parameters:
file - string (scaler/vector) of file names to process
files are expected to be two or three column tables containing
logical/environmental information - embedded comments are ok
if # is used for unix and ! for vms (readable by rd_tfile.pro)
NCOLS
2: first column are logicals/environmentals
second column are values to assign (ie, table)
3: first column is ignored (example ('setenv' or 'define')
second and third columns are interpreted as logs/envs
and values to assign, respectively.
(This option allows direct processing of Yohkoh
(files like setup_dirs and setup_ysenv)
When file is a vector, they are processed in order so
logs/envs defined in multiple files get the final assignment
from the last reference.
CALLED BY:
CHANPHZCHEK, FS_OPEN [1], F_TH_NT, HESI_MENU, HESSI_DEV, HSI_MODEL_TO_SCORE
HSI_VCFILE_PACKET_RATE, Hsi_contact2fits [1], Hsi_contact2fits [2], choose_sfc
configure_http, get_pix, get_sirius [1], get_sirius [2], hessi_version
hsi_clk_delta_calc, hsi_do_qlook_image [1], hsi_do_qlook_image [2]
hsi_monthly_average, hsi_qlook_call_ospex [1], hsi_qlook_call_ospex [2]
hsi_switch, mo_patch, pref_super, printing [1], printing [2], rd_goesp_ascii
rd_goesx_ascii, read_trace, restenv [1], restenv [2], setssw_windows
ssw_instr_info, ssw_set_instr, ssw_setsswdb_gen, ssw_setup_windows
ssw_upgrade [1], ssw_upgrade [2], ssw_upgrade_backup, sswdb_upgrade
sxt_patch_att, sxt_prep [1], sxt_prep [2], sxt_prep [3], trace_last_movie [1]
trace_last_movie [2], trace_last_movie [3], trace_movie_index [1]
trace_movie_index [2], trace_special_movie [1], trace_special_movie [2]
trace_special_movie [3], trace_special_movie2, trace_write_genxcat, ydb_use
History:
27-Apr-1993 (SLF) - For dynamic relocation/additon of pointers
30-Apr-1993 (SLF) - improved file option / parameter validation
16-May-1994 (SLF) - fixed type in vms code
CALLS: ***
SETLOG, data_chk [1], data_chk [2], rd_tfile [1], rd_tfile [2]
Restrictions:
Can't specify both array and file
Not all VMS setlog options are available
[Previous]
[Next]
NAME:
set_offset
PURPOSE:
To display the tcblock command to set the offset corner
for extract
SAMPLE CALLING SEQUENCE:
set_offset, 9, 300, 700
set_offset, 15, center=300
HISTORY:
Written 22-Mar-96 by M.Morrison
[Previous]
[Next]
Purpose: incorporate idl version specific directorys in !path
History: slf, 23-feb-1993
slf, 30-mar-1993 return to caller on error
rdb, 16-Aug-94 modified to also run under VMS
rdb, 26-Aug-94 moved printe statement inside conditional
CALLS: ***
ARR2STR [1], Arr2Str [2], CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3]
concat_dir [4]
Side Effects:
If IDL version is older than ys master, !path may be modified
[Previous]
[Next]
NAME:
set_printer
PURPOSE:
To allow the user to set the printer queue where the output will
come out
CALLS: ***
input [1], input [2], tbeep [1], tbeep [2], tbeep [3], wmenu_sel [1], wmenu_sel [2]
CALLED BY:
xanal_emi, xdisp_fits, xdisp_trace [1], xdisp_trace2, xdisp_trace3, xhkplot
HISTORY:
Written 25-Apr-94 by M.Morrison
27-Apr-94 (MDM) - Various changes
20-Jan-95 (MDM) - Changed "lp -dlaser" to "lp -c -dlaser"
28-Feb-95 (MDM) - Added option to send to QUAKE qms printer remotely
30-Nov-95 (MDM) - Changed "To redirect to LPARL lps20 from outside LPARL"
option to point to umbra and que saglps20ps
30-Apr-96 (MDM) - Added option to print to SAG
27-Jan-97 (MDM) - Added option to print to DIAPASON
[Previous]
[Next]
NAME:
set_printer
PURPOSE:
To allow the user to set the printer queue where the output will
come out
CALLED BY:
xanal_emi, xdisp_fits, xdisp_trace [1], xdisp_trace2, xdisp_trace3, xhkplot
HISTORY:
Written 25-Apr-94 by M.Morrison
27-Apr-94 (MDM) - Various changes
20-Jan-95 (MDM) - Changed "lp -dlaser" to "lp -c -dlaser"
28-Feb-95 (MDM) - Added option to send to QUAKE qms printer remotely
30-Nov-95 (MDM) - Changed "To redirect to LPARL lps20 from outside LPARL"
option to point to umbra and que saglps20ps
30-Apr-96 (MDM) - Added option to print to SAG
27-Jan-97 (MDM) - Added option to print to DIAPASON
------------ Big variation ----------------
15-Apr-97 (MDM) - Modified to work with SPRINT instead of PPRINT
- Also modified to use a /ssw/site/setup/set_printer.tab
file to define the options
[Previous]
[Next]
NAME:
set_printer
PURPOSE:
To allow the user to set the printer queue where the output will
come out
CALLED BY:
xanal_emi, xdisp_fits, xdisp_trace [1], xdisp_trace2, xdisp_trace3, xhkplot
HISTORY:
Written 25-Apr-94 by M.Morrison
27-Apr-94 (MDM) - Various changes
20-Jan-95 (MDM) - Changed "lp -dlaser" to "lp -c -dlaser"
28-Feb-95 (MDM) - Added option to send to QUAKE qms printer remotely
30-Nov-95 (MDM) - Changed "To redirect to LPARL lps20 from outside LPARL"
option to point to umbra and que saglps20ps
30-Apr-96 (MDM) - Added option to print to SAG
27-Jan-97 (MDM) - Added option to print to DIAPASON
[Previous]
[Next]
NAME:
set_printer
PURPOSE:
To allow the user to set the printer queue where the output will
come out
CALLS: ***
input [1], input [2], tbeep [1], tbeep [2], tbeep [3], wmenu_sel [1], wmenu_sel [2]
CALLED BY:
xanal_emi, xdisp_fits, xdisp_trace [1], xdisp_trace2, xdisp_trace3, xhkplot
HISTORY:
Written 25-Apr-94 by M.Morrison
27-Apr-94 (MDM) - Various changes
20-Jan-95 (MDM) - Changed "lp -dlaser" to "lp -c -dlaser"
28-Feb-95 (MDM) - Added option to send to QUAKE qms printer remotely
30-Nov-95 (MDM) - Changed "To redirect to LPARL lps20 from outside LPARL"
option to point to umbra and que saglps20ps
30-Apr-96 (MDM) - Added option to print to SAG
27-Jan-97 (MDM) - Added option to print to DIAPASON
[Previous]
[Next]
Project : SOHO - CDS
Name : SET_QLDS()
Purpose : Put back QLDS that the display routine is working on.
Explanation : In order to avoid multiple storage of the data
structures operated upon by the display routines,
the _FIRST_ display routine invoked interactively
by the user has the responsibility to keep the
QLDS as the UVALUE of its top level base.
The window generated in this way is called the MASTER
window. All display routines called by the MASTER
window's event handling routine should be passed
the widget ID of the MASTER window in the keyword
GROUP_LEADER, and this should be stored in the
UVALUE of the invoked, (SLAVE) TOP_LEVEL_BASE.
If a SLAVE window event handling routine invokes another
display routine, (a sub-SLAVE), it passes the widget ID
of its own TOP_LEVEL_BASE so that GET_QLDS can follow the
trace of widget IDs up to the MASTER, to retrieve the
QLDS. SET_QLDS should then also be used to "put back"
the QLDS after use/alteration.
Use : SET_QLDS,EV.TOP,QLDS
Inputs : EV.TOP -- the widget ID of the TOP_LEVEL_BASE of
a window generated by a CDS QL display routine.
QLDS: The CDS QL Data Structure to be put back
Opt. Inputs : None.
Outputs : None.
Opt. Outputs: None.
Keywords : None.
Calls : ***
DATATYPE [1], DATATYPE [2], DATATYPE [3]
Common : None.
Restrictions: See 'Explanation'
Side effects: The use of this scheme reserves the user value (UVALUE)
of the TOP_LEVEL_BASE of any display window.
Category : CDS, QuickLook
Prev. Hist. : None.
Written : Stein Vidar Hagfors Haugan, 10 October, 1993
Modified : CDP, 25 October 1993 -- cut /no_copy keyword
SVHH, 21 November 1993 - Documentation added.
Version : 1.0
[Previous]
[Next]
NAME:
set_sci160k_dir
PURPOSE:
To allow the user to select a SCI160K directory
CALLS: ***
XMENU_SEL [1], XMENU_SEL [2], file_list [1], file_list [2], input [1], input [2]
CALLED BY:
xdisp_tfr
HISTORY:
Written 25-Jan-96 by M.Morrison
31-Jan-96 (MDM) - Added /data13 to the list
[Previous]
[Next]
Project : SOHO - CDS
Name : SET_SERTSW
Purpose : Set current SERTS window to the one in the descriptor
Explanation :
Use : SET_SERTSW,SERTSW
Inputs : SERTSW: a SERTS window descriptor as returned by GET_SERTSW()
Opt. Inputs : None.
Outputs : None.
Opt. Outputs: None.
Keywords : None.
Calls : ***
GET_TV_SCALE, GET_VIEWPORT [1], GET_VIEWPORT [2], SETWINDOW [1], SETWINDOW [2]
CALLED BY:
PIXELS_2_DATA, PIXELS_2_DEVICE, TLB_PLACE
Common : IMAGE_AREA, from Bill Thompsons image routines
Restrictions: There must be a data coordinate system associated with
the SERTS window.
Side effects: Changes the current SETIMAGE settings.
Category : QuickLook
Prev. Hist. : None.
Written : Stein V Hagfors Haugan, December -93
Modified :
Version : 1.0
[Previous]
[Next]
NAME:
SET_UTPLOT
PURPOSE:
Allows user flexibility in setting up time axis labelling.
Prepares IDL system variables (!X.RANGE, !X.TICKV, !X.TICKNAME,
and !X.TICKNAME) for plotting X vs Y with Universal time labels
on bottom X axis. After calling SET_UTPLOT, user calls the
standard IDL PLOT routine to draw the plot.
SET_UTPLOT is normally called by UTPLOT, and is transparent to
the user.
CATEGORY:
CALLING SEQUENCE:
SET_UTPLOT,XRANGE=X,LABELPAR=LBL,UTBASE=BASE,ERROR_RANGE=ERROR_RANGE,
ERR_FORMAT=ERR_FORMAT,TICK_UNIT=TICK_UNIT,MINORS=MINORS,
XSTYLE=XSTYLE
INPUT PARAMETERS:
X - X array to plot (seconds relative to base time).
LBL - 2 element vector selecting substring from publication format
of ASCII time (YY/MM/DD, HH:MM:SS.XXX). For example,
LBL=[11,18] would select the HH:MM:SS part of the string.
BASE - ASCII string containing base time for X axis. Format for
time is YY/MM/DD,HHMM:SS.XXX. If this parameter isn't present
and hasn't been set yet (by a previous call to UTPLOT, via
routine SETUTBASE, or directly), user is prompted for base time.
ERROR_RANGE - = 0/1. If set to 1, the X array is outside of the
limits defined by start and end times selected by user.
ERR_FORMAT - =0/1. If set to 1, there was an error in the ASCII time
format for the base time.
TICK_UNIT - Time between Major tick marks is forced to TICK_UNIT
Has no effect for axis longer than 62 days.
MINORS - Number of minor tick marks is forced to MINORS
XSTYLE - Same meaning as in PLOT, if SET xaxis is exact
CALLS: ***
ATIME [1], ATIME [2], CHECKVAR [1], DUMMYPLOTS, FCHECK, SETUT [1], SETUT [2]
SETUTBASE [1], SETUTBASE [2], YMD2SEC [1], YMD2SEC [2], checkvar [2]
CALLED BY:
DEF_UTPLOT, HXISXPLOT, SETUT [1], SETUT [2], UTPLOT [1], UTPLOT [2], UTPLOT [3]
UTPLOT [4], UTPLOT [5], plotbft [1], plotbft [2]
COMMON BLOCKS:
COMMON UTCOMMON, UTBASE, UTSTART, UTEND = base, start, and
end time for X axis in double precision variables containing
seconds since 79/1/1, 00:00.
COMMON CLEARCOMMON,XOLD,YOLD,CLEARSET = holding area for previous
!x and !y structures if clearset=1
RESTRICTIONS:
Cannot be used for times before 79/1/1 or after 99/1/1.
MODIFICATION HISTORY:
Written by Richard Schwartz 91/02/17
Modified 91/03/27, RAS
Clears all !x vectors which will be set.
Modified 91/05/02, RAS
New Keywords Tick_unit, and Minors
Modified 91/10/18, RAS
if xstyle is set then utstart and utend are set by limits of x
26-Aug-92 (MDM) - Added keyword YEAR - put year on tick labels
18-Mar-93 (MDM) - Removed the modification made 91/10/18 since it was
causing problems on subsequent plots (giving a
error_range error)
[Previous]
[Next]
Name: set_xcolors
Purpose: part of idl setup - avoid order dependent X call effects
History: slf, 3-Apr-1992
slf, 9-Aug-1992 - verify DISPLAY is defined
(ultrix bug? p0 host is not avail /etc/utmp)
slf, 30-mar-93 - return to caller on error
slf, 4-Jan-93 - else case
slf, 5-Jan-93 A.M. - sgi case (240 colors) /
slf, 5-Jan-93 P.M. - change logic, allow environmental
slf, 6-Jan-93 - fix bug from yesterdays changes
slf, 7-Apr-94 - reduce SGI to 234 (empirical)
Restrictions:
ideally, I should find the parameter which lets me know the maximum
number of IDL colors without window manager corruption...
currently, this is empirically derived
[Previous]
[Next]
Name: setdisp
Purpose: set X windows display to remote node while in idl
Input Parameters:
node - string node name or string node number
History: slf, 3-nov-1992
Restrictions:
o does not handle local machine security issues
o probably a lot of others
Side Effects:
redirects X output to specified node
may generate warning messages when 1st window is created (but works)
[Previous]
[Next]
Project : SOHO - CDS
Name : SETENV
Purpose : Emulates the SETENV routine in VMS.
Explanation : Converts the SETENV syntax used in Unix and Microsoft Windows
to the equivalent SETLOG statement in VMS.
Use : SETENV, EXPRESSION
SETENV, 'ZDBASE=SYS$USER1:[CDS.DATA.PLAN.DATABASE]'
Inputs : EXPRESSION = A scalar string containing the name of the
environment variable to be defined, followed by
the equals "=" character, and the value to set
this environment variable to.
Opt. Inputs : None.
Outputs : None.
Opt. Outputs: None.
Keywords : None.
Calls : ***
DATATYPE [1], DATATYPE [2], DATATYPE [3], SETLOG
Common : None.
Restrictions: VMS-only. In Unix and Microsoft Windows, the built-in SETENV
routine is used instead.
Side effects: None.
Category : Utilities, Operating_system.
Prev. Hist. : None.
Written : William Thompson, GSFC, 27 March 1995
Modified : Version 1, William Thompson, 27 March 1995
Version : Version 1, 27 March 1995
[Previous]
[Next]
Project : SOHO - CDS
Name :
SETPLOT
Purpose :
Switch between plotting devices with memory about each.
Explanation :
Switches among the various available plotting devices. The plotting
variables for each device are saved in a common block so that the user
retains the ability to reset to a previously used device and do over-
plots, even if plots were produced on another device in the meantime.
Calling SETPLOT with the name of the currently selected device resets
the system variables to either default values, or those from the last
time SETPLOT was called.
The !BCOLOR and !ASPECT system variables are also saved.
Use :
SETPLOT, DEVICE
Inputs :
DEVICE - Name of the plotting device one is changing to.
Opt. Inputs :
None.
Outputs :
None.
Opt. Outputs:
None.
Keywords :
COPY = If set, then the current color table is copied to the new
graphics device. Also, the SETFLAG routine is called to set TOP
equal to the number of colors. Also makes sure that !P.COLOR
does not exceed the TOP color. Requires the SERTS image display
software.
Calls : ***
ADD_DEVICE, SETFLAG, SETSCALE [1], SETSCALE [2], STORE_INTO_SV
CALLED BY:
ASK, CDS_THUMBNAIL, PCL [1], PCL [2], PCLCLOSE [1], PCLCLOSE [2], PCLPLOT [1]
PCLPLOT [2], PS [1], PS [2], PSCLOSE [1], PSCLOSE [2], PSPLOT [1], PSPLOT [2]
QMCLOSE [1], QMCLOSE [2], QMPLOT [1], QMPLOT [2], QMS [1], QMS [2], REGIS [1]
REGIS [2], RESET [2], RESET [3], SELECT_WINDOWS, SUNVIEW [1], SUNVIEW [2], TEK [1]
TEK [2], TEK [3], TEK4105 [1], TEK4105 [2], TEK4211 [1], TEK4211 [2], TEKMONO [1]
TEKMONO [2], TVSELECT, TVUNSELECT, WIN [1], WIN [2], XDOC, XWIN [1], XWIN [2], xwin [3]
Common :
PLOTFILE - Saves system variables for later retrieval. Not to be used
by other routines.
Restrictions:
The procedure will not work correctly unless it is used exclusively 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:
Many system variables are manipulated by this routine--in particular
!P.CHARSIZE and !P.FONT.
The first time the routine is called for a particular graphics device,
certain plot parameters may be set to default values.
Any SETSCALE settings will be lost.
Category :
Utilities, Devices.
Prev. Hist. :
W.T.T., Sept. 1987.
William Thompson, February, 1990.
William Thompson, October, 1991, added !ASPECT system variable.
William Thompson, November 1992, changed to save !P.NOERASE and
!Z.THICK.
Written :
William Thompson, GSFC, September 1987.
Modified :
Version 1, William Thompson, GSFC, 27 April 1993.
Incorporated into CDS library.
Version 2, William Thompson, GSFC, 14 September 1994
Added COPY keyword.
Version 3, William Thompson, GSFC, 21 June 1995
Added INTERPOLATE keyword.
Version :
Version 3, 21 June 1995
[Previous]
[Next]
Project : SOHO - CDS
Name :
SETSCALE
Purpose :
Sets plot scale so it is the same in X and Y directions.
Explanation :
The data limits in the X and Y directions (plus 5%) are calculated and
compared against the the physical size of the plotting area in device
coordinates. Whichever scale is larger is then used for both axes, and
the plot limits are set to center the data in both directions. The
parameters !X.STYLE and !Y.STYLE are then set to 1 for exact spacing.
Use :
SETSCALE - Resets to previous state.
SETSCALE, ARRAY - Calculates scale for CONTOUR.
SETSCALE, XARRAY, YARRAY - Calculates scale from arrays.
SETSCALE, XMIN, XMAX, YMIN, YMAX - Calculates scale from limits.
Inputs :
None required. Calling SETSCALE without any parameters resets to the
default behavior.
Opt. Inputs :
ARRAY - Two dimensional array to be used in a simple
contour plot. The minima are set to zero,
and the maxima are set to one less than the
dimensions of the array.
XARRAY, YARRAY - Arrays from which the minimum and maximum
values are calculated.
XMIN, XMAX, YMIN, YMAX - The limits in the X and Y directions from
which the scale is calculated. The actual
X and Y ranges must include these values.
Outputs :
None.
Opt. Outputs:
None.
Keywords :
NOBORDER = If set, then the 5% border is not applied.
NOADJUST = If set, then the edges of the plot (!P.POSITION) are
not modified.
Calls : ***
GET_VIEWPORT [1], GET_VIEWPORT [2], REVERSE
CALLED BY:
PLOT_IMAGE, SETPLOT [1], SETPLOT [2], SETVIEW [1], SETVIEW [2], SETWINDOW [1]
SETWINDOW [2]
Common :
SETSCALE = Keeps track of the system variables changed by this routine.
Restrictions:
Unpredictable results may occur if SETSCALE is in effect when WINDOW,
WSET or SET_PLOT are called. It is recommended that SETSCALE be called
without parameters to reset to the ordinary behavior before the
graphics device or window is changed.
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:
The system variables !X.STYLE, !Y.STYLE, !X.S, !Y.S, !X.RANGE (!XMIN
and !XMAX) and !Y.RANGE (!YMIN and !YMAX) are modified.
Unless NOADJUST is set, the edges of the plot (!P.POSITION) are
adjusted to fit the data. Then, when SETSCALE is called without any
parameters, these parameters are returned to their original settings.
System variables may be changed even if the routine exits with an error
message.
If SETSCALE is called without any parameters, then the modified system
variables are restored to their original values. Additional graphics
functions such as OPLOT will still be possible.
Category :
Utilities, Devices.
Prev. Hist. :
William Thompson, Feb. 1991.
William Thompson, Oct. 1991, added !ASPECT system variable.
William Thompson, May 1992, added common block and changing viewport.
William Thompson, Nov. 1992, changed structure of common block, and
removed support for changing viewport.
William Thompson, Nov. 1992, changed to use GET_VIEWPORT instead of
INIT_SC1_SC4, and to restore original !P.POSITION when called
with no parameters.
William Thompson, December 1992, changed common block to keep better
track of the state of the system variables.
Written :
William Thompson, GSFC, February 1991.
Modified :
Version 1, William Thompson, 27 April 1993.
Incorporated into CDS library.
Version :
Version 1, 27 April 1993.
[Previous]
[Next]
Project : SOHO - LASCO
Name :
Purpose :
Category :
Explanation :
Syntax :
CALLED BY:
WLOADC, wrt_fits_bin_exten [2]
Examples :
Inputs : None
Opt. Inputs : None
Outputs : None
Opt. Outputs: None
Keywords : None
Common :
Restrictions:
Side effects: Not known
History : Version 1, 02-Sep-1995, B Podlipnik. Written
Contact : BP, borut@lasco1.mpae.gwdg.de
[Previous]
[Next]
PROJECT:
SOHO - LASCO
NAME:
SETUP_ASTROM
PURPOSE:
Set up FITS-type astrometry structure in CD format for any
of the LASCO telescopes.
CALLING SEQUENCE:
setup_astrom, telescope, astrom
INPUTS:
telescope: string containing telescope name.
sunephem: structure containing solar ephemeris information
(obtained from sohoephem.pro).
naxis1: no. of pixels in horizontal direction.
naxis2: no. of pixels in vertical direction.
OUTPUTS:
astrom: Anonymous structure containing astrometry info in FITS
CD format.
OPTIONAL INPUTS:
ocentre: Two-element vector giving pixel location of centre of
occulting disk (defaults to image centre).
pscale: Scalar giving plate scale in arcsec/pixel (defaults to
nominal value for specified telescope.
vangle: Scalar giving angle of image vertical (Y-axis) from
solar north in degrees (defaults to zero).
CALLED BY:
STARFIELD
PROCEDURE:
Straightforward.
RESTRICTIONS:
Assumes nominal values for astrometry parameters for each
telescope (i.e. solar north is straight up, Sun at centre of
occulter and nominal values for plate scale).
Intended to be called from another routine (e.g. starfield.pro).
MODIFICATION HISTORY:
Written by Simon Plunkett, February 1996.
2003.08.18, nbr - Add latpole to astrom structure to make compatible
with SSW; add sccs version
@(#)setup_astrom.pro 1.2 08/18/03 - LASCO NRL IDL Library
[Previous]
[Next]
NAME:
SETUT
PURPOSE:
Set base,start, or end time in common UTCOMMON.
SETUTBASE, SETUTSTART, and SETUTEND are all implemented through
SETUT as in SETUTBASE,'UTSTRING'.
When using UTPLOT, UTPLOT_IO, or OUTPLOT command, X array is
assumed to be in seconds relative to the base time.
CALLED BY:
BATSE_ONTIMES, DCFREAD, EDITOC, FIND_DBFILE, FLISTOC, FSOC, FSPLOT, FS_ARCHIVE_RW
FS_GRAPH, GFITS_R, PLOT_FLARE, QLDISPLAY, RATESDUMPOC, RAWDUMPOC, SETUTBASE [1]
SETUTBASE [2], SETUTEND [1], SETUTEND [2], SETUTSTART [1], SETUTSTART [2]
SET_UTPLOT [1], SET_UTPLOT [2], SPEX_COMMONS [2], SPEX_COMMONS [4]
SPEX_PROC [1], SPEX_PROC [2], plotman, t_utplot [1], t_utplot [2]
Note: UTBASE, UTSTART, and UTEND are in common UTCOMMON and can
also be set directly (double precision seconds relative to
79/1/1, 00:00).
Can also be used to call SET_UTPLOT which creates !x.tickv and
!x.tickname.
CATEGORY:
CALLING SEQUENCE:
SETUT, UTBASE=BASE, UTSTART=START, UTEND=END, ERROR=ERROR, $
SET_UTPLOT=SET
INPUT PARAMETERS:
BASE, START, or END - ASCII string in format YY/MM/DD,HHMM:SS.XXX.
Sets UTBASE, UTSTART, or UTEND variables in common UTCOMMON to the
number of seconds since 79/1/1, 0000.
Partial strings are allowed. If the date is omitted, the last date
passed (for base, start, or end time) is used.
For example, if the string '88/3/4,1230' had already been passed:
'1200' means 88/3/4,1200
'01' means 88/3/4,0001 (1 minute into the day)
'01:2' means 88/3/4,0001:02.000 (1 min., 2 sec into day)
'1200:20.1' means 88/3/4,1200:20.100 (20.100 sec. after 12)
ERROR - 0/1 indicates no error/error in converting ASCII time to
double precision seconds.
SET_UTPLOT - if 1 and START and END are set then SET_UTPLOT is called
for those values, remembered in subsequent calls.
- if 0 then SET_UTPLOT is not called or subsequently.
OUTPUTS:
None.
OPTIONAL OUTPUT PARAMETERS:
None.
CALLS: ***
ATIME [1], ATIME [2], CHECKVAR [1], SET_UTPLOT [1], SET_UTPLOT [2], checkvar [2]
utplot_UTIME [1], utplot_UTIME [2]
COMMON BLOCKS:
COMMON UTCOMMON, UTBASE, UTSTART, UTEND = base, start, and
end time for X axis in double precision variables containing
seconds since 79/1/1, 00:00.
COMMON LASTDATECOM, LASTDATE = YY/MM/DD string for last entry
into SETUT
COMMON SETCOMMON, SETPLOT
SIDE EFFECTS:
UTXXXX in common UTCOMMON is set to time passed in string translated
into a double precision floating point value representing the time
in seconds since 79/1/1, 00:00. Function ATIME can be used to
display this time as an ASCII string. If switch SET_UTPLOT is used
then the procedure SET_UTPLOT is called with the new values of
UTBASE, UTSTART, and UTEND.
RESTRICTIONS:
Times must be between 79/1/1 and 99/1/1. A base time must be set before
plotting with UTPLOT (or UTPLOT_IO), however the easiest ways to set it
are either in the calling arguments to UTPLOT (or UTPLOT_IO) or by
letting UTPLOT (or UTPLOT_IO) prompt for it.
PROCEDURE:
Keyword parameters are used to route the input string(s) to their
proper variable in UTCOMMON.
utplot_UTIME is called to translate UTSTRING to epoch day and msec,
UTBASE is epoch day * 86400 + msec/1000 from 79/1/1
MODIFICATION HISTORY:
Written by Kim Tolbert, 4/88
Modified for IDL Version 2 by Richard Schwartz, 2/91
Keyword SET_UTPLOT added 9/91
Corrections and new comments added 10/91 by RS.
[Previous]
[Next]
NAME:
SETUTBASE
PURPOSE:
Set UTBASE variable in common UTCOMMON to the number of seconds
since 79/1/1, 0000 represented by the ASCII string passed as an
argument.
CALLING SEQUENCE:
SETUTBASE,UTSTRING,ERROR=ERROR
INPUT PARAMETERS:
UTSTRING - string in YY/MM/DD, HHMM:SS.XXX format to be converted
to internal representation and stored in UTCOMMON variable UTBASE.
ERROR - 0/1 indicates no error/error in converting UTSTRING
CALLS: ***
CHECKVAR [1], SETUT [1], SETUT [2], checkvar [2]
CALLED BY:
CONT_READ, DISCSP_READ, EVAL_SHERB, FDBREAD, FS_ACC_CONT, FS_ACC_DISCSP, FS_GEN_ARR
FS_GRAPH, HXARCHIVE, HXFITS, PLOTBATSE_QL, PLOTFIT, PLOT_OCCS, PLOT_OCC_ONDAY
QL_DAY_PLOT, QL_ORBIT_PLOT, READ_DISCLA, SC4TREAD, SET_UTPLOT [1], SET_UTPLOT [2]
SPEX_COMMONS [2], SPEX_COMMONS [4], SPEX_PLOT_SAVED [1], SPEX_PLOT_SAVED [2]
SPEX_PROC [1], SPEX_PROC [2], Show Image [1], Show Image [2], Show Image [3]
plotfda, read_batse_4_spex [1], read_batse_4_spex [2], t_utplot [1]
t_utplot [2]
PROCEDURE:
Calls SETUT. See SETUT.PRO program description.
MODIFICATION HISTORY:
Written by Richard Schwartz, Feb. 1991
[Previous]
[Next]
NAME:
SETUTEND
PURPOSE:
Set UTEND variable in common UTCOMMON to the number of seconds
since 79/1/1, 0000 represented by the ASCII string passed as an
argument.
CALLING SEQUENCE:
SETUTEND,UTSTRING,ERROR=ERROR
INPUT PARAMETERS:
UTSTRING - string in YY/MM/DD, HHMM:SS.XXX format to be converted
to internal representation and stored in UTCOMMON variable UTEND.
ERROR - 0/1 indicates no error/error in converting UTSTRING
CALLS: ***
CHECKVAR [1], SETUT [1], SETUT [2], checkvar [2]
CALLED BY:
CONT_READ, DISCSP_READ, FDBREAD, QL_DAY_PLOT, QL_ORBIT_PLOT, READ_DISCLA
PROCEDURE:
Calls SETUT. See SETUT.PRO program description.
MODIFICATION HISTORY:
Written by Richard Schwartz, Feb. 1991
[Previous]
[Next]
NAME:
SETUTSTART
PURPOSE:
Set UTSTART variable in common UTCOMMON to the number of seconds
since 79/1/1, 0000 represented by the ASCII string passed as an
argument.
CALLING SEQUENCE:
SETUTSTART,UTSTRING,ERROR=ERROR
INPUT PARAMETERS:
UTSTRING - string in YY/MM/DD, HHMM:SS.XXX format to be converted
to internal representation and stored in UTCOMMON variable UTSTART.
ERROR - 0/1 indicates no error/error in converting UTSTRING
CALLS: ***
CHECKVAR [1], SETUT [1], SETUT [2], checkvar [2]
CALLED BY:
CONT_READ, DISCSP_READ, FDBREAD, QL_DAY_PLOT, QL_ORBIT_PLOT, READ_DISCLA
PROCEDURE:
Calls SETUT. See SETUT.PRO program description.
MODIFICATION HISTORY:
Written by Richard Schwartz, Feb. 1991
[Previous]
[Next]
Project : SOHO - CDS
Name :
SETVIEW
Purpose :
Switch between several plots on one page.
Explanation :
SETVIEW modifies the viewport parameters !SC1, !SC2, !SC3 and !SC4 to
allow several plots on one page, arranged horizontally and/or
vertically.
Calling SETVIEW with nontrivial parameters also sets !NOERAS to 1.
New plots must be started with an explicit ERASE command.
Calling SETVIEW without any parameters, or IX,NX and IY,NY all equal
to 1 resets the viewport, and sets !NOERAS to 0.
Recalling SETVIEW with the same parameters as before will restore the
system variables associated with that setting. This allows the user to
switch between several plots without losing the scaling information
associated with each. Note that when switching between windows that
both WSET and SETVIEW must be called each time for this to work.
Alternatively, SETWINDOW can be used to switch between windows.
Use :
SETVIEW [, IX, NX [, IY, NY [, SX [, SY ]]]]
Inputs :
None required. Calling SETVIEW without any parameters resets to the
default behavior.
Opt. Inputs :
IX, NX = Relative position along X axis, expressed as position IX
out of a possible NX, from left to right. If not passed,
then 1,1 is assumed.
IY, NY = Relative position along Y axis, from top to bottom. If
not passed, then 1,1 is assumed.
SX = Multiplication factor for space between plots in X
direction. A value of SX between 0 and 1 decreases the
amount of space between plots, a value greater than 1
increases the amount of space. If not passed, then 1 is
assumed.
SY = Multiplication factor for space between plots in Y
direction. If not passed, then 1 is assumed.
Outputs :
None.
Opt. Outputs:
None.
Keywords :
None.
Calls : ***
ADD_VIEWPORT, SETSCALE [1], SETSCALE [2], TRIM
CALLED BY:
AN_NIMCP, AN_NIMCP_1_2, AN_NIMCP_AVG, CDS_SNAPSHOT, NIS_AVG_SPECT_DEMO
SHOW_SYNOPTIC
Common :
VIEWPORT = Contains data to maintain information about the viewports
as a function of graphics device and window.
Restrictions:
IX must be between 1 and NX. IY must be between 1 and NY.
SX and SY must not be negative.
This routine must be called separately for each graphics 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:
The system variable !NOERAS is changed.
Any SETSCALE settings will be lost.
Category :
Utilities, Devices.
Prev. Hist. :
William Thompson Applied Research Corporation
September, 1988 8201 Corporate Drive
Landover, MD 20785
William Thompson, Nov 1992, changed common block to allow system
variables to be saved between multiple
plots. Also added call to disable
possible SETSCALE settings.
Written :
William Thompson, GSFC, September 1988.
Modified :
Version 1, William Thompson, GSFC, 27 April 1993.
Incorporated into CDS library.
Version 2, William Thompson, GSFC, 4 January 1994.
Fixed bug where original state was not being completely
restored.
Version :
Version 2, 4 January 1994.
[Previous]
[Next]
Project : SOHO - CDS
Name :
SETWINDOW
Purpose :
Switch between windows, retaining parameters for each.
Explanation :
SETWINDOW stores the plot parameters for the current window in a common
block, switches to the desired window, and restores the plot parameters
from the last time that window was used.
Use :
SETWINDOW [, WINDOW ]
Inputs :
None required.
Opt. Inputs :
WINDOW = Number of window to switch to. If not passed, then the
parameters for the current window are saved.
Outputs :
None.
Opt. Outputs:
None.
Keywords :
SHOW : call WSHOW
Calls : ***
ADD_WINDOW, SETSCALE [1], SETSCALE [2], TRIM
CALLED BY:
CDS_ENG_N1_VW, DSPEXP, DSPWAV, EIS_IMAGE_TOOL [1], EIS_IMAGE_TOOL [2]
EIS_IMAGE_TOOL_EVENT [1], EIS_IMAGE_TOOL_EVENT [2], EIS_ITOOL_PTOOL [1]
EIS_ITOOL_PTOOL [2], EIS_ITOOL_ZOOMINOUT [1], EIS_ITOOL_ZOOMINOUT [2]
EIS_LOAD_IMAGE [1], EIS_LOAD_IMAGE [2], GDSPSPEC, IMAGE_TOOL, IMAGE_TOOL_EVENT
ITOOL_DISP_ROT, ITOOL_DRAW, ITOOL_DRAW_ICON, ITOOL_LIMBFITTER, ITOOL_LOAD_IMAGE
ITOOL_OVERLAYER, ITOOL_PTOOL, ITOOL_ZOOMINOUT, ITOOL_ZOOMMER, LOCATE_FFCAL
MAKE_AUTO_FIT, MAKE_MANUAL_FIT, MK_LIMBFIT_BS, MK_POINT_BASE, MK_SOHO, NDSPSPEC
PQLPROFILE, PQLZOOM, PRESTORE, PTEST, SET_SERTSW, TLB_PLACE, TVPROFILE, TVSELECT
TVUNSELECT, UPDATE_FITLIMB, WDISPLAY, XCDS_SNAPSHOT, XCOR_CDS
Common :
SETWINDOW = Contains WINDOWS, and the structure SAVE which contains the
graphics system variables.
Restrictions:
WINDOW must be a valid, existing window.
Creating a new window with the WINDOW command will also switch to that
window. To save the settings for the current window, call SETWINDOW
before calling WINDOW.
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:
Certain system variables from the previous time the window was used are
recalled.
Any SETSCALE settings will be lost.
Category :
Utilities, Devices.
Prev. Hist. :
William Thompson Applied Research Corporation
November, 1992 8201 Corporate Drive
Landover, MD 20785
Written :
William Thompson, GSFC, November 1992.
Modified :
Version 1, William Thompson, GSFC, 27 April 1993.
Incorporated into CDS library.
Version 1.1, Dominic Zarro, (ARC/GFSC), 15 December 1994.
Added WSHOW
Version :
Version 1.1, 15 December 1994.
[Previous]
[Next]
Project:
SOHO - SUMER
Name:
SF_GAUSSB
Purpose:
Fit data to Gaussian function using the GaussB compression
used on board SOHO/SUMER (compression method 12)
Use:
res = sf_gaussb(data)
Inputs:
data - floating point array of dimensions
WAVELENGTH x SOLAR_Y x anything else
Output:
A floating point array with the 4 gaussian fit parameters in
place of the wavelength dimension
Gaussian fit parameters
Gaussian parameters:
0: Background (counts/pixel)
1: Maximum (counts/pixel)
2: Centroid (pixels, Original units: pixels*100.)
3: Width (sigma in pixels, Original: sigma*0.745*100.)
Input Keywords:
Original - Output results in the original compression units
CALLS: ***
SCMP_NEAR2
CALLED BY:
SUM_GAUSSB
Common:
None
Written:
Terry Kucera, 12 Aug 1996
Based on earlier programs by Ingolf Dammasch and Jong-Chul Chae
[Previous]
[Next]
Project : SOHO - CDS
Name : SFITSLIST
Purpose : Create/update the lfitslist.txt file.
Explanation : CDS fits file names don't tell you much about their
content. This program creates/updates a file
called lfitslist.txt in the fits file directory, with
various information on the content of the files.
This file is used by PICKFITS in order to search
the list of files for those files that the user wants.
Use : SFITSLIST [,FITSDIR [,LISTDIR]]
Inputs : None required.
Opt. Inputs : FITSDIR : The directory with the fits files to be in
the list. Default "CDS_FITS_DATA"
LISTDIR : The directory to place the list in. This is
also the directory where the lfitslist.txt
file is created/updated. The default is
"$CDS_FITS_DATA_W".
Outputs : None.
Opt. Outputs: None.
Keywords : None.
Calls : ***
BREAK_FILE [1], BREAK_FILE [2], BREAK_FILE [3], CONCAT_DIR [1], CONCAT_DIR [2]
CONCAT_DIR [3], DATATYPE [1], DATATYPE [2], DATATYPE [3], DEFAULT, FILE_EXIST [2]
FIND_FILES, FITSLIST_ADD, FITSLIST_ADDTX, FXPAR [1], FXPAR [2], HEADFITS [1]
HEADFITS [2], HEADFITS [3], INCSFITSLIST, PARCHECK, RD_ASCII [1], RD_ASCII [2]
SFITSLIST_PROP, SFITSLIST_SRNUMBER, STRPAD, STR_SEP, TEST_OPEN, TRIM, TYP
break_file [4], concat_dir [4], file_exist [1], file_exist [3]
Common : None.
Restrictions: Expects to find fits files in the specified directory.
If there is already a lfitslist.txt file in the same
directory, it has to have one or more entries.
Side effects: Creates/updates the file "sfitslist.txt" in the
specified directory.
Category : CDS_Utility
Prev. Hist. :
Written : Stein Vidar H. Haugan, UiO, 22 March 1996
Modified : Version 2, SVHH, 18 April 1996
Changed format of fitslist.txt -> lfitslist.txt
Generic format.
Version 3, SVHH, 19 April 1996
Added check for errors after FXBOPEN call.
Version 4, SVHH, 22 April 1996
TITLE expanded to 80 chars max
Version 5, SVHH, 23 April 1996
Using find_files for multi-path CDS_FITS_DATA.
Allowing both FITSDIR and LISTDIR to be
specified.
For updates the new list is collected before
it's written -- direct overwrite, no spawns.
Version 6, SVHH, 29 April 1996
Wrote fitslist_add, fitslist_addtx to shorten
sfitslist_prop. These are identical in sfitslist
Tested on VMS (suman1), caught an error in the
use of CATCH.
Version 7, Using lowercase fits file names, since that's what
is used on soho-archive disks.
Version : 7, 6 August 1996
[Previous]
[Next]
NAME:
sgt_bin
PURPOSE:
To retrieve the binning parameters from a SOHO/SUMER observation.
CATEGORY:
Data handling.
CALLING SEQUENCE:
bin = sgt_bin(index)
INPUTS:
The index structure returned from rd_sumer.
OPTIONAL INPUTS:
None.
KEYWORD PARAMETERS:
None.
OUTPUTS:
The wavelength and spatial binning performed on the data.
OPTIONAL OUTPUTS:
None.
CALLS: ***
DATATYPE [1], DATATYPE [2], DATATYPE [3], sgt_tagname
CALLED BY:
CALL_TRIWARP, SGT_CRPIX, destr_bilin [2], sumer_destretch
COMMON BLOCKS:
None.
SIDE EFFECTS:
If the BINX and BINY tag names can not be found in the index
structure passed to the routine, an error occurs.
RESTRICTIONS:
Only the index structure may be passed as input. It may turn out to
be useful to pass the filename as input and this option may be added
in the future.
PROCEDURE:
The routine returns the values of index.gen.binx and index.gen.biny
from the index structure. The values of binx and biny have been
taken directly from the primary FITS header.
EXAMPLE:
IDl> filename = '$SUMER_DATA/sum_960513_085055.fits'
IDL> rd_sumer,index,data
IDL> bin = sgt_bin(index)
IDL> print,bin
1 1
which indicates that no binning has been performed on the data.
MODIFICATION HISTORY:
HPW 24-JUL-1996:
HPW 07-AUG-1996: Renamed sgt_bin.
[Previous]
[Next]
Project:
SOHO - SUMER
Name:
SGT_BTE
Purpose:
To calculate the refence pixel in the data corresponding to the
reference pixel on the detector. The result should be analogous to the
fits CRVAL.
Use:
Result = SGT_BTE(index)
Inputs
index - The index structure returned from rd_sumer.
Output
BTE - the Binary Table Extension number for each collumn
Input Keywords:
None
Calls:
None
CALLED BY:
SGT_NEWREF, SMK_FULLDET, get_sum_column
Common:
None
Written:
Terry Kucera, Aug 14, 1996
[Previous]
[Next]
NAME:
sgt_column
PURPOSE:
To retrieve a column of SOHO/SUMER data from a data structure or
fits file.
CATEGORY:
Data handling.
CALLING SEQUENCE:
column = sgt_column(data,data_col=1)
column = sgt_column(filename,data_col=1)
column = sgt_column(index,data,data_col=1,lambda=lambda)
INPUTS:
Either the data structure returned from rd_sumer or a file name. If
the data column and detector exposure are not specified the first
data column is returned.
OPTIONAL INPUTS:
If the wavelength range is also desired then the index structure
must also be passed. Note that in this case the index variable
PRECEEDES the data variable.
KEYWORD PARAMETERS:
data_col: The column from which the detector exposure is to be
returned. The columns are number from 1 to the number of
data columns.
OUTPUTS:
The data from a colum of a SUMER fits file.
OPTIONAL OUTPUTS:
An array corresponding to the wavelength (dispersion) direction of
the detector.
CALLS: ***
DATATYPE [1], DATATYPE [2], DATATYPE [3], rd_sumer [1], rd_sumer [2], sgt_wave
COMMON BLOCKS:
None.
SIDE EFFECTS:
None.
RESTRICTIONS:
Only a single column may be specified.
PROCEDURE:
If the data structure is passed then the routine simply returns the
specified data. If a file name is passed then the specified data
column is first read with rd_sumer.
EXAMPLE:
Here the first data column is returned.
IDL> filename = 'sum_960513_085055.fits'
IDL> mk_query,filename
File: sum_960513_085055.fits
C Name Dimensions Wmin Wmax Xmin Xmax Ymin Ymax
1 W_937.803 (50,360,5) 936.69 938.91 -1.50 4.50 400.12 400.12
2 W_933.380 (50,360,5) 932.27 934.49 -1.50 4.50 400.12 400.12
3 W_930.748 (50,360,5) 929.64 931.86 -1.50 4.50 400.12 400.12
4 W_926.226 (50,360,5) 925.11 927.34 -1.50 4.50 400.12 400.12
5 W_909.000 (50,360,5) 907.89 910.11 -1.50 4.50 400.12 400.12
6 W_944.520 (50,360,5) 943.41 945.63 -1.50 4.50 400.12 400.12
IDL> col = sgt_column(filename,data_col=1)
or
IDL> rd_sumer,filename,index,data
IDL> col = sgt_column(data,data_col=1)
or
IDL> rd_sumer,filename,index,data
IDL> col = sgt_column(index,data,data_col=1,lambda=lambda)
MODIFICATION HISTORY:
HPW 08-AUG-1996:
[Previous]
[Next]
NAME:
sgt_compress
PURPOSE:
To retrieve the compression scheme used on date from a SOHO/SUMER
observation.
CATEGORY:
Data handling.
CALLING SEQUENCE:
c = sgt_compress(index)
INPUTS:
The index structure returned from rd_sumer.
OPTIONAL INPUTS:
None.
KEYWORD PARAMETERS:
None.
OUTPUTS:
The code of the compression scheme used to compress the data.
OPTIONAL OUTPUTS:
compar: The compression parameters used.
CALLS: ***
DATATYPE [1], DATATYPE [2], DATATYPE [3], sgt_tagname
COMMON BLOCKS:
None.
SIDE EFFECTS:
If the COMPRESS, COMPAR1, COMPAR2, or COMPAR3 tag names can not be
found in the index structure passed to the routine, an error occurs.
If COMPRESS equals a null string ('') then -1 is returned.
RESTRICTIONS:
Only the index structure may be passed as input. It may turn out to
be useful to pass the filename as input and this option may be added
in the future.
PROCEDURE:
The routine returns the values of index.gen.compress and
index.gen.compar* from the index structure. The values of binx and
biny have been taken directly from the primary FITS header.
EXAMPLE:
IDl> filename = '$SUMER_DATA/sum_960513_085055.fits'
IDL> rd_sumer,index,data
IDL> c = sgt_compress(index,compar=compar)
IDL> print,c
5
IDL> print,compar
33 89 0
MODIFICATION HISTORY:
HPW 24-JUL-1996:
HPW 07-AUG-1996: Renamed sgt_compress.
[Previous]
[Next]
Project:
SOHO - SUMER
Name:
SGT_CRPIX
Purpose:
To calculate the refence pixel in the data corresponding to the
reference pixel on the detector. The result should be analogous to the
fits CRVAL.
Use:
Result = SGT_CRPIX(index)
Result = SGT_CRPIX(index(0))
Inputs
index - The index structure returned from rd_sumer.
Output
CRPIX - the reference pixel in the data format
Input Keywords:
PreBin - Calculate the crval for the format before binning
Calls: ***
sgt_bin, sgt_dims, sgt_refpix, sgt_tagname
CALLED BY:
CALL_TRIWARP, SGT_NEWREF, SMK_FULLDET, SUM_GAUSSB, sgt_det_y
Common:
None
Written:
Terry Kucera, 2 Aug 1996
Added PreBin keyword, Sept. 5, 1996, TAK
Now it can deal correctly with index sub-elements, Sept. 26, 1996, TAK
Now returns correct idl index for dimensions other
than wavelength and solar_y, Dec 21, 1996, TAK
[Previous]
[Next]
NAME:
sgt_delta
PURPOSE:
To retrieve the spatial and spectral resolution of a SOHO/SUMER
observation.
CATEGORY:
Data handling.
CALLING SEQUENCE:
delta = sgt_delta(index)
delta = sgt_delta(index.(i))
INPUTS:
The index structure returned from rd_sumer.
OPTIONAL INPUTS:
None.
KEYWORD PARAMETERS:
None.
OUTPUTS:
The spatial and spectral resolution of an observation.
OPTIONAL OUTPUTS:
None.
CALLS: ***
BOOST_ARRAY [1], BOOST_ARRAY [2], BOOST_ARRAY [3], DATATYPE [1], DATATYPE [2]
DATATYPE [3], sgt_tagname
CALLED BY:
SGT_NEWREF, mk_query_genx, sgt_det_y, sgt_wave, smk_atlas
COMMON BLOCKS:
None.
SIDE EFFECTS:
If the DELTA tag name can not be found in the index structure passed
to the routine, an error occurs.
RESTRICTIONS:
Only the index structure may be passed as input. It may turn out to
be useful to pass the filename as input and this option may be added
in the future.
PROCEDURE:
The routine returns the values of index.(i).delta which have been
taken from the binary table extension header in the FITS file.
EXAMPLE:
IDl> filename = '$SUMER_DATA/sum_960513_085055.fits'
IDL> rd_sumer,index,data
IDL> help,/str,index
** Structure <21fa08>, 7 tags, length=1648, refs=1:
W_937_803 STRUCT -> <Anonymous> Array(1)
W_933_380 STRUCT -> <Anonymous> Array(1)
W_930_748 STRUCT -> <Anonymous> Array(1)
W_926_226 STRUCT -> <Anonymous> Array(1)
W_909_000 STRUCT -> <Anonymous> Array(1)
W_944_520 STRUCT -> <Anonymous> Array(1)
GEN STRUCT -> <Anonymous> Array(1)
IDL> delta = sgt_delta(index)
IDL> print,delta
0.0444715 1.01629 1.20000
0.0444845 1.01659 1.20000
0.0444922 1.01676 1.20000
0.0445055 1.01707 1.20000
0.0445552 1.01820 1.20000
0.0444515 1.01583 1.20000
Note that in some files, such as this one, the delta value
corresponding to the x pointing corrdinate may be incorrect.
IDL> delta = sgt_delta(index.(0))
IDL> print,delta
0.0444715 1.01629 1.20000
IDL> delta = sgt_delta(index.(6))
% GT_DELTA: Pathological index structure.
MODIFICATION HISTORY:
HPW 24-JUL-1996:
HPW 07-AUG-1996: Renamed sgt_delta.
HPW 15-OCT-1996: Modified the routine to use boost_array for array
concatenation.
[Previous]
[Next]
NAME:
sgt_det_y
PURPOSE:
Returns a position array based on the index structure
CATEGORY:
Data handling.
CALLING SEQUENCE:
y = sgt_det_y(index)
y = sgt_det_y(index.(i))
INPUTS:
Either the entire index structure, in which case an array for each
column of data in the index is returned or part of the index
structure.
OPTIONAL INPUTS:
None
KEYWORD PARAMETERS:
no_flip: Don't reverse the direction of y.
Default no_flip=1 for .fts files,
no_flip=0 for .fits files.
OUTPUTS:
The position along the slit in arcseconds.
OPTIONAL OUTPUTS:
None.
CALLS: ***
DATATYPE [1], DATATYPE [2], DATATYPE [3], SGT_CRPIX, UNIQ [1], UNIQ [2], UNIQ [3]
sgt_delta, sgt_dims, sgt_solar_y
CALLED BY:
mk_sumer_map [1], mk_sumer_map [2], mk_sumer_map [3]
COMMON BLOCKS:
None.
SIDE EFFECTS:
If the necessary tag names can not be found in the index structure
passed to the routine, an error occurs.
RESTRICTIONS:
None.
PROCEDURE:
Uses the refpix, refval, dim, and delta variables from the index
structure to compute the position array
EXAMPLE:
IDL> filename = '$SUMER_DATA/sum_960513_085055.fits'
IDL> mk_query,filename
File: /net/solb2/soho/sumer_fits/mariska/sum_960513_085055.fits
C Name Dimensions Wmin Wmax Xmin Xmax Ymin Ymax
1 W_937.803 (50,360,5) 936.69 938.91 -1.50 4.50 400.12 400.12
2 W_933.380 (50,360,5) 932.27 934.49 -1.50 4.50 400.12 400.12
3 W_930.748 (50,360,5) 929.64 931.86 -1.50 4.50 400.12 400.12
4 W_926.226 (50,360,5) 925.11 927.34 -1.50 4.50 400.12 400.12
5 W_909.000 (50,360,5) 907.89 910.11 -1.50 4.50 400.12 400.12
6 W_944.520 (50,360,5) 943.41 945.63 -1.50 4.50 400.12 400.12
IDL> rd_sumer,index,data
IDL> y = sgt_det_y(index)
IDL> help,y
Y FLOAT = Array(360, 6)
IDL> plot,y(*,0),data.(0)(25,*,0)
MODIFICATION HISTORY:
HPW 09-AUG-1996:
TAK 06-JAN-1999: Default no_flip=1 for .fts files,
no_flip=0 for .fits files.
[Previous]
[Next]
NAME:
sgt_detector
PURPOSE:
To retrieve the detector used for a SOHO/SUMER observation.
CATEGORY:
Data handling.
CALLING SEQUENCE:
dector = sgt_detector(index)
INPUTS:
The index structure returned from rd_sumer.
OPTIONAL INPUTS:
None.
KEYWORD PARAMETERS:
Text: Returns a string (A, B, or RSC) rather than a number (1, 2, or 3).
OUTPUTS:
The detector used for a SOHO/SUMER observation in either string (A,
B, or RSC) or number (1, 2, or 3) format.
OPTIONAL OUTPUTS:
None.
CALLS: ***
DATATYPE [1], DATATYPE [2], DATATYPE [3], sgt_tagname
CALLED BY:
GET_SUMER_FLAT, destr_bilin [2], mk_query_genx, mk_sumer_dbase_ff
sa_gt_specrange, smk_atlas, sumer_destretch, sumer_ffdb
COMMON BLOCKS:
None.
SIDE EFFECTS:
If the detector tag name can not be found in the index structure
passed to the routine, an error occurs.
RESTRICTIONS:
Only the index structure may be passed as input. It may turn out to
be useful to pass the filename as input and this option may be added
in the future.
PROCEDURE:
The routine returns the values of index.gen.detector from the index
structure. The value for detector has been taken directly from the
primary FITS header.
EXAMPLE:
IDl> filename = '$SUMER_DATA/sum_960513_085055.fits'
IDL> rd_sumer,index,data
IDL> detector = sgt_detector(index)
IDL> print,detector
1
IDL> detector = sgt_detector(index,/text)
IDL> print,detector
A
MODIFICATION HISTORY:
HPW 24-JUL-1996:
HPW 07-AUG-1996: Renamed sgt_detector.
[Previous]
[Next]
NAME:
sgt_dettime
PURPOSE:
To retrieve the time since the start of observations
for a SOHO/SUMER observation.
CATEGORY:
Data handling.
CALLING SEQUENCE:
dettime = sgt_dettime(index)
dettime = sgt_dettime(index.(i))
INPUTS:
The index structure returned from rd_sumer.
OPTIONAL INPUTS:
None.
KEYWORD PARAMETERS:
None.
OUTPUTS:
The time since the starttime listed in the file header in seconds.
If the entire index structure is
passed then an time for each exposure in the corresponding data
structure is returned. If the index structure corresponding to a
single column of data is passed then times for those data are returned.
OPTIONAL OUTPUTS:
None.
CALLS: ***
BOOST_ARRAY [1], BOOST_ARRAY [2], BOOST_ARRAY [3], DATATYPE [1], DATATYPE [2]
DATATYPE [3], sgt_tagname
CALLED BY:
mk_sumer_map [1], mk_sumer_map [2], mk_sumer_map [3], sgt_raster_time
COMMON BLOCKS:
None.
SIDE EFFECTS:
If the DETTIME tag name can not be found in the index structure
passed to the routine, an error occurs.
RESTRICTIONS:
Only the index structure may be passed as input. It may turn out to
be useful to pass the filename as input and this option may be added
in the future.
PROCEDURE:
The routine returns the values of index.(i).dettime which have been
taken from the binary table extension header in the FITS file.
EXAMPLE:
IDl> filename = '$SUMER_DATA/sum_960513_085055.fits'
IDL> rd_sumer,filename,index,data
IDL> help,/str,index
** Structure <21fa08>, 7 tags, length=1648, refs=1:
W_937_803 STRUCT -> <Anonymous> Array(1)
W_933_380 STRUCT -> <Anonymous> Array(1)
W_930_748 STRUCT -> <Anonymous> Array(1)
W_926_226 STRUCT -> <Anonymous> Array(1)
W_909_000 STRUCT -> <Anonymous> Array(1)
W_944_520 STRUCT -> <Anonymous> Array(1)
GEN STRUCT -> <Anonymous> Array(1)
IDL> dettime = sgt_dettime(index)
IDL> print,dettime
0.000 100.017 200.028 300.970 400.982
0.000 100.017 200.028 300.970 400.982
0.000 100.017 200.028 300.970 400.982
0.000 100.017 200.028 300.970 400.982
0.000 100.017 200.028 300.970 400.982
0.000 100.017 200.028 300.970 400.982
IDL> dettime = sgt_dettime(index.(0))
IDL> print,dettime
0.000 100.017 200.028 300.970 400.982
IDL> dettime = sgt_dettime(index.(6))
% GT_DETTIME: Pathological index structure.
MODIFICATION HISTORY:
TAK 28-Oct-1996: based on HPW's sgt_exptime
[Previous]
[Next]
NAME:
sgt_dims
PURPOSE:
To retrieve the spatial and spectral dimensions of a SOHO/SUMER
observation.
CATEGORY:
Data handling.
CALLING SEQUENCE:
dims = sgt_dims(index)
dims = sgt_dims(index.(i))
INPUTS:
The index structure returned from rd_sumer.
OPTIONAL INPUTS:
None.
KEYWORD PARAMETERS:
None.
OUTPUTS:
The spatial and spectral dimensions of the array which holds data
from an observation. If the entire index structure is passed then
the dimensions of all of the data columns are used. If only a subset
of the index structure is passed then only the dimensions of those
data columds are returned.
OPTIONAL OUTPUTS:
None.
CALLS: ***
BOOST_ARRAY [1], BOOST_ARRAY [2], BOOST_ARRAY [3], DATATYPE [1], DATATYPE [2]
DATATYPE [3], sgt_tagname
CALLED BY:
CALL_TRIWARP, SGT_CRPIX, SGT_NEWREF, SMK_FULLDET, SUM_GAUSSB, destr_bilin [2]
mk_query_genx, mk_sumer_map [1], mk_sumer_map [2], mk_sumer_map [3]
sa_gt_specrange, sgt_det_y, sgt_range, sgt_wave, smk_atlas, sumer_destretch
COMMON BLOCKS:
None.
SIDE EFFECTS:
If the DIMS tag name can not be found in the index structure passed
to the routine, an error occurs.
RESTRICTIONS:
Only the index structure may be passed as input. It may turn out to
be useful to pass the filename as input and this option may be added
in the future.
PROCEDURE:
The routine returns the values of index.(i).dims which have been
taken from the binary table extension header in the FITS file.
EXAMPLE:
IDl> filename = '$SUMER_DATA/sum_960513_085055.fits'
IDL> rd_sumer,index,data
IDL> help,/str,index
** Structure <21fa08>, 7 tags, length=1648, refs=1:
W_937_803 STRUCT -> <Anonymous> Array(1)
W_933_380 STRUCT -> <Anonymous> Array(1)
W_930_748 STRUCT -> <Anonymous> Array(1)
W_926_226 STRUCT -> <Anonymous> Array(1)
W_909_000 STRUCT -> <Anonymous> Array(1)
W_944_520 STRUCT -> <Anonymous> Array(1)
GEN STRUCT -> <Anonymous> Array(1)
IDL> dims = sgt_dims(index)
IDL> print,dims
50 360 5
50 360 5
50 360 5
50 360 5
50 360 5
50 360 5
IDL> dims = sgt_dims(index.(0))
IDL> print,dims
50 360 5
IDL> dims = sgt_dims(index.(6))
% GT_DIMS: Pathological index structure.
MODIFICATION HISTORY:
HPW 24-JUL-1996:
HPW 07-AUG-1996: Renamed sgt_dims.
HPW 15-OCT-1996: Modified the routine to use boost_array for array
concatenation.
[Previous]
[Next]
NAME:
sgt_exposure
PURPOSE:
To retrieve an exposure of a SOHO/SUMER detector from a data
structure or fits file.
CATEGORY:
Data handling.
CALLING SEQUENCE:
exposure = sgt_exposure(data,data_col=1,data_exp=1)
exposure = sgt_exposure(filename,data_col=1,data_exp=1)
exposure = sgt_exposure(index,data,data_col=1,data_exp=1,lambda=lambda)
INPUTS:
Either the data structure returned from rd_sumer or a file name. If
the data column and detector exposure are not specified the first
exposure from the first data column is returned.
OPTIONAL INPUTS:
If the wavelength range is also desired then the index structure
must also be passed. Note that in this case the index variable
PRECEEDES the data variable.
KEYWORD PARAMETERS:
data_col: The column from which the detector exposure is to be
returned. The columns are number from 1 to the number of
data columns.
data_exp: The detector exposure to be returned. The exposures are
numbered from 1 to the number of exposures within a data
column.
OUTPUTS:
The data from an exposure of the detector.
OPTIONAL OUTPUTS:
An array corresponding to the wavelength (dispersion) direction of
the detector.
CALLS: ***
DATATYPE [1], DATATYPE [2], DATATYPE [3], rd_sumer [1], rd_sumer [2], sgt_wave
CALLED BY:
sgt_spectrum
COMMON BLOCKS:
None.
SIDE EFFECTS:
None.
RESTRICTIONS:
Only a single exposure may be specified.
PROCEDURE:
If the data structure is passed then the routine simply returns the
specified data. If a file name is passed then the specified data
column is first read with rd_sumer.
EXAMPLE:
Here the fifth exposure from the first data column is returned.
IDL> filename = 'sum_960513_085055.fits'
IDL> mk_query,filename
File: sum_960513_085055.fits
C Name Dimensions Wmin Wmax Xmin Xmax Ymin Ymax
1 W_937.803 (50,360,5) 936.69 938.91 -1.50 4.50 400.12 400.12
2 W_933.380 (50,360,5) 932.27 934.49 -1.50 4.50 400.12 400.12
3 W_930.748 (50,360,5) 929.64 931.86 -1.50 4.50 400.12 400.12
4 W_926.226 (50,360,5) 925.11 927.34 -1.50 4.50 400.12 400.12
5 W_909.000 (50,360,5) 907.89 910.11 -1.50 4.50 400.12 400.12
6 W_944.520 (50,360,5) 943.41 945.63 -1.50 4.50 400.12 400.12
IDL> dat = sgt_exposure(filename,data_col=1,data_exp=5)
or
IDL> rd_sumer,filename,index,data
IDL> dat = sgt_exposure(data,data_col=1,data_exp=5)
or
IDL> rd_sumer,filename,index,data
IDL> dat = sgt_exposure(index,data,data_col=1,data_exp=5,lambda=lambda)
MODIFICATION HISTORY:
HPW 08-AUG-1996:
HPW 30-DEC-1996: Fixed a bug that made it impossible to read the
specified exposure.
[Previous]
[Next]
NAME:
sgt_exptime
PURPOSE:
To retrieve the exposure time for a SOHO/SUMER observation.
CATEGORY:
Data handling.
CALLING SEQUENCE:
exptime = sgt_exptime(index)
exptime = sgt_exptime(index.(i))
INPUTS:
The index structure returned from rd_sumer.
OPTIONAL INPUTS:
None.
KEYWORD PARAMETERS:
None.
OUTPUTS:
The exposure time in seconds. If the entire index structure is
passed then an time for each exposure in the corresponding data
structure is returned. If the index structure corresponding to a
single column of data is passed then times for those data are returned.
OPTIONAL OUTPUTS:
None.
CALLS: ***
BOOST_ARRAY [1], BOOST_ARRAY [2], BOOST_ARRAY [3], DATATYPE [1], DATATYPE [2]
DATATYPE [3], sgt_tagname
CALLED BY:
counts2countrate, mk_query_genx, sgt_raster_time
COMMON BLOCKS:
None.
SIDE EFFECTS:
If the EXPTIME tag name can not be found in the index structure
passed to the routine, an error occurs.
RESTRICTIONS:
Only the index structure may be passed as input. It may turn out to
be useful to pass the filename as input and this option may be added
in the future.
PROCEDURE:
The routine returns the values of index.(i).exptime which have been
taken from the binary table extension header in the FITS file.
EXAMPLE:
IDl> filename = '$SUMER_DATA/sum_960513_085055.fits'
IDL> rd_sumer,index,data
IDL> help,/str,index
** Structure <21fa08>, 7 tags, length=1648, refs=1:
W_937_803 STRUCT -> <Anonymous> Array(1)
W_933_380 STRUCT -> <Anonymous> Array(1)
W_930_748 STRUCT -> <Anonymous> Array(1)
W_926_226 STRUCT -> <Anonymous> Array(1)
W_909_000 STRUCT -> <Anonymous> Array(1)
W_944_520 STRUCT -> <Anonymous> Array(1)
GEN STRUCT -> <Anonymous> Array(1)
IDL> exptime = sgt_exptime(index)
IDL> print,exptime
100.000 100.000 100.000 100.000 100.000
100.000 100.000 100.000 100.000 100.000
100.000 100.000 100.000 100.000 100.000
100.000 100.000 100.000 100.000 100.000
100.000 100.000 100.000 100.000 100.000
100.000 100.000 100.000 100.000 100.000
IDL> exptime = sgt_exptime(index.(0))
IDL> print,exptime
100.000 100.000 100.000 100.000 100.000
IDL> exptime = sgt_exptime(index.(6))
% GT_EXPTIME: Pathological index structure.
MODIFICATION HISTORY:
HPW 24-JUL-1996:
HPW 07-AUG-1996: Renamed sgt_exptime.
HPW 15-OCT-1996: Modified the routine to use boost_array for array
concatenation.
HPW 06-MAY-1999: Modified to return scalar if only one element.
[Previous]
[Next]
NAME:
sgt_file_type
PURPOSE:
Determines if a file is a fits file or a genx file.
CATEGORY:
Data handling.
CALLING SEQUENCE:
file_type = sgt_file_type(filename)
INPUTS:
The file name.
OPTIONAL INPUTS:
None.
KEYWORD PARAMETERS:
sumer: Returns SUMERGENX if the file is a genx file written with
wrt_sumer and YOHOGENX if the file was written with wrt_genx.
OUTPUTS:
A string which contains 'FITS', 'GENX', 'SUMERGENX', 'YOHKOHGENX',
or 'UNKNOWN'.
OPTIONAL OUTPUTS:
None.
CALLED BY:
mk_query [1], mk_query [2], mk_query_genx, rd_sumer [1], rd_sumer [2]
rd_sumer_genx
COMMON BLOCKS:
None.
SIDE EFFECTS:
None?
RESTRICTIONS:
Only identifies FITS files or files written with wrt_genx or
wrt_sumer. Note that non-genx files that happen to have the first 4
bytes equal to 0 will erronously be indentified as genx files.
PROCEDURE:
The obvious: Reads the fits few bytes of the file and looks for the
FITS keyword SIMPLE. Alternatively, the version number
of the genx file is checked.
EXAMPLE:
IDL> file = 'MyFitsFile.file'
IDL> print,sgt_file_type(file)
FITS
IDL> file = 'MyGenxFile.file'
IDL> print,sgt_file_type(file)
GENX
IDL> file = 'MyUnknownFile.file'
IDL> print,sgt_file_type(file)
UNKNOWN
MODIFICATION HISTORY:
HPW 31-OCT-1996: Original version.
HPW 17-JUL-1997: Modified to identify new version of sumer genx
file (version 998).
HPW 18-JUL-1997: Added SUMER keyword to allow the differentiation
of SUMER genx and YOHKOH genx files.
HPW 26-APR-1999: Fixed bug - no /xdr on open.
[Previous]
[Next]
Project:
SOHO - SUMER
Name:
SGT_NEWREF
Purpose:
Create new index containing new values for refpix, refval, and dims
given a subset of data format.
Use:
index_out = sgt_newref(index,wrange=[2,80],yrange=[10,20])
Inputs:
Index - a sumer index structure
Output:
Index_Out - a sumer index strucutue with new valies for REFVAL,
REFPIX, DIMS, and the tagnames. The dispersion and wavelengths
listed in the header are used to calculate the new REFVAL
and tagnames.
Input Keywords:
WRange - range of extracted data in wavelength dimension. In pixels
of the data format.
YRange - range of extracted data in SOLAR_Y dimension . In pixels
of the data format.
CALLS: ***
SCONV_TAGNAMES, SGT_BTE, SGT_CRPIX, sgt_delta, sgt_dims, sgt_refpix, sgt_refval
CALLED BY:
SUM_GAUSSB
Common:
None
Written:
Terry Kucera, 14 Aug 1996
[Previous]
[Next]
NAME:
sgt_range
PURPOSE:
provides the range of pixels for SUMER subformats
CATEGORY:
Data analysis.
CALLING SEQUENCE:
sgt_range,index[,/spatial]
INPUTS:
The index structure returned from rd_sumer.
OPTIONAL INPUTS:
None.
KEYWORD PARAMETERS:
spatial: if set give the spatial (y) pixel limits
spectral: if set give the specxtral pixel limits (default)
OUTPUTS:
The range in pixels of the data on the detector in either the y
direction (along the slit) or in the x (wavelength) direction
OPTIONAL OUTPUTS:
None.
CALLS: ***
BOOST_ARRAY [1], BOOST_ARRAY [2], BOOST_ARRAY [3], sgt_dims, sgt_refpix, sgt_slit
CALLED BY:
destr_bilin [2], sumer_destretch
COMMON BLOCKS:
None.
SIDE EFFECTS:
None.
MODIFICATION HISTORY:
HPW :
TAK 5-May-1999: Now gives correct yrange for both real time data
and cd-rom data.
[Previous]
[Next]
Project:
SOHO - SUMER
Name:
sgt_raster_time
Purpose:
To calculate the times at which individual exposures were taken.
Use:
Result = SGT_RASTER_TIME(index)
Inputs
index - The index structure returned from rd_sumer.
Output
the times of the individual exposures or (with keyword LIMITS) rasters
in data
Input Keywords:
Limits - give only start and end times of each raster, rather than the
time of each individual exposure
All keywords used with ANYTIM2CAL, including
FORM = n where
n output format
0 dd/mmm/yy hh:mm:ss [default]
1 dd-mmm-yy hh:mm:ss
2 dd/mm/yy hh:mm:ss
3 dd-mm-yy hh:mm:ss
4 mm/dd/yy hh:mm:ss
5 mm-dd-yy hh:mm:ss
6 yy/mm/dd hh:mm:ss
7 yy-mm-dd hh:mm:ss
8 yyyymmddhhmmss
9 dd-mmm-yyyy hh:mm:ss.sss (VMS-like)
10 dd-mmm-yyyy hh:mm:ss.ss (!stime-like)
etc TBD
Calls: ***
ANYTIM2CAL, ANYTIM2TAI, sgt_dettime, sgt_exptime
Common:
None
Written:
Terry Kucera, 28 Oct 1996
Modifications:
Fixed bug related to files with just one exposure. 28 sept. 1998, tak
[Previous]
[Next]
NAME:
sgt_refpix
PURPOSE:
To retrieve the reference pixels used to co-register the data with
the detector face.
CATEGORY:
Data handling.
CALLING SEQUENCE:
refpix = sgt_refpix(index)
refpix = sgt_refpix(index.(i))
INPUTS:
The index structure returned from rd_sumer.
OPTIONAL INPUTS:
None.
KEYWORD PARAMETERS:
None.
OUTPUTS:
The wavelength and spatial reference pixels. If the entire index
structure is passed then all of reference pixels are returned. If
the index structure corresponding to a single column of data is
passed then only those reference pixels are returned.
Note that the reference pixel returned corresponds to the
co-pixel+1.
OPTIONAL OUTPUTS:
None.
CALLS: ***
BOOST_ARRAY [1], BOOST_ARRAY [2], BOOST_ARRAY [3], DATATYPE [1], DATATYPE [2]
DATATYPE [3], sgt_tagname
CALLED BY:
CALL_TRIWARP, SGT_CRPIX, SGT_NEWREF, SMK_FULLDET, SUM_GAUSSB, destr_bilin [2]
mk_query_genx, sgt_range, sgt_wave, smk_atlas, sumer_destretch
COMMON BLOCKS:
None.
SIDE EFFECTS:
If the REFPIX tag name can not be found in the index structure
passed to the routine, an error occurs.
RESTRICTIONS:
Only the index structure may be passed as input. It may turn out to
be useful to pass the filename as input and this option may be added
in the future.
PROCEDURE:
The routine returns the values of index.(i).refpix which have been
taken from the binary table extension header in the FITS file.
EXAMPLE:
IDl> filename = '$SUMER_DATA/sum_960513_085055.fits'
IDL> rd_sumer,index,data
IDL> help,/str,index
** Structure <21fa08>, 7 tags, length=1648, refs=1:
W_937_803 STRUCT -> <Anonymous> Array(1)
W_933_380 STRUCT -> <Anonymous> Array(1)
W_930_748 STRUCT -> <Anonymous> Array(1)
W_926_226 STRUCT -> <Anonymous> Array(1)
W_909_000 STRUCT -> <Anonymous> Array(1)
W_944_520 STRUCT -> <Anonymous> Array(1)
GEN STRUCT -> <Anonymous> Array(1)
IDL> refpix = sgt_refpix(index)
IDL> print,refpix
715.000 179.000 1.00000
616.000 179.000 1.00000
557.000 179.000 1.00000
456.000 179.000 1.00000
72.0000 179.000 1.00000
865.000 179.000 1.00000
IDL> refpix = sgt_refpix(index.(0))
IDL> print,refpix
715.000 179.000 1.00000
IDL> refpix = sgt_refpix(index.(6))
% GT_REFPIX: Pathological index structure.
MODIFICATION HISTORY:
HPW 24-JUL-1996:
HPW 07-AUG-1996: Renamed sgt_refpix.
HPW 15-OCT-1996: Modified the routine to use boost_array for array
concatenation.
[Previous]
[Next]
NAME:
sgt_refval
PURPOSE:
To retrieve the reference values used to co-register the data with
the SOHO/SUMER detector face.
CATEGORY:
Data handling.
CALLING SEQUENCE:
refval = sgt_refval(index)
refval = sgt_refval(index.(i))
INPUTS:
The index structure returned from rd_sumer.
OPTIONAL INPUTS:
None.
KEYWORD PARAMETERS:
None.
OUTPUTS:
The wavelength and spatial reference values in pixels. If the entire
index structure is passed then all of reference pixels are
returned. If the index structure corresponding to a single column of
data is passed then only those reference pixels are returned.
OPTIONAL OUTPUTS:
None.
CALLS: ***
BOOST_ARRAY [1], BOOST_ARRAY [2], BOOST_ARRAY [3], DATATYPE [1], DATATYPE [2]
DATATYPE [3], sgt_tagname
CALLED BY:
SGT_NEWREF, SMK_FULLDET, get_sum_column, mk_query_genx, sgt_wave, smk_atlas
COMMON BLOCKS:
None.
SIDE EFFECTS:
If the refval tag name can not be found in the index structure
passed to the routine, an error occurs.
RESTRICTIONS:
Only the index structure may be passed as input. It may turn out to
be useful to pass the filename as input and this option may be added
in the future.
PROCEDURE:
The routine returns the values of index.(i).refval which have been
taken from the binary table extension header in the FITS file.
EXAMPLE:
IDl> filename = '$SUMER_DATA/sum_960513_085055.fits'
IDL> rd_sumer,index,data
IDL> help,/str,index
** Structure <21fa08>, 7 tags, length=1648, refs=1:
W_937_803 STRUCT -> <Anonymous> Array(1)
W_933_380 STRUCT -> <Anonymous> Array(1)
W_930_748 STRUCT -> <Anonymous> Array(1)
W_926_226 STRUCT -> <Anonymous> Array(1)
W_909_000 STRUCT -> <Anonymous> Array(1)
W_944_520 STRUCT -> <Anonymous> Array(1)
GEN STRUCT -> <Anonymous> Array(1)
IDL> refval = sgt_refval(index)
IDL> print,refval
937.803 400.000 -1.00000
933.380 400.000 -1.00000
930.748 400.000 -1.00000
926.226 400.000 -1.00000
909.000 400.000 -1.00000
944.520 400.000 -1.00000
IDL> refval = sgt_refval(index.(0))
IDL> print,refval
937.803 400.000 -1.00000
IDL> refval = sgt_refval(index.(6))
% GT_REFVAL: Pathological index structure.
MODIFICATION HISTORY:
HPW 24-JUL-1996:
HPW 07-AUG-1996: Renamed sgt_refval.
HPW 15-OCT-1996: Modified the routine to use boost_array for array
concatenation.
[Previous]
[Next]
NAME:
sgt_slit
PURPOSE:
To retrieve the slit used for an SOHO/SUMER observation.
CATEGORY:
Data handling.
CALLING SEQUENCE:
slit = sgt_slit(index)
INPUTS:
The index structure returned from rd_sumer.
OPTIONAL INPUTS:
None.
KEYWORD PARAMETERS:
Text: Returns a string describing the slit instead of a numerical
code.
OUTPUTS:
An integer code or string which identifies the slit used in an
observation.
OPTIONAL OUTPUTS:
None.
CALLS: ***
DATATYPE [1], DATATYPE [2], DATATYPE [3], sgt_tagname
CALLED BY:
CALL_TRIWARP, destr_bilin [2], mk_query_genx, sgt_range, sumer_destretch
COMMON BLOCKS:
None.
SIDE EFFECTS:
If the SLIT tag name can not be found in the index structure passed
to the routine, an error occurs.
RESTRICTIONS:
Only the index structure may be passed as input. It may turn out to
be useful to pass the filename as input and this option may be added
in the future.
PROCEDURE:
The routine parses the value of index.gen.slit from the index
structure. The value for slit has been taken directly from the
primary FITS header.
EXAMPLE:
IDl> filename = '$SUMER_DATA/sum_960513_085055.fits'
IDL> rd_sumer,index,/nodata
IDL> slit = sgt_slit(index)
IDL> print,slit
2
IDL> slit = sgt_slit(index,/text)
IDL> print,slit
<2> 1.0 * 300 centered
MODIFICATION HISTORY:
HPW 24-JUL-1996:
HPW 07-AUG-1996: Renamed sgt_slit.
[Previous]
[Next]
NAME:
sgt_solar_x
PURPOSE:
To retrieve the x corrdinate of the pointing of a SOHO/SUMER
observation.
CATEGORY:
Data handling.
CALLING SEQUENCE:
solar_x = sgt_solar_x(index)
solar_x = sgt_solar_x(index.(i))
INPUTS:
The index structure returned from rd_sumer.
OPTIONAL INPUTS:
None.
KEYWORD PARAMETERS:
None.
OUTPUTS:
The x coordinate of the pointing in arcsec. If the entire index
structure is passed then all of x coordinates are returned. If the
index structure corresponding to a single column of data is passed
then only those x coordinates are returned.
OPTIONAL OUTPUTS:
None.
CALLS: ***
BOOST_ARRAY [1], BOOST_ARRAY [2], BOOST_ARRAY [3], DATATYPE [1], DATATYPE [2]
DATATYPE [3], sgt_tagname
CALLED BY:
mk_query_genx, mk_sumer_map [1], mk_sumer_map [2], mk_sumer_map [3]
COMMON BLOCKS:
None.
SIDE EFFECTS:
If the SOLAR_X tag name can not be found in the index structure
passed to the routine, an error occurs.
RESTRICTIONS:
Only the index structure may be passed as input. It may turn out to
be useful to pass the filename as input and this option may be added
in the future.
PROCEDURE:
The routine returns the values of index.(i).solar_x which have been
taken from the binary table extension header in the FITS file.
EXAMPLE:
IDl> filename = '$SUMER_DATA/sum_960513_085055.fits'
IDL> rd_sumer,index,data
IDL> help,/str,index
** Structure <21fa08>, 7 tags, length=1648, refs=1:
W_937_803 STRUCT -> <Anonymous> Array(1)
W_933_380 STRUCT -> <Anonymous> Array(1)
W_930_748 STRUCT -> <Anonymous> Array(1)
W_926_226 STRUCT -> <Anonymous> Array(1)
W_909_000 STRUCT -> <Anonymous> Array(1)
W_944_520 STRUCT -> <Anonymous> Array(1)
GEN STRUCT -> <Anonymous> Array(1)
IDL> solar_x = sgt_solar_x(index)
IDL> print,solar_x
-1.50000 0.00000 1.50000 3.00000 4.50000
-1.50000 0.00000 1.50000 3.00000 4.50000
-1.50000 0.00000 1.50000 3.00000 4.50000
-1.50000 0.00000 1.50000 3.00000 4.50000
-1.50000 0.00000 1.50000 3.00000 4.50000
-1.50000 0.00000 1.50000 3.00000 4.50000
IDL> solar_x = sgt_solar_x(index.(0))
IDL> print,solar_x
-1.50000 0.00000 1.50000 3.00000 4.50000
IDL> solar_x = sgt_solar_x(index.(6))
% GT_SOLAR_X: Pathological index structure.
MODIFICATION HISTORY:
HPW 24-JUL-1996:
HPW 07-AUG-1996: Renamed sgt_solar_x.
HPW 15-OCT-1996: Modified the routine to use boost_array for array
concatenation.
[Previous]
[Next]
NAME:
sgt_solar_y
PURPOSE:
To retrieve the y corrdinate of the pointing of a SOHO/SUMER
observation.
CATEGORY:
Data handling.
CALLING SEQUENCE:
solar_y = sgt_solar_y(index)
solar_y = sgt_solar_y(index.(i))
INPUTS:
The index structure returned from rd_sumer.
OPTIONAL INPUTS:
None.
KEYWORD PARAMETERS:
None.
OUTPUTS:
The y coordinate of the pointing in arcsec. If the entire index
structure is passed then all of y coordinates are returned. If the
index structure corresponding to a single column of data is passed
then only those y coordinates are returned.
OPTIONAL OUTPUTS:
None.
CALLS: ***
BOOST_ARRAY [1], BOOST_ARRAY [2], BOOST_ARRAY [3], DATATYPE [1], DATATYPE [2]
DATATYPE [3], sgt_tagname
CALLED BY:
mk_query_genx, sgt_det_y
COMMON BLOCKS:
None.
SIDE EFFECTS:
If the SOLAR_Y tag name can not be found in the index structure
passed to the routine, an error occurs.
RESTRICTIONS:
Only the index structure may be passed as input. It may turn out to
be useful to pass the filename as input and this option may be added
in the future.
PROCEDURE:
The routine returns the values of index.(i).solar_y which have been
taken from the binary table extension header in the FITS file.
EXAMPLE:
IDl> filename = '$SUMER_DATA/sum_960513_085055.fits'
IDL> rd_sumer,index,data
IDL> help,/str,index
** Structure <21fa08>, 7 tags, length=1648, refs=1:
W_937_803 STRUCT -> <Anonymous> Array(1)
W_933_380 STRUCT -> <Anonymous> Array(1)
W_930_748 STRUCT -> <Anonymous> Array(1)
W_926_226 STRUCT -> <Anonymous> Array(1)
W_909_000 STRUCT -> <Anonymous> Array(1)
W_944_520 STRUCT -> <Anonymous> Array(1)
GEN STRUCT -> <Anonymous> Array(1)
IDL> solar_y = sgt_solar_y(index)
IDL> print,solar_y
400.125 400.125 400.125 400.125 400.125
400.125 400.125 400.125 400.125 400.125
400.125 400.125 400.125 400.125 400.125
400.125 400.125 400.125 400.125 400.125
400.125 400.125 400.125 400.125 400.125
400.125 400.125 400.125 400.125 400.125
IDL> solar_y = sgt_solar_y(index.(0))
IDL> print,solar_y
400.125 400.125 400.125 400.125 400.125
IDL> solar_y = sgt_solar_y(index.(6))
% GT_SOLAR_Y: Pathological index structure.
MODIFICATION HISTORY:
HPW 24-JUL-1996:
HPW 07-AUG-1996: Renamed sgt_solar_y.
HPW 15-OCT-1996: Modified the routine to use boost_array for array
concatenation.
[Previous]
[Next]
NAME:
sgt_spectrum
PURPOSE:
To retrieve an SOHO/SUMER spectrum from a data structure or fits
file.
CATEGORY:
Data handling.
CALLING SEQUENCE:
spectrum = sgt_spectrum(data,data_col=1,data_exp=1,data_spec=180)
spectrum = sgt_spectrum(filename,data_col=1,data_exp=1,data_spec=180)
spectrum = sgt_spectrum(index,data,data_col=1,data_exp=1,data_spec=180,$
lambda=lambda)
INPUTS:
Either the data structure returned from rd_sumer or a file name. If
the data column, detector exposure, and/or spectrum are not
specified the first spectrum from the first exposure in the first
data column is returned.
OPTIONAL INPUTS:
If the wavelength range is also desired then the index structure
must also be passed. Note that in this case the index variable
PRECEEDES the data variable.
KEYWORD PARAMETERS:
data_col: The column from which the spectrum is to be returned. The
columns are number from 1 to the number of data columns.
data_exp: The detector exposure from which the spectrum is to be
returned. The exposures are numbered from 1 to the number
of exposures within a data column.
data_spec: The spectrum to be returned. The spectra are number from
1 to the number of spectra (essentially the length of the
slit) within an exposure.
OUTPUTS:
A spectrum.
OPTIONAL OUTPUTS:
An array corresponding to the wavelength (dispersion) direction of
the detector.
CALLS: ***
DATATYPE [1], DATATYPE [2], DATATYPE [3], sgt_exposure
COMMON BLOCKS:
None.
SIDE EFFECTS:
None.
RESTRICTIONS:
Only a single spectrum may be specified.
PROCEDURE:
Calls sgt_exposure and then returns the specified spectrum.
EXAMPLE:
Here a spectrum at the center of the slit from the fifth exposure in
the first data column is returned.
IDL> filename = 'sum_960513_085055.fits'
IDL> mk_query,filename
File: sum_960513_085055.fits
C Name Dimensions Wmin Wmax Xmin Xmax Ymin Ymax
1 W_937.803 (50,360,5) 936.69 938.91 -1.50 4.50 400.12 400.12
2 W_933.380 (50,360,5) 932.27 934.49 -1.50 4.50 400.12 400.12
3 W_930.748 (50,360,5) 929.64 931.86 -1.50 4.50 400.12 400.12
4 W_926.226 (50,360,5) 925.11 927.34 -1.50 4.50 400.12 400.12
5 W_909.000 (50,360,5) 907.89 910.11 -1.50 4.50 400.12 400.12
6 W_944.520 (50,360,5) 943.41 945.63 -1.50 4.50 400.12 400.12
IDL> spec = sgt_spectrum(filename,data_col=1,data_exp=5,data_spec=180)
or
IDL> rd_sumer,filename,index,data
IDL> spec = sgt_spectrum(data,data_col=1,data_exp=5,data_spec=180)
or
IDL> rd_sumer,filename,index,data
IDL> spec = sgt_spectrum(index,data,data_col=1,data_exp=5,data_spec=180,$
lambda=lambda)
MODIFICATION HISTORY:
HPW 08-AUG-1996:
[Previous]
[Next]
NAME:
sgt_tagname
PURPOSE:
To retrieve the value of structure tag name.
CATEGORY:
Data handling.
CALLING SEQUENCE:
tag_value = sgt_tagname(structure,tag_name,status=status)
INPUTS:
A structure and tag name.
OPTIONAL INPUTS:
None.
KEYWORD PARAMETERS:
None.
OUTPUTS:
The value of structure tag name.
OPTIONAL OUTPUTS:
Status: Status is 0 (FALSE) if the input tag name is not found and 1
(TRUE) if it is. If status is false the routine returns a
null string ('') as output.
CALLS: ***
DATATYPE [1], DATATYPE [2], DATATYPE [3]
CALLED BY:
SGT_CRPIX, sgt_bin, sgt_compress, sgt_delta, sgt_detector, sgt_dettime, sgt_dims
sgt_exptime, sgt_refpix, sgt_refval, sgt_slit, sgt_solar_x, sgt_solar_y, sgt_time
COMMON BLOCKS:
None.
SIDE EFFECTS:
None?
RESTRICTIONS:
Input variable must be a structure. Only the first instance of a tag
name is returned. Additional sub-structures will not be searched
after the first instance of the specified tag name is found.
PROCEDURE:
The routine recursively desends the stucture searching for the
specified tag name.
EXAMPLE:
IDl> filename = '$SUMER_DATA/sum_960513_085055.fits'
IDL> rd_sumer,index,/nodata
IDL> date_obs = sgt_tagname(index,'date_obs',status=status)
IDL> print,date_obs
1996-05-13T08:50:55.030
IDL> print,status
1
MODIFICATION HISTORY:
HPW 24-JUL-1996:
HPW 07-AUG-1996: Renamed sgt_tagname.
[Previous]
[Next]
NAME:
sgt_time
PURPOSE:
To retrieve the time at which a SOHO/SUMER observation began.
CATEGORY:
Data handling.
CALLING SEQUENCE:
time = sgt_time(index)
INPUTS:
The index structure returned from rd_sumer.
OPTIONAL INPUTS:
None.
KEYWORD PARAMETERS:
DET_TIME: The start time for each exposure in the data structure.
OUTPUTS:
A seven element array containing the time. The elements of the array
are the hour, minute, second, millisecond, day, month, year that an
observation began. If the keyword DET_TIME is used the format will
be an array of the form (7,n_exposures,n_columns).
OPTIONAL OUTPUTS:
None.
CALLS: ***
ADDTIME [1], ADDTIME [2], BOOST_ARRAY [1], BOOST_ARRAY [2], BOOST_ARRAY [3]
DATATYPE [1], DATATYPE [2], DATATYPE [3], sgt_tagname
CALLED BY:
GET_SUMER_FLAT
COMMON BLOCKS:
None.
SIDE EFFECTS:
If the DATE_OBS tag name can not be found in the index structure
passed to the routine, an error occurs.
RESTRICTIONS:
Only the index structure may be passed as input. It may turn out to
be useful to pass the filename as input and this option may be added
in the future.
PROCEDURE:
The routine parses the value of index.gen.date_obs and returns it as
a seven element array. Optially, the det_time tag in the index
struture is used to determine the start time for each exposure.
EXAMPLE:
IDl> filename = '$SUMER_DATA/sum_960513_085055.fits'
IDL> rd_sumer,index,/nodata
IDL> time = sgt_time(index)
IDL> print,time
8 50 55 30 13 5 96
MODIFICATION HISTORY:
HPW 24-JUL-1996:
HPW 07-AUG-1996: Renamed sgt_time.
HPW 20-OCT-1997: Modified to return start times for each exposure.
[Previous]
[Next]
NAME:
sgt_wave
PURPOSE:
Returns a wavelength array based on the index structure
CATEGORY:
Data handling.
CALLING SEQUENCE:
wave = sgt_wave(index)
wave = sgt_wave(index.(i))
INPUTS:
Either the entire index structure, in which case the wavelength
array is based on the first data column, or the subset of the index
structure pertaining to a specific data column. See the routine
rd_sumer.pro for the definition of the index structure.
OPTIONAL INPUTS:
None
KEYWORD PARAMETERS:
None
OUTPUTS:
The wavelength array in Angstroms.
OPTIONAL OUTPUTS:
None.
CALLS: ***
DATATYPE [1], DATATYPE [2], DATATYPE [3], UNIQ [1], UNIQ [2], UNIQ [3], sgt_delta
sgt_dims, sgt_refpix, sgt_refval
CALLED BY:
mk_query_genx, sgt_column, sgt_exposure
COMMON BLOCKS:
None.
SIDE EFFECTS:
If the necessary tag names can not be found in the index structure
passed to the routine, an error occurs.
RESTRICTIONS:
None.
PROCEDURE:
Uses the refpix, refval, dim, and delta variables from the index
structure to compute the wavelgnth array
EXAMPLE:
IDL> filename = '$SUMER_DATA/sum_960513_085055.fits'
IDL> mk_query,filename
File: /net/solb2/soho/sumer_fits/mariska/sum_960513_085055.fits
C Name Dimensions Wmin Wmax Xmin Xmax Ymin Ymax
1 W_937.803 (50,360,5) 936.69 938.91 -1.50 4.50 400.12 400.12
2 W_933.380 (50,360,5) 932.27 934.49 -1.50 4.50 400.12 400.12
3 W_930.748 (50,360,5) 929.64 931.86 -1.50 4.50 400.12 400.12
4 W_926.226 (50,360,5) 925.11 927.34 -1.50 4.50 400.12 400.12
5 W_909.000 (50,360,5) 907.89 910.11 -1.50 4.50 400.12 400.12
6 W_944.520 (50,360,5) 943.41 945.63 -1.50 4.50 400.12 400.12
IDL> rd_sumer,index,data
IDL> wave = sgt_wave(index)
IDL> help,wave
WAVE FLOAT = Array(50, 6)
IDL> plot,wave(*,0),total(data.(0)(*,*,0),2)
MODIFICATION HISTORY:
HPW 17-JUN-1996:
HPW 10-JUL-1996: Modified to work with new index structure.
HPW 24-JUL-1996: Modified to produce a wavelength array for each
column of the index structure that is passed to
the routine.
HPW 07-AUG-1996: Renamed sgt_wave.
HPW 27-FEB-1997: Fixed bug related to refpix.
HPW 21-JUL-1997: Added keywords first_order and second_order to
return selected wavelength range. The default is
still to return the wavelength range indicated by
delta and refval.
HPW 24-MAY-1999: Fixed a bug related to generating second order
wavelength scales.
[Previous]
[Next]
Project : SOHO - LASCO
Name :
Purpose :
Category :
Explanation :
Syntax :
CALLED BY:
LAYOUT
Examples :
Inputs : None
Opt. Inputs : None
Outputs : None
Opt. Outputs: None
Keywords : None
CALLS: ***
LASCO_FITSHDR2STRUCT
Common :
Restrictions:
Side effects: Not known
History : Version 1, 14-May-1996, B Podlipnik. Written
Contact : BP, borut@lasco1.mpae.gwdg.de
[Previous]
[Next]
NAME:
SHARPEN
PURPOSE:
Sharpens a ratio image by adding in a small amount of an edge enhanced image
CATEGORY:
LASCO UTIL
CALLING SEQUENCE:
Result = SHARPEN(Img,Bkg,factor)
INPUTS:
Img: Input image in DN/sec
Bkg: Background image in DN/sec
Factor: Factor of edge enhanced image to add to original image, Default is .015
KEYWORD PARAMETERS:
PF: Point filter factor, default is 4
BOX_SIZE: Size of box to use in unsharp mask. Default is 11 points
NO_RATIO: Return straight edge-enhanced image
OUTPUTS:
This function returns the edge enhance ratio image as a real number.
CALLS: ***
point_filter
CALLED BY:
MKMOVIE, MKMOVIE0 obsolete version of mkmoviepro, MK_IMG
SIDE EFFECTS:
RESTRICTIONS:
PROCEDURE:
The procedure to enhance an image adds a little edge enhancement to the original image.
First the image (in DN/sec) is point filtered to remove the stars and cosmic rays.
Then the unsharp mask image is formed with the original image and the background
image. The edge enhanced image is the difference between the unsharp mask of
the original image and the background image. The difference is performed to remove
any artifacts such as stray light arcs that are in both the original and background images.
The ratio image is computed and the missing blocks are set to 1.0.
The edge enhanced image is computed as:
(Img/Bkg) + factor*edge_enhanced_image
EXAMPLE:
MODIFICATION HISTORY:
Written by: RAH, 20 Apr 98
99/10/27, N Rich Add NO_RATIO keyword
%W% %H% LASCO IDL LIBRARY
[Previous]
[Next]
NAME:
sharpfocus
PURPOSE:
To
CALLS: ***
FOCUS_AREA, SHARPFOCUS2, SHARPNESS
HISTORY:
Written 6-Apr-94 by M.Morrison (using Zayer routine as start)
26-Apr-94 (MDM) - Added /ISS option
[Previous]
[Next]
Project : SOHO - CDS
Name : SHOW_AXES
Purpose : Informs of axes type of CDS data structure.
Explanation : The data array returned in the .detdata tag by readcdsfits
can have either 2,3 or 4 dimensions. This routine lists the
axes descriptors by way of explanation of what the data array
represents.
Use : IDL> show_axes, structure
Inputs : structure - CDS data structure returned by READCDSFITS
Opt. Inputs : None
Outputs : None
Opt. Outputs: None
Keywords : None
Calls : ***
FMT_VECT, GT_WINSIZE, N_DIMENSIONS
Common : None
Restrictions: None
Side effects: None
Category : CDS, FITS, array
Prev. Hist. : None
Written : C D Pike, RAL, 11-Jul-95
Modified :
Version : Version 1, 11-Jul-95
[Previous]
[Next]
NAME: show_catalog.pro
PURPOSE: list the catalog in memory
CATEGORY: Preprocessing
CALLING SEQUENCE: SHOW_CATALOG
INPUTS: None
OPTIONAL INPUT PARAMETERS: None
KEYWORD PARAMETERS: None
OUTPUTS: catalog list in the screen
OPTIONAL OUTPUT PARAMETERS: None
COMMON BLOCKS: CATA, db_dark, ndarks, drk_name
SIDE EFFECTS: opens a catalog of darks if this dont exists
RESTRICTIONS:
PROCEDURE:
MODIFICATION HISTORY: defined by ALL 6/24/93
SCCS variables for IDL use
@(#)show_catalog.pro 1.0 25/6/93 :LAS
[Previous]
[Next]
Project : SOHO - CDS
Name : SHOW_CDHS
Purpose : Interprets CDHS series and raster IDs
Explanation : The series and raster IDs used by the CDHS are not the same
as the study and raster IDs in the ground based databases.
The correspondence between them is kept in the series_id and
raster_id databases. This routine allows the user to see which
groundbased studies and rasters are associated with a given
CDHS ID. If neither a series ID nor a raster ID are given then
a summary of all CDHS IDs is produced.
Use : IDL> show_cdhs [,raster=raster, series=series, /hardcopy, $
file=file, /quiet, /keep]
Inputs : None
Opt. Inputs : None
Outputs : Information is optionally printed to the screen and hardcopy.
Opt. Outputs: None
Keywords : RASTER - specifies the CDHS raster ID
SERIES - specifies the CDHS series ID
HARDCOPY - send copy of output to printer
KEEP - inhibits deletion of hardcopy file created in the
user's home directory.
FILE - if null on entry then the hardcopy file name
created is returned in this. If non-null on
entry then that file name is used for the output.
QUIET - if present, no information is output to the screen
Calls : ***
ANYTIM2CAL, Bell, CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], DELETE_FILE [1]
DELETE_FILE [2], FILEPATH, GET_CDHS_RASTER, GET_CDHS_SERIES, GET_UTC, PRINT_STR
RD_ASCII [1], RD_ASCII [2], SHOW_RASTER, SHOW_STUDY, concat_dir [4]
Common : None
Restrictions: None
Side effects: None
Category : Telemetry, planning
Prev. Hist. : None
Written : C D Pike, RAL, 9-Jun-95
Modified : Added message when output KEEPed. CDP, 27-Jul-95
Version : Version 2, 27-Jul-95
[Previous]
[Next]
Project : SOHO - CDS
Name : SHOW_DATAWIN
Purpose : To list the contents of the datawin database.
Explanation : Uses the datawin database access routines to present the
user with a listing of the requested line list(s).
Use : IDL> show_datawin [, num_list, /hardcopy, etc.]
Inputs : num_list - Integer or integer array giving ID numbers
of specific data window(s) required.
or
dw_struct - data window structure as returned by get_datawin
Opt. Inputs : None
Outputs : Listing is given to screen or printer if required.
Opt. Outputs: None
Keywords : DETECTOR - specify detector to which line lists relate.
HARDCOPY - print hardcopy of output.
QUIET - no output to screen
KEEP - keep output file
FILE - specify output file, or retrieve file used if
file = '' on entry. If file is omitted or
blank on entry then output is written to standard
file in user's 'home' directory. If a name is
supplied on entry, that filename is used
unchanged.
SUMMARY - summary of all lists (no details of individual
lines).
ERRMSG - return error in this if it is defined on entry
Calls : ***
CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], DATATYPE [1], DATATYPE [2]
DATATYPE [3], DELETE_FILE [1], DELETE_FILE [2], FILEPATH, FIND_ALL_DIR [1]
FIND_ALL_DIR [2], FIND_ALL_DIR [3], FMT_VECT, GET_DATAWIN, REM_MULT_CHAR, STRPAD
UPDATE_DEX, concat_dir [4]
Common : None
Restrictions: None
Side effects: None
Category : Database
Prev. Hist. : Based on tp_dump_setup.
Written : C D Pike, RAL, 24-May-95
Modified : Rework output file name calculation. CDP, 2-Jum-95
Added message when output KEEPed. CDP, 27-Jul-95
Update for new format of structure input. CDP, 6-Feb-96
Include CURRENT keyword. CDP, 7-Feb-96
Use FIND_ALL_DIR. CDP, 09-Aug-96
Version : Version 6, 09-Aug-96
[Previous]
[Next]
Project : SOHO - CDS
Name : SHOW_EVARS
Purpose : List current definitions of CDS environment variables.
Explanation : Collects and lists the definitions of the various environment
variables used by CDS.
Use : IDL> show_evars [,/hard]
Inputs : None
Opt. Inputs : None
Outputs : None
Opt. Outputs: None
Keywords : HARDCOPY - produces a hardcopy listing.
QUIET - no screen output
KEEP - keeps the disk file of output (cds_evars_list) in
current directory.
Calls : ***
Bell, CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], DELETE_FILE [1]
DELETE_FILE [2], FILEPATH, GET_ENVIRON, STR2ARR [1], STR2ARR [2], STRPAD
concat_dir [4]
Common : None
Restrictions: None
Side effects: None
Category : Help
Prev. Hist. : None
Written : C D Pike, RAL, 3-Nov-95
Modified : Added CDS_CP_STMFILES(_W). CDP, 21-Nov-95
Added CDS_CP_UPDATE and _ENG. CDP, 8-Dec-95
Added CDS_SUMMARY_DATA CDP, 25-Jun-96
Added CDS_ENG_DEMO and use GET_ENVIRON
CDP, 09-Aug-96
Version : Version 5, 09-Aug-96
[Previous]
[Next]
NAME: show_hdr.pro
PURPOSE: visualize keywords in Calibration headers
CATEGORY: General tools high level routine
CALLING SEQUENCE: show_hdr or show_hdr,/FULL
INPUTS: None
OPTIONAL INPUT PARAMETERS: None
KEYWORD PARAMETERS: /FULL
OUTPUTS: A list of ima_header
OPTIONAL OUTPUT PARAMETERS:
COMMON BLOCKS: None
SIDE EFFECTS:
RESTRICTIONS:
PROCEDURE:
MODIFICATION HISTORY:
All 4/25/93 for VMS files in general
SCCS variables for IDL use
@(#)show_hdr.pro 1.3 4/25/93 :LAS
[Previous]
[Next]
NAME: show_ima_hdr.pro
PURPOSE: visualize keywords from file headers
CATEGORY: General tools high level routine
CALLING SEQUENCE: show_ima_hdr, hdr_name
show_ima_hdr, hdr_name,/FULL
INPUTS: hdr_name Name of header file
OPTIONAL INPUT PARAMETERS: None
KEYWORD PARAMETERS: /FULL
OUTPUTS: A list of ima_header
OPTIONAL OUTPUT PARAMETERS:
COMMON BLOCKS: None
SIDE EFFECTS:
RESTRICTIONS:
PROCEDURE:
MODIFICATION HISTORY:
All 4/25/93 for VMS files in general
corrected by M.B according to the new features of headers
11/03/93
SCCS variables for IDL use
@(#)show_ima_hdr.pro 1.3 4/25/93 :LAS
[Previous]
[Next]
Project : SOHO - CDS
Name : SHOW_LINELIST
Purpose : To list the contents of the linelist database.
Explanation : Uses the linelist database access routines to present the
user with a listing of the requested line list(s).
Use : IDL> show_linelist [, num_list, /hardcopy, etc.]
Inputs : num_list - Integer or integer array giving ID numbers
of specific line list(s) required.
or
line_struct - line list structure as returned by get_linelist
Opt. Inputs : None
Outputs : Listing is given to screen or printer if required.
Opt. Outputs: None
Keywords : DETECTOR - specify detector to which line lists relate.
HARDCOPY - print hardcopy of output.
QUIET - no output to screen
KEEP - keep output file
FILE - specify output file, or retrieve file used if
file = '' on entry. If file is omitted or blank
on entry, then a standard file is written to
user's 'home' directory. Otherwise the file
name supplied is used unchanged.
SUMMARY - summary of all lists (no details of individual
lines).
ERRMSG - return error in this if it is defined on entry
Calls : ***
Bell, CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], DATATYPE [1], DATATYPE [2]
DATATYPE [3], DELETE_FILE [1], DELETE_FILE [2], FILEPATH, FIND_ALL_DIR [1]
FIND_ALL_DIR [2], FIND_ALL_DIR [3], GET_LINELIST, LIST_LINELIST, concat_dir [4]
Common : None
Restrictions: None
Side effects: None
Category : Database
Prev. Hist. : None
Written : C D Pike, RAL, 14-Aug-94
Modified : Version 1, C D Pike, RAL, 14-Aug-94
Version 2, William Thompson, GSFC, 16 September 1994
Output to screen with /MORE
Version 3, William Thompson, GSFC, 15 March 1995
Removed LL_TITLE
Version 4, CDP, 24-May-95. Major revision to bring into line
with other show_xxx routines.
Version 5, CDP, 2-Jun-95. Rework file name handling.
Version 6, CDP, 08-Aug-96. Use FIND_ALL_DIR.
Version : Version 6, 08-Aug-96
[Previous]
[Next]
Name: show_pix_event
Purpose: event driver for xshow_pix
CALLS: ***
BREAK_FILE [1], BREAK_FILE [2], BREAK_FILE [3], EVENT_NAME, GET_WUVALUE
GET_WVALUE, WDEF [1], WDEF [2], XLOADCT [1], XLOADCT [2], XLOADCT [3], XMOVIE [1]
XMOVIE [2], break_file [4], data_chk [1], data_chk [2], get_info [1], get_info [2]
get_info [3], get_info [4], get_logenv [1], get_logenv [2], mapx [1], mapx [2]
restgen [1], restgen [2], ut_time [1], ut_time [2], wc_where [1], wc_where [2]
CALLED BY:
show_pix [1], show_pix [2]
History:
20-Dec-1993 (SLF) (guts of show_pix.pro, 10-Nov)
22-Dec-1993 (SLF) window creation logic (IDL feature workaround)
1-Feb-1994 (SLF) allow empty directories
18-Jul-1994 (SLF) if new data disply, show current UT Time
22-Jul-1994 (SLF) add common block (externalize after exit)
7-Sep-1994 (SLF) Prepend (not append) UT TIME for new_data subdirectory
16-feb-1994 (SLF) enable hardcopy option
2-apr-1995 (slf) movie option
10-apr-1995 (SLF) problem with pre-existing window display
[Previous]
[Next]
Project : SOHO - CDS
Name : SHOW_PLAN
Purpose : Produce a listing of a CDS observation plan.
Explanation : For those who like to read paper, this routine displays
the salient points in the definition of a CDS entry in
one of the planning databases.
Use : IDL> show_plan, str [,/detail, /sci etc.]
or
IDL> show_plan, utc [,/detail etc.]
Inputs : str - a valid CDS details definition structure
as returned by one of the get_xxxx routines.
OR
utc - a valid CDS time in utc internal format
Opt. Inputs : None
Outputs : Can send to file and print, also output to screen if needed.
Opt. Outputs: None
Keywords : KEEP - keep temporary output file. File name is
detail_yyyymmddhhmmss.dmp where the yyyy.... is
date and time of the start of the entry. For other
than the details database the prefic 'detail' is
replaced by something appropriate.
QUIET - no information to screen
HARDCOPY - send output to printer
ERRMSG - if defined on entry this will be returned with
any error messages that occur.
FILE - file name created is returned in this if defined
on entry (and set to '') or any input value is
used as the output file name.
SUMMARY - just give a summary of all entries (needs one
of following keywords to identify the plan
required.
DETAIL - use only the CDS details database
SCIENCE - use only the CDS science plan database
SOHO - use the Soho plan database
FLAG - use only the CDS flag database
ALT - use only the CDS alternative science plan
INSTRUMENT - instrument when selecting science plans (default
= all instruments)
NOW - do a summary from now to infinity
FROM - do a summary from this time to infinity
Calls : ***
ANYTIM2CAL, ANYTIM2UTC [1], ANYTIM2UTC [2], CONCAT_DIR [1], CONCAT_DIR [2]
CONCAT_DIR [3], DATATYPE [1], DATATYPE [2], DATATYPE [3], DELETE_FILE [1]
DELETE_FILE [2], FILEPATH, FMT_VECT, GET_DETAIL, GET_STUDY, GET_UTC, LIST_DETAIL
LIST_PLAN, STR2UTC [1], STR2UTC [2], STR2UTC [3], STRPAD, TAI2UTC, TRIM, UTC2STR
concat_dir [4]
Common : None
Restrictions: None
Side effects: None
Category : Planning, databases
Prev. Hist. : Based on original dump_detail.
Written : C D Pike, RAL, 26-Apr-95
Modified : Rework output file name use. CDP, 2-Jun-95
Add time tag info for details time line. CDP, 8-Jun-95
Added message when output KEEPed. CDP, 27-Jul-95
Added NOW keyword. CDP, 15-Nov-95
Added FROM keyword. CDP, 26-Feb-96
Added numberof rasters in /det,/summ mode. CDP, 1-Apr-96
Use tai in cal to get_detail instead of string. CDP, 3-May-96
Version : Version 8, 3-May-96
[Previous]
[Next]
Project : SOHO - CDS
Name :
SHOW_QUEUE
Purpose :
Show the contents of a print queue.
Explanation :
Spawns the proper command to the operating system to display the
contents of print queues.
Use :
SHOW_QUEUE [, QUEUE ]
Inputs :
None required.
Opt. Inputs :
QUEUE = Name of queue to be listed. If not passed, then the
environment variable PSLASER (or PSCOLOR) is checked for the
name of the print queue.
Outputs :
The information about the print queue is printed to the terminal
screen.
Opt. Outputs:
None.
Keywords :
COLOR = If set, then the environment variable PSCOLOR is checked for
the name of the print queue rather then PSLASER. Ignored if
QUEUE is passed.
Calls : ***
TRIM
Common :
None.
Restrictions:
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:
None.
Category :
Utilities, Devices.
Prev. Hist. :
William Thompson, July 1992.
Written :
William Thompson, GSFC, July 1992.
Modified :
Version 1, William Thompson, GSFC, 27 April 1993.
Incorporated into CDS library.
Version :
Version 1, 27 April 1993.
[Previous]
[Next]
Project : SOHO - CDS
Name : SHOW_RASTER
Purpose : Show details of a raster definition.
Explanation : Sets down on paper the details contained within the
raster structure. Output is stored in files 'raster_list'
for summary data or 'raster_{raster id}_{variation id}' for
details of specific rasters. All file are written to the
users home directory (unless the directory is specified by
the FILE keyword on entry).
Use : IDL> show_raster, ras_id, var_id
or
IDL> show_raster, ras_struct
Inputs : ras_id - fundamental raster ID number
var_id - raster variation number
or
ras_struct - structure returned by get_raster
Opt. Inputs : None
Outputs : None
Opt. Outputs: None
Keywords : QUIET - no output to screen
HARDCOPY - send details to printer
KEEP - keep disk file of details
DETECTOR - select from rasters of a given detector (only in
conjunction with SUMMARY keyword.
SUMMARY - give a summary of all rasters.
FILE - specify particular file name for output or
receive file name used if this is '' on entry.
If this keyword is omitted or is blank on entry
then output is written to a standard file in the
user's 'home' directory.
ERRMSG - if defined on entry, return error messages
in this variable
Calls : ***
Bell, CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], DATATYPE [1], DATATYPE [2]
DATATYPE [3], DELETE_FILE [1], DELETE_FILE [2], FILEPATH, FIND_ALL_DIR [1]
FIND_ALL_DIR [2], FIND_ALL_DIR [3], FMT_VECT, GET_RASTER, LIST_F_RASTER
LIST_V_RASTER, concat_dir [4]
CALLED BY:
SHOW_CDHS
Common : None
Restrictions: None
Side effects: None
Category : Planning, databases
Prev. Hist. : Derived from tp_dump_setup used in mk_raster
Written : C D Pike, RAL, 24-May-95
Modified : Added spectrograph ID to summary listing. CDP, 17-Jul-95
Added message when file KEEPed. CDP, 27-Jul-95
Update for compression scheme IDs. CDP, 27-Nov-95
Use FIND_ALL_DIR. CDP, 09-Aug-96
Take note of new LOW++ telemetry mode. CDP, 12-Dec-97
Version : Version 6, 12-Dec-97
[Previous]
[Next]
PROJECT:
SOHO - CDS/SUMER
NAME:
SHOW_RES_STC
PURPOSE:
Show resource structure selected from the display
CATEGORY:
Science planning, utility
EXPLANATION:
SYNTAX:
show_res_stc, group, ctime, ypos, row_title
CALLED BY:
MK_CDS_PLAN, MK_SOHO
EXAMPLES:
(when handling draw events)
bb = grep(row_id, ['Telemetry', 'Command'], /exact)
IF bb(0) NE '' THEN BEGIN
rtime = DOUBLE(ROUND(day+x*3600.d))
show_res_stc, event.top, rtime, y, bb(0)
ENDIF
INPUTS:
GROUP - ID of the widget who serves as a group leader
CTIME - Cursor time in TAI
YPOS - Coordinate in Y direction, in device pixels
ROW_TITLE - Title of the resource row (either 'Telemetry' or 'Command')
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
WBASE - Parent widget base into which place structure
WTAGS - Text widget ID's for each tag
JUST_REG - If set, just register the widget
CALLS: ***
ADD_TAG [1], ADD_TAG [2], GET_SOHO_SUBMODE, MK_PLAN_CONV, REP_TAG_VALUE, RES_SHOW
SEC2DHMS, TAG_EXIST [1], TAG_EXIST [2], XSTRUCT
COMMON:
@mk_plan_shared, FOR_RES_SHOW
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, November 10, 1995, Liyun Wang, GSFC/ARC. Written
Version 2, January 4, 1996, Liyun Wang, GSFC/ARC
Added DURATION tag in displayed resource structure
Version 3, January 16, 1996, Liyun Wang, GSFC/ARC
Added keywords WBASE, WTAGS, and JUST_REG
Made wiget title to reflect the resource name
Version 4, March 26, 1996, Liyun Wang, GSFC/ARC
Modified such that duration of resource items is displayed
in DHMS format
Version 5, 15 Oct 2001, Ronald Yurow GSFC/EITI
Modified code so that mouse clicks on DSN_27 resources would
be detected and displayed.
CONTACT:
Liyun Wang, GSFC/ARC (Liyun.Wang.1@gsfc.nasa.gov)
[Previous]
[Next]
Project : SOHO - CDS
Name : SHOW_SCATTER
Purpose : Demonstrates difference between wide slit and rastered images.
Explanation :
Use : IDL> show_scatter
Inputs : None
Opt. Inputs : None
Outputs : None
Opt. Outputs: None
Keywords : None
Calls : ***
CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], EXPTV, SETIMAGE, SIGRANGE [1]
SIGRANGE [2], concat_dir [4]
Common : None
Restrictions: None
Side effects: None
Category : Engineering
Prev. Hist. : None
Written : C D Pike, RAL, 15-May-96
Modified :
Version : Version 1, 15-May-96
[Previous]
[Next]
Project : SOHO - CDS
Name : SHOW_SLIT6
Purpose : Shows spectral overlap regions in CDS wide slit data.
Explanation : Plots on the average spectrum the possible spectral confusion
in wide slit mode. Use cursor to indicate lines.
Use : IDL> show_slit6, [/n2]
Inputs : None
Opt. Inputs : None
Outputs : None
Opt. Outputs: None
Keywords : N2 - displays NIS2 spectrum - default is NIS1
Calls : ***
CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], GET_AVGSPEC, LOAD_WAVECAL
PIX2WAVE, PRINT_STR, TRIM, WAVE2PIX, concat_dir [4]
Common : None
Restrictions: None
Side effects: None
Category : Planning
Prev. Hist. : None
Written : C D Pike, RAL, 30-Oct-97
Modified : Force use of old wavecal. CDP, 19-Aug-99
Version : Version 2, 19-Aug-99
[Previous]
[Next]
Project : SOHO - CDS
Name : SHOW_STUDY
Purpose : Produce a listing of a CDS study definition.
Explanation : For those who like to read paper, this routine displays
the salient points in the definition of a CDS study.
Use : IDL> show_study, str
or
IDL> show_study, study_id, study_var_id
Inputs : str - a valid CDS study definition structure
as returned by get_study.
OR
study_id - the study ID in the current (ie pointed to
by env. var. ZDBASE) database
study_var_id - the study variation ID
Opt. Inputs : None
Outputs : If required, sends to file and prints and outputs to screen.
Opt. Outputs: None
Keywords : KEEP - keep output file. Default ile name is
study_ss_vv.dmp where ss and vv are the ID numbers
for study-specific output or study_list for
summary information (both in $HOME directory).
QUIET - no information to screen
ERRMSG - if defined on entry will be returned with any
error messages.
FILE - specify file to be written or if blank on entry
file name written is returned. If omitted or
blank on entry then data are written to a file
in users 'home' directory.
SUMMARY - give summary of all entries in study database.
HARDCOPY - send output to printer.
Calls : ***
Bell, CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], DATATYPE [1], DATATYPE [2]
DATATYPE [3], DELETE_FILE [1], DELETE_FILE [2], FILEPATH, FIND_ALL_DIR [1]
FIND_ALL_DIR [2], FIND_ALL_DIR [3], FIND_STUDY, GET_RASTER, GET_STUDY
LIST_F_STUDY, STRPAD, TRIM, UTC2STR, concat_dir [4]
CALLED BY:
MK_STUDY, SHOW_CDHS
Common : None
Restrictions: None
Side effects: None
Category : Planning, databases
Prev. Hist. : Based on original show_study and dump_study
Written : C D Pike, RAL, 23-May-95
Modified : Fix bug not returning file name. CDP, 2-Jun-95
Include raster duration. CDP, 9-Jun-95
Added messgae when output KEEPed. CDP, 27-Jul-95
Fixed calculation of study duration to take account
of n_repeat_r=1 meaning just do it once. CDP, 13-Oct-95
Refix it. CDP, 10-Nov-95
Trap failure to find raster ID CDP, 22-Nov-95
Trap cranky zone_ids. CDP, 18-Jan-96
Trap no rasters. CDP, 25-Jan-96
Add detector to raster output. CDP, 26-Feb-96
Use FIND_ALL_DIR. CDP, 08-Aug-96
Sort on study ID in summary mode. CDP, 23-Sep-97
Version : Version 12, 23-Sep-97
[Previous]
[Next]
Project : SOHO - CDS
Name : SHOW_SYNOPTIC
Purpose : Displays data from a single CDS synoptic scan.
Explanation : On a regular basis (daily as operations allow), CDS performs
a series of 4'x4' rasters along the solar meridian. These
rasters are put together in a single image and stored in
an IDL save file for easy retrieval. This routine provides
a simple display of the data taken from one such series of
rasters. Note that the rasters overlap slightly in Solar Y
and no account is taken of solar rotation when the rasters
are performed.
Use : IDL> show_synoptic, file_number
Inputs : file_number - the date 'number' in format yyyymmdd
Opt. Inputs : None
Outputs : None
Opt. Outputs: status - success at finding file.
Keywords : PUBLIC = If set, then only the three strongest lines are
shown.
CLEAN = If set, then CDS_CLEAN_IMAGE is called.
DEBUG = print files to be used to screen
Calls : ***
ANYTIM2CAL, AVERAGE, BSORT [1], BSORT [2], BSORT [3], BSORT [4], CDS_CLEAN_IMAGE
CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], FXPAR [1], FXPAR [2], LAST_ITEM
N_DIMENSIONS, PLOT_IMAGE, PRINT_STR, READFITS [1], READFITS [2], READFITS [3]
SETVIEW [1], SETVIEW [2], SIGRANGE [1], SIGRANGE [2], STR_PICK, TRIM, concat_dir [4]
Common : None
Restrictions: Needs CDS_SUMMARY_DATA to be defined to point to where the
FITS files are.
Side effects: None
Category : Data analysis
Prev. Hist. : None
Written : C D Pike, RAL, 7-May-96
Modified : Use FITS files instead of IDL save files. 08-May-96
Version 3, 18-Jun-1996, William Thompson
Use FXPAR instead of STR_PICK to read observation date
from FITS header.
Version 4, 22-Jul-1996, William Thompson, GSFC
Modified to use SETVIEW for multiple plots.
Added keyword /CLEAN
Version 5, 13-Jun-1997, CDP, added status return variable.
Version 6, 7-Jul-1997, CDP, Trap incomplete set of FITS files.
Version 7, 17-Oct-1997, JP, Modified to handle either 4 or 8 lines
Version 8, 23-Dec-1997, William Thompson, GSFC
Also handle only 1 line, for SYNOP_LP case
Version 9, 29-Jun-1998, William Thompson, GSFC
Handle version 4 of SYNOP_F
Version 10, handle slit 5 raster with 4" steps. CDP, 25-Aug-99
Version 11, Fix multiple copies of .fts files. CDP, 25-Mar-03
version 12, Added DEBUG keyword to avoid problems in cron job
Version : Version 12, 15-Apr-2003
[Previous]
[Next]
Project : SOHO - SUMER
Name : SHRINK_SUMER_FITS
Purpose : Convert long to short integers to reduce file size
Category :
Explanation : This routine reads in a SUMER FITS file, and writes out a new
version with the data windows converted from long to short
integers. This decreases the size of the FITS files by
approximately a factor of two.
Detector data columns are distinguished from auxilliary data
columns by the inclusion of an associated TWAVE keyword in the
header.
This routine will not attempt to shrink files which are already
using short integers for the data, or files containing floating
point data. If the data is in long integer format, but the
numbers are large enough that they cannot be expressed as short
integers, then the file is not processed.
This routine makes two passes through the file. In the first
pass, all the binary table extensions are read in, and a
decision is made as to whether to proceed or not. The second
pass converts the data, and writes out the new file to a
temporary filename. At the end, the new file is substituted
for the old.
Syntax : SHRINK_SUMER_FITS, FILENAME
Examples : cd,'/soho-arch01/private/data/processed/sumer/fits96/march'
files = find_file('sum*.fits*')
for i=0,n_elements(files)-1 do shrink_sumer_fits, files(i)
Inputs : FILENAME = Name of the file to process.
Opt. Inputs : None.
Outputs : None.
Opt. Outputs: None.
Keywords : None.
Calls : ***
FXADDPAR [1], FXADDPAR [2], FXBCLOSE [1], FXBCLOSE [2], FXBCREATE [1]
FXBCREATE [2], FXBFIND [1], FXBFIND [2], FXBFINISH [1], FXBFINISH [2], FXBOPEN [1]
FXBOPEN [2], FXBOPEN [3], FXBREAD [1], FXBREAD [2], FXBREAD [3], FXBTFORM [1]
FXBTFORM [2], FXBWRITE [1], FXBWRITE [2], FXHREAD [1], FXHREAD [2], FXPAR [1]
FXPAR [2], FXWRITE [1], FXWRITE [2], OS_FAMILY, TRIM
Common : None.
Restrictions: None.
Side effects: None.
Prev. Hist. : None.
History : Version 1, 31-Jul-1996, William Thompson, GSFC
Version 2, 02-Aug-1996, William Thompson, GSFC
Added version specification for deleting in VMS
Contact : WTHOMPSON
[Previous]
[Next]
NAME:
sigma_mask
PURPOSE:
Computes the mean and standard deviation of pixels in a box
centered at
each pixel of the image, but excluding the center pixel. If the center
pixel value exceeds some # of standard deviations from the mean, it is
flagged. Note option to process pixels on
the edges.
CALLING SEQUENCE:
Result = sigma_mask( image, box_width, N_sigma=(#), /ALL,/MON )
INPUTS:
image = 2-D image (matrix)
box_width = width of square filter box, in # pixels (default = 3)
KEYWORDS:
N_sigma - # standard deviations to define outliers, floating point,
recommend > 2, default = 3. For gaussian statistics:
N_sigma = 1 flags 35% of pixels, 2 = 5%, 3 = 1%.
RADIUS - alternative to specify box radius, so box_width = 2*radius+1.
/ALL_PIXELS causes computation to include edges of image,
/MONITOR prints information about % pixels replaced.
Optional Outputs:
N_CHANGE - # of pixels flagged (mask = 0)
VARIANCE - image of pixel neighborhood variances * (N_sigma)^2,
DEVIATION - image of pixel deviations from neighborhood means,
squared.
OUTBOX - Size of box to return flagged around any marked pixel
(default 1)
CALLS: ***
FILTER_IMAGE
CALLED BY:
las_exp_norm, mk_stdim, mk_stdim_list
PROCEDURE:
Compute mean over moving box-cars using smooth, subtract center values,
compute variance using smooth on deviations from mean,
check where pixel deviation from mean is within variance of
box.
Return a mask array with ones where the deviation is less than
the specified amount and zeros for the points outside the range.
MODIFICATION HISTORY:
Derived from Frank Varosi's SIGMA_FILTER routine. Mar 1996, SJT.
[Previous]
[Next]
Project : SOHO - CDS
Name : simpson_a()
Purpose : Simpson integration
Explanation : Simpson integration when the function to be
integrated is given in array y calculated for
eqidistant intervals in x. Integration proceeds
from beginning to end of the given array if the
number of array points is odd.
Use : IDL> value = simpson_a(array, dispersion)
Inputs : array, dispersion,
Opt. Inputs : None
Outputs : Integrated value
Opt. Outputs: None
Keywords : None
Calls : None
CALLED BY:
three_moment
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
[Previous]
[Next]
Project : SOHO - CDS
Name :
SINCE_VERSION
Purpose :
Determine if current release is later than specified.
Explanation :
Determine if the current release of IDL (as given in the
!VERSION.RELEASE system variable) comes after the user specified
release.
Use :
test = SINCE_VERSION( release )
Use the /FTOXDR keyword to the BYTEORDER procedure if the current
release of IDL is 2.2.2 or later
IDL> if since_version('2.2.2') then byteorder, a, /FTOXDR
Inputs :
release - scalar string, must be formatted exactly like the
!VERSION.RELEASE system variable (e.g. '3.0.0')
Opt. Inputs :
None.
Outputs :
test - 1 if current release is identical or later than the specified
'release' else 0
Opt. Outputs: None.
Keywords : None.
Calls : None.
CALLED BY:
ADD_TAG [1], ALLOW_WINDOWS, ASSIGN_NOCOPY, Array_Despike, BIGPICKFILE, Brm_GauLeg
CHMOD, CLEANPLOT [1], CLEANPLOT [2], CLEANPLOT [3], CLEAN_PATH, CLOSE_LUN
COMBINE_STRUCT, COMPILE_SFIT, CONCAT_STRUCT, CREATE_PARAM [1], CREATE_PARAM [2]
CWF_COMPONENT, CWF_FIT, CWF_STATUS, CWQ_CUBE, CWQ_DSPWAV [1], CWQ_IMAGE [1]
CWQ_SPECTR [1], CWQ_WINSEL [1], CW_CUBEVEIW, CW_ENTERB, CW_FLIPSWITCH, CW_MOUSE
CW_PSELECT, DSP_INFO, DSP_WAV, EIS_GET_HDR [1], EIS_GET_HDR [2]
EIS_IMAGE_TOOL [1], EIS_IMAGE_TOOL [2], EIT__DEFINE, FILE_COPY2, FITS__DEFINE
FRAMEWORK ABSTRACT CLASS DEFINITION, GEN__DEFINE, HOST_TO_IEEE [1]
HOST_TO_IEEE [2], HOST_TO_IEEE [3], HOST_TO_IEEE [4], HSI_SIM11
HSI_SPECTRUM__DEFINE, IEEE_TO_HOST [1], IEEE_TO_HOST [2], IEEE_TO_HOST [3]
IEEE_TO_HOST [4], IMAGE_TOOL, IS_DIR, ITOOL_PICKFILE, JOIN_STRUCT [1]
LIGHTCURVE CLASS DEFINITION, LOC_FILE_NEW, MERGE_STRUCT, MK_DIR, MK_PLAN_PLOT
MRD_HEAD, OBJ_STRUCT, PICKFILE, PLOT_MAP, PQLPROFILE, PQLZOOM, REM_TAG [1], REPLICATE2
RM_FILE, SAME_DATA [1], SOAP__DEFINE, SOCK_DOWNLOAD, SPECTRUM CLASS DEFINITION
SPEX_SAVE_DATA [1], SPEX_SAVE_DATA [2], SPEX_SUMMARY [1], SPEX_SUMMARY [2]
SPEX__DEFINE, TEST_OPEN, VALID_FITS, WHERE2, WIDGET_MBASE, WRITE_DIR, XCDS_ANALYSIS
XCDS_COSMIC, XCFIT, XCFIT_BLOCK, XCR_REMOVE, XDIFF, XINPUT, XPLOTSCALE, XRECORDER
XUPDATE, cw_edroplist, cwq_dspwav [2], cwq_image [2], cwq_spectr [2]
cwq_winsel [2], dsp_menu, get_gevloc_data, is_number [1], les_archive_info
mark_intervals, mreadfits_urls, nospike, obj_restore, obj_save, plotman
plotman_create_files_event, pmtras_analysis, save_idl_routines, spectro_plot2
spex_energy_ranges [1], spex_energy_ranges [2], spex_preview [1]
spex_preview [2], ssw_getdst, ssw_post_query, ssw_time2filelist, str_subset
strwhere, sxi_files, sxt2file, update_history, yopos [1], yopos [2]
Common : None.
Restrictions: None.
Side effects: None.
Category : Utilities, Miscellaneous
Prev. Hist. :
Written Wayne Landsman Hughes/STX January, 1992
Corrected algorithm W. Landsman April, 1992
Written : Wayne Landsman, Hughes/STX, January 1992
Modified : Version 1, William Thompson, GSFC, 14 December 1994
Incorporated into CDS library
Version : Version 1, 14 December 1994
[Previous]
[Next]
Project : SOHO - CDS
Name : SKIPF
Purpose : Emulates the VMS SKIPF function on UNIX machines.
Explanation : Emulates the VMS SKIPF function on UNIX machines.
Use : SKIPF, UNIT, NSKIP
SKIPF, UNIT, NSKIP, RECORDS
Inputs : UNIT = Tape unit number. Tape drives are selected via the
UNIX environment variables "MT1", "MT2", etc. The
desired tape drive is thus specified by numbers, as
in VMS. Must be from 0 to 9.
NSKIP = Number of files or records to skip.
Opt. Inputs : RECORDS = If present, then records are skipped instead of
files.
Outputs : None. However, !ERR is set to ABS(NSKIP)
Opt. Outputs: None.
Keywords : None.
Calls : ***
CHECK_TAPE_DRV [1], CHECK_TAPE_DRV [2]
CALLED BY:
FITSTAPE, FXTAPEREAD, FXTPIO_WRITE, RD_EXB, TCOPY, mt
Common : None.
Restrictions: This routine may not act exactly the same as the VMS
equivalent, particularly in regards to the behavior of 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. !ERR is set to ABS(NSKIP).
Category : Utilities, I/O, Tape.
Prev. Hist. : VERSION 1, R. W. Thompson 12/4/89
William Thompson, Apr 1991, rewrote to better emulate VMS
version.
Written : R. W. Thompson, GSFC/IUE, 4 December 1989.
Modified : Version 1, William Thompson, GSFC, 21 December 1993.
Rewrote to use IOCTL.
Version : Version 1, 21 December 1993.
[Previous]
[Next]
NAME:
SLIDE_IMAGEf
PURPOSE:
Create a scrolling graphics window for examining large images.
By default, 2 draw widgets are used. The left draw widget shows
a reduced version of the complete image, while the draw widget on
the right displays the actual image with scrollbars that allow sliding
the visible window.
CALLING SEQUENCE:
SLIDE_IMAGE [, Image]
INPUTS:
Image: The 2-dimensional image array to be displayed. If this
argument is not specified, no image is displayed. The
FULL_WINDOW and SCROLL_WINDOW keywords can be used to obtain
the window numbers of the 2 draw widgets so they can be drawn
into at a later time.
KEYWORDS:
CONGRID: Normally, the image is processed with the CONGRID
procedure before it is written to the fully visible
window on the left. Specifying CONGIRD=0 will force
the image to be drawn as is.
FULL_WINDOW: A named variable in which to store the IDL window number of \
the non-sliding window. This window number can be used with
the WSET procedure to draw to the scrolling window at a later
point.
GROUP: The widget ID of the widget that calls SLIDE_IMAGE. If this
keyword is specified, the death of the caller results in the
death of SLIDE_IMAGE.
ORDER: This keyword is passed directly to the TV procedure
to control the order in which the images are drawn. Usually,
images are drawn from the bottom up. Set this keyword to a
non-zero value to draw images from the top down.
REGISTER: Set this keyword to create a "Done" button for SLIDE_IMAGE
and register the widgets with the XMANAGER procedure.
The basic widgets used in this procedure do not generate
widget events, so it is not necessary to process events
in an event loop. The default is therefore to simply create
the widgets and return. Hence, when register is not set,
SLIDE_IMAGE can be displayed and the user can still type
commands at the "IDL>" prompt that use the widgets.
RETAIN: This keyword is passed directly to the WIDGET_DRAW
function, and controls the type of backing store
used for the draw windows. If not present, a value of
2 is used to make IDL handle backing store.
SLIDE_WINDOW: A named variable in which to store the IDL window number of
the sliding window. This window number can be used with the
WSET procedure to draw to the scrolling window at a later
time.
TITLE: The title to be used for the SLIDE_IMAGE widget. If this
keyword is not specified, "Slide Image" is used.
TOP_ID: A named variable in which to store the top widget ID of the
SLIDE_IMAGE hierarchy. This ID can be used to kill the
hierarchy as shown below:
SLIDE_IMAGE, TOP_ID=base, ...
.
.
.
WIDGET_CONTROL, /DESTROY, base
XSIZE: The maximum width of the image that can be displayed by
the scrolling window. This keyword should not be confused
with the visible size of the image, controlled by the XVISIBLE
keyword. If XSIZE is not specified, the width of Image is
used. If Image is not specified, 256 is used.
XVISIBLE: The width of the viewport on the scrolling window. If this
keyword is not specified, 256 is used.
YSIZE: The maximum height of the image that can be displayed by
the scrolling window. This keyword should not be confused
with the visible size of the image, controlled by the YVISIBLE
keyword. If YSIZE is not present the height of Image is used.
If Image is not specified, 256 is used.
YVISIBLE: The height of the viewport on the scrolling window. If
this keyword is not present, 256 is used.
OUTPUTS:
None.
CALLS: ***
CONGRID [1], CONGRID [2], CONGRID [3], SLIDE_IMG_EVENT, XMANAGER
CALLED BY:
COMBINE_IMG
COMMON BLOCKS:
None.
SIDE EFFECTS:
Widgets for displaying a very large image are created.
The user typically uses the window manager to destroy
the window, although the TOP_ID keyword can also be used to
obtain the widget ID to use in destroying it via WIDGET_CONTROL.
RESTRICTIONS:
Scrolling windows don't work correctly if backing store is not
provided. They work best with window-system-provided backing store
(RETAIN=1), but are also usable with IDL provided backing store
(RETAIN=2).
Various machines place different restrictions on the size of the
actual image that can be handled.
MODIFICATION HISTORY:
7 August, 1991, Written by AB, RSI.
10 March, 1993, ACY, Change default RETAIN=2
23 Sept., 1994 KDB, Fixed Typo in comments. Fixed error in
Congrid call. xvisible was used instead of yvisible.
14 June, 1999 NBR, Make full-image window always 256x256;
change name to SLIDE_IMAGEf
[Previous]
[Next]
Project : SOHO - CDS
Name : SLIT45_IMAGE_DEMO
Purpose : Demonstrates slit 4 and 5 NIS image data.
Explanation : Rastered images taken with slit 4 and 5 are displayed.
Use : IDL> slit45_image_demo
Inputs : None
Opt. Inputs : None
Outputs : None
Opt. Outputs: None
Keywords : None
Calls : ***
CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], PLOT_IMAGE, SETFLAG, SIGRANGE [1]
SIGRANGE [2], concat_dir [4]
Common : None
Restrictions: None
Side effects: None
Category : Calibration
Prev. Hist. : None
Written : C D Pike, RAL, 11-Dec-96
Modified :
Version : Version 1, 11-Dec-96
[Previous]
[Next]
Project : SOHO - CDS
Name : SLIT4V5_DEMO
Purpose : Demonstrates slit 4 and 5 NIS data.
Explanation : The use of slit 5 (4" wide) is shown to degrade the spectral
resolution achieved only slightly compared to use of slit 4
(2" wide). The count rate of course is higher by approx a
factor 2.
Use : IDL> slit4v5_demo
Inputs : None
Opt. Inputs : None
Outputs : None
Opt. Outputs: None
Keywords : None
Calls : ***
CIRCLE_SYM, CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], concat_dir [4]
Common : None
Restrictions: None
Side effects: None
Category : Calibration
Prev. Hist. : None
Written : C D Pike, RAL, 12-Nov-96
Modified :
Version : Version 1, 12-Nov-96
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
SLITNUM()
PURPOSE:
Return slit number
CATEGORY:
EXPLANATION:
SYNTAX:
Result = slitnum()
CALLED BY:
FF_GC, FF_ODDEVEN, MAKE_FF
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)
[Previous]
[Next]
NAME:
slog_get_day
PURPOSE
return the day from a SOHO log structure
CALLING SEQUENCE:
result = slog_get_day(log_str)
INPUTS:
log_str - SOHO log structure
OUTPUTS:
result - day number
CALLED BY:
XSEL_PD_EVENT
MODIFICATION HISTORY:
(29 APR 96) JTM: original version
[Previous]
[Next]
NAME:
slog_get_day
PURPOSE
return the day from a SOHO log structure
CALLING SEQUENCE:
result = slog_get_day(log_str)
INPUTS:
log_str - SOHO log structure
OUTPUTS:
result - day number
CALLED BY:
XSEL_PD_EVENT
MODIFICATION HISTORY:
(29 APR 96) JTM: original version
[Previous]
[Next]
NAME:
slog_get_file
PURPOSE
return the file name from a SOHO log structure
CALLING SEQUENCE:
result = slog_get_file(log_str)
INPUTS:
log_str - SOHO log structure
OUTPUTS:
result - file name without the version number
MODIFICATION HISTORY:
(29 APR 96) JTM: original version
(10 Oct 96) JTM: modified for new log structure
[Previous]
[Next]
NAME:
slog_get_file
PURPOSE
return the file name from a SOHO log structure
CALLING SEQUENCE:
result = slog_get_file(log_str)
INPUTS:
log_str - SOHO log structure
OUTPUTS:
result - file name without the version number
MODIFICATION HISTORY:
(29 APR 96) JTM: original version
(10 Oct 96) JTM: modified for new log structure
[Previous]
[Next]
NAME: slog_get_sci
PURPOSE: return an array of indices of structure elements that
contain a give string in their sci_obj entry
CALLING SEQUENCE: ss = slog_get_sci(log_str, string)
[Previous]
[Next]
NAME: slog_get_sci
PURPOSE: return an array of indices of structure elements that
contain a give string in their sci_obj entry
CALLING SEQUENCE: ss = slog_get_sci(log_str, string)
[Previous]
[Next]
NAME: slog_get_scientist
PURPOSE: return an array of indices of structure elements that
contain a give string in their scientis entry
CALLING SEQUENCE: ss = slog_get_scientist(log_str, string)
[Previous]
[Next]
NAME: slog_get_scientist
PURPOSE: return an array of indices of structure elements that
contain a give string in their scientis entry
CALLING SEQUENCE: ss = slog_get_scientist(log_str, string)
[Previous]
[Next]
NAME: slog_get_sn
PURPOSE: return an array of indices of structure elements that
contain a give string in their scientis entry
CALLING SEQUENCE: ss = slog_get_sn(log_str, string)
[Previous]
[Next]
NAME: slog_get_sn
PURPOSE: return an array of indices of structure elements that
contain a give string in their scientis entry
CALLING SEQUENCE: ss = slog_get_sn(log_str, string)
[Previous]
[Next]
NAME:
slog_get_time
PURPOSE:
return the time from a SUMER log structure
CALLING SEQUENCE:
result = slog_get_time(log_str)
INPUTS:
log_str - SUMER log structure
OUTPUTS:
result - time array (hh mm ss)
CALLED BY:
XSEL_PD_EVENT
MODIFICATION HISTORY:
(29 APR 96) JTM: initial version
[Previous]
[Next]
NAME:
slog_get_time
PURPOSE:
return the time from a SUMER log structure
CALLING SEQUENCE:
result = slog_get_time(log_str)
INPUTS:
log_str - SUMER log structure
OUTPUTS:
result - time array (hh mm ss)
CALLED BY:
XSEL_PD_EVENT
MODIFICATION HISTORY:
(29 APR 96) JTM: initial version
[Previous]
[Next]
NAME:
slog_headinfo
PURPOSE:
Gather information for log from fits main header
CATEGORY:
CALLING SEQUENCE:
slog_headinfo, infil, log_str
INPUTS:
infil - input file name
log_str - the log structure to fill
OPTIONAL INPUT PARAMETERS:
none
KEYWORD PARAMETERS:
none
OUTPUTS:
log_str - the log structure filled
OPTIONAL OUTPUT PARAMETERS:
none
CALLS: ***
FITS_INFO [1], FITS_INFO [2], FXPAR [1], FXPAR [2], HEADFITS [1], HEADFITS [2]
HEADFITS [3]
CALLED BY:
slog_sumlog
COMMON BLOCKS:
none
SIDE EFFECTS:
none
RESTRICTIONS:
none
PROCEDURE:
MODIFICATION HISTORY:
(26 Apr 96) JTM: initial version
(27 May 96) JTM: modified file name determination--now VMS specific!
(25 Jul 96) JTM: added more info and read file name from fits file
[Previous]
[Next]
NAME:
slog_logstr
PURPOSE:
define the sumer log structure
CATEGORY:
CALLING SEQUENCE:
slog_logstr, d
INPUTS:
none
OPTIONAL INPUT PARAMETERS:
none
KEYWORD PARAMETERS:
none
OUTPUTS:
d - the structure definition
OPTIONAL OUTPUT PARAMETERS:
CALLED BY:
slog_rdlog [1], slog_rdlog [2], slog_sumlog
COMMON BLOCKS:
SIDE EFFECTS:
RESTRICTIONS:
PROCEDURE:
MODIFICATION HISTORY:
(26 Apr 96) JTM: initial version
(25 Jul 96) JTM: added filename and a few other things
[Previous]
[Next]
NAME:
slog_logstr
PURPOSE:
define the sumer log structure
CATEGORY:
CALLING SEQUENCE:
slog_logstr, d
INPUTS:
none
OPTIONAL INPUT PARAMETERS:
none
KEYWORD PARAMETERS:
none
OUTPUTS:
d - the structure definition
OPTIONAL OUTPUT PARAMETERS:
CALLED BY:
slog_rdlog [1], slog_rdlog [2], slog_sumlog
COMMON BLOCKS:
SIDE EFFECTS:
RESTRICTIONS:
PROCEDURE:
MODIFICATION HISTORY:
(26 Apr 96) JTM: initial version
(25 Jul 96) JTM: added filename and a few other things
[Previous]
[Next]
NAME:
slog_rdlog
PURPOSE:
Read log files produced by jtm_sumlog.pro
CATEGORY:
CALLING SEQUENCE:
slog_sumlog, logfile, lstr
INPUTS:
logfile - name of log file produced by jtm_sumlog
OPTIONAL INPUT PARAMETERS:
none
KEYWORD PARAMETERS:
OUTPUTS:
lstr - structure containing information in log file
OPTIONAL OUTPUT PARAMETERS:
none
CALLS: ***
slog_logstr [1], slog_logstr [2]
CALLED BY:
SUMER_SEARCH_PD_EVENT, XSEL_PD_EVENT
COMMON BLOCKS:
none
SIDE EFFECTS:
RESTRICTIONS:
Max size of structure is currently set to 6000 elements
PROCEDURE:
MODIFICATION HISTORY:
(12 Apr 96) JTM: first attempt
(28 Apr 96) JTM: using structured log
(10 Oct 96) JTM: new structure def
[Previous]
[Next]
NAME:
slog_rdlog
PURPOSE:
Read log files produced by jtm_sumlog.pro
CATEGORY:
CALLING SEQUENCE:
slog_sumlog, logfile, lstr
INPUTS:
logfile - name of log file produced by jtm_sumlog
OPTIONAL INPUT PARAMETERS:
none
KEYWORD PARAMETERS:
OUTPUTS:
lstr - structure containing information in log file
OPTIONAL OUTPUT PARAMETERS:
none
CALLS: ***
slog_logstr [1], slog_logstr [2]
CALLED BY:
SUMER_SEARCH_PD_EVENT, XSEL_PD_EVENT
COMMON BLOCKS:
none
SIDE EFFECTS:
RESTRICTIONS:
Max size of structure is currently set to 6000 elements
PROCEDURE:
MODIFICATION HISTORY:
(12 Apr 96) JTM: first attempt
(28 Apr 96) JTM: using structured log
(10 Oct 96) JTM: new structure def
[Previous]
[Next]
NAME:
slog_splot
PURPOSE:
Plot slit locations on a disk
CATEGORY:
CALLING SEQUENCE:
slog_splot, log_str, /circle
slog_splot, x, y, slit, /circle
slog_splot, /circle
INPUTS:
log_str - a SUMER log structure
OPTIONAL INPUT PARAMETERS:
circle - use /circle on first entry and then don't use to overplot
KEYWORD PARAMETERS:
OUTPUTS:
none
OPTIONAL OUTPUT PARAMETERS:
COMMON BLOCKS:
SIDE EFFECTS:
RESTRICTIONS:
PROCEDURE:
MODIFICATION HISTORY:
(12 Apr 96) JTM: First simple version
(28 Apr 96) JTM: Process any structure containing x, y, slit
[Previous]
[Next]
NAME:
slog_splot
PURPOSE:
Plot slit locations on a disk
CATEGORY:
CALLING SEQUENCE:
slog_splot, log_str, /circle
slog_splot, x, y, slit, /circle
slog_splot, /circle
INPUTS:
log_str - a SUMER log structure
OPTIONAL INPUT PARAMETERS:
circle - use /circle on first entry and then don't use to overplot
KEYWORD PARAMETERS:
OUTPUTS:
none
OPTIONAL OUTPUT PARAMETERS:
COMMON BLOCKS:
SIDE EFFECTS:
RESTRICTIONS:
PROCEDURE:
MODIFICATION HISTORY:
(12 Apr 96) JTM: First simple version
(28 Apr 96) JTM: Process any structure containing x, y, slit
[Previous]
[Next]
NAME:
slog_sumlog
PURPOSE:
Build a simple log of SUMER file contents
CATEGORY:
CALLING SEQUENCE:
slog_sumlog, infil, outfil, outstr=outstr
INPUTS:
infil - an array of file names to include in the log
OPTIONAL INPUT PARAMETERS:
none
KEYWORD PARAMETERS:
none
OUTPUTS:
outfil - output log file to write
OPTIONAL OUTPUT PARAMETERS:
outstr - the structure that was used to write the log file
CALLS: ***
slog_headinfo, slog_logstr [1], slog_logstr [2]
COMMON BLOCKS:
none
SIDE EFFECTS:
A file is created in the current directory
RESTRICTIONS:
none
PROCEDURE:
MODIFICATION HISTORY:
(5 Apr 96) JTM: first cut
(26 Apr 96) JTM: more info, pass data around with structures
(10 Feb 98) CHAE: change jtm_ into slog_
[Previous]
[Next]
Project:
SOHO - SUMER
Name:
smk_atlas
Purpose:
To calculate construct full reference spectra from SUMER reference
spectra observations
Use:
smk_atlas,filenames,lambda,spec,header,SpecRange=SpecRange,$
more_info=more_info
Inputs
FileNames - Names of files containing the reference spectrum.
If there is more than one file, this should be an array of
type string.
Output
Lambda_Out - Wavelength values in Angstroms (2nd order)
Spec_Out - Spectral data summed over spectral bands specified by
SpecRange. Units are counts/s/pix
Atlas_index - Stucture containing header information and information about how the
components of the spectra were put together.
Some of the tags:
Trans - indexes in lambda_out of transitions between
different exposures.
Uncoated - array containg indexes of elements taken from
uncoated part of detector. If no such elements,
it will = -1
Attenuated - array containg indexes of elements taken from
attenuated part of detector. If no such elements,
it will = -1
Edge - array containg indexes of elements taken from
edge of detector. If no such elements, it will = -1
Input Keywords:
SpecRange - Array containing the spatial ranges over which the
spectra should be summed. Should have dimensions 2 x N,
where N is the number of spectral locations, and in
units of pixels. If this is not entered the program
SA_Gt_SpecRange will be called so that the user may
select the ranges graphically.
Splice_Adjust - If set the user will be prompted to manually
select the splice point between each overlapping pair
of exposures. If more than one spectral zone has been
selected, the splice selection plots will be made with
the zone given by Splice_Adjust.
DetRange - Range on the Detector to use in making spectra. Default corresponds
to the KBr coated portion with an extention to include Ly Alpha.
OverRides keywords BareL, BareR, KBrOnly, and AllDetector
KBrOnly - use only the KBr coated part of the detector to make spectra,
do not attempt to include Ly Alpha on attenuators
FullDetector - use entire detector to make spectra
Bare - Use the bare portion of the detector to make spectra
TriWarp - Correct for pixel scale image distortion
Output Keywords:
None
Calls: ***
ANYTIM2UTC [1], ANYTIM2UTC [2], CALL_DESTRETCH, UTC2TAI, rd_sumer [1]
rd_sumer [2], sa_gt_specrange, sgt_delta, sgt_detector, sgt_dims, sgt_refpix
sgt_refval, splice_sel
Common:
None
Written:
Terry Kucera, 27 Feb 1996
Modifications
Added Splice_Adjust TAK, 9 Apr 1996
Added keywords for warping and selcting which part of
detector to use TAK, 21 May 1996
Changed how bare spectra made TAK, 19 June 1996
Now uses rd_sumer rather than ft_sumread_fits
Previous outputs Header and More_Info now incorporated into the structure atlas_index
TAK, 14 Nov 1996
Changed upper limit in the number of spectra TAK, 15 Sept. 1999
[Previous]
[Next]
Project:
SOHO - SUMER
Name:
SMK_FULLDET
Purpose:
To construct a full detector format from partial detector formats.
Explanation :
This should be useful in cases in which data formats
overlap, and/or features extend between formats.
Use:
smk_fulldet,index,data,index_out,data_out,bte=[1,2]
Inputs:
index - The index structure returned from rd_sumer.
data - data returned from rd_sumer
Output:
index_out - index structure for data_out
data_out - data reformatted so that all the different wavelength
columns are in a single 1024 pixel wide format.
Input Keywords:
BTE - array listing the BTE's from which to extract data.
The default is to return all.
Calls: ***
MAKE_STR [1], MAKE_STR [2], MATCH [1], MATCH [2], MATCH [3], SGT_BTE, SGT_CRPIX
UNIQ [1], UNIQ [2], UNIQ [3], sgt_dims, sgt_refpix, sgt_refval
Common:
None
Written:
Terry Kucera, 6 Aug 1996
[Previous]
[Next]
Project : SOHO - CDS
Name : SNAP_MOVIE
Purpose : Makes a movie out of CDS snapshots.
Category : CDS, Quicklook, Animation, Class3
Explanation : Uses CDS_SNAPSHOT and WR_MOVIE to generate an animation from a
study. Each frame of the animation is made by running
CDS_SNAPSHOT against each raster in the study. Thus, the first
frame will be from s#r00.fits, the second from s#r01.fits, and
so on. This is appropriate when the study consists of a number
of repeated rasters with a single target. The techniques used
here can serve as an example of how to put an animation
together in more complicated cases.
Each frame is first generated on the screen by CDS_SNAPSHOT,
and then read back from the screen and written to the
animation. Whatever color table is loaded when the program is
called will be used for the animation. The graphics window
should remain in view until the animation is completed.
Syntax : SNAP_MOVIE, STUDY [, FILENAME ] [, /keywords ]
Examples : SNAP_MOVIE, 10345, /GIF, /MPEG, /JAVA, /DEL
Inputs : STUDY = The study number to generate the movie from.
Opt. Inputs : FILENAME = Base filename to use when creating MPEG and GIF
movies. If a GIF movie is created, then it will be
named filename.gif. If a MPEG movie is created,
then it will be called filename.mpg. The default is
to generate the filename from the letter "s" and the
study number, e.g. "s10345.gif".
Outputs : The output of the program is one or more animation formats,
depending on which keywords were passed.
Opt. Outputs: None.
Keywords : The following keywords are passed to CDS_SNAPSHOT.
REVERSE = If set, then plot is done in inverse video. In other
words, white areas on the screen will appear dark,
and visa versa. This saves toner on greyscale
printers.
NOCLEAN = If set, then CDS_CLEAN_IMAGE is not called.
WINDOWS = An array of windows to display. The windows can be
passed as either the NUMBERS of the data windows
(NOTE: numbering from 0...N-1) or as text with the
LABELS of the desired spectral windows. The windows
will be displayed in the order given by the WINDOWS
array, unless the WAVESORT keyword is passed.
WAVESORT = If set, then the windows are displayed in wavelength
order. (Note that second order lines will be
displayed according to their first order
equivalent.)
QUASI_FIT= If set, then the routine CDS_QUASI_FIT is called to
extract the images. See the documentation on that
routine for more information.
SPECTRA = If set, then spectra are shown instead of images.
For some data sets, spectra are shown by default.
WO_CR = If set, then spectra are calculated using AVG_WO_CR
instead of AVERAGE. Warning, very slow.
FRACTION = Fraction to pass to SIGRANGE function. The default
is 0.99.
CHARSIZE = Character size to use for the window labels.
CHARTHICK= Character thickness.
NOTITLE = If set, then the title information at the bottom of
the page is suppressed.
NOLABEL = If set, then the labels above each data window are
suppressed.
ROTATE = If passed, then is the value of the parameter passed
to the ROTATE function to change the image
orientation. For example, using ROTATE=1 would
rotate the image by +90 degrees, while ROTATE=3
would rotate it by -90 degrees.
MIN,MAX = Arrays of the minimum and maximum values to be
applied to each window. Must be in the same order
as the windows are displayed.
GLOBAL = If the GLOBAL keyword is set, then SNAP_MOVIE will
first make a pass through the data to determine the
MIN and MAX arrays to be passed to CDS_SNAPSHOT.
RASTER = Contains the raster ID to use in making the movie.
This is useful for making movies from studies which
use a series of different rasters. If RASTER is
passsed as a two-element array, then the second
element contains the raster variation.
The following keywords are used to determine what kind of movie
is produced. If neither are passed, then the default format is
a GIF movie. If both are passed, then both a GIF and an MPEG
movie is created.
MPEG: If set, then a MPEG movie is created.
GIF: If set, then a GIF movie is created.
Additional keywords passed to WR_MOVIE are:
PNG: When used with /JAVASCRIPT, the files written
out are in PNG format, rather than GIF. This
is the default for IDL versions 5.4 and above,
which no longer support writing GIF images.
JPEG: When used with /JAVASCRIPT, the files written
out are in JPEG format, rather than GIF or PNG.
ALT_MPEG: Uses an alternate set of parameters for
mpeg_encode, courtesy of Stein Vidar Haugan and
Bernhard Fleck, which may make a better movie,
at the expense of a slightly larger file.
INTERNAL_MPEG: If set, then the internal MPEG writer is used
instead of spawning mpeg_encode. This is the
default for IDL versions 5.4 and above, which
no longer support writing the intermediate GIF
images.
PICT: If set, then a series of PICT frames are
written out. This is suitable for converting
to a VHS tape. The filenames will be written
such that the extensions are the frame number,
e.g. "filename.00", "filename.01", etc.
JAVASCRIPT: If set, then an Java Script HTML file is
written out.
DELETE: If set, then the temporary directory
/mpegframes will be deleted before this
procedure exits.
FRAMEDELAY: The delay time between frames, in 1/100 of a
second. The default value of 10 gives a movie
rate of approximately 10 frames/second. The
bigger the number, the slower the movie will
run. Not applicable to MPEG movies.
LOOPCNT: The number of times to loop through the GIF
movie. The default value is 0, which
represents an infinite number of loops.
INCREMENT: Percent increment for speed control for Java
Script movies. [def= 10]
URL: Optional URL path to GIF images for Java Script
movies. The default is that the GIF frames
will be in the subdirectory FILENAME.
TITLE: Optional HTML title for Java Script movies.
Calls : ***
AVERAGE, CDS_CLEAN_IMAGE, CDS_QUASI_FIT, CDS_SNAPSHOT, COUNTDOWN, DATATYPE [1]
DATATYPE [2], DATATYPE [3], GOOD_PIXELS, GT_WINDATA, GT_WINDESC, LIST_EXPER, NTRIM
READCDSFITS, SIGRANGE [1], SIGRANGE [2], TRIM, TVREAD [1], TVREAD [2], TVREAD [3]
WR_MOVIE
Common :
Restrictions: The graphics window used by this routine should remain in view
until the animation is completed.
The process that is running IDL when this procedure
executes must have write priveleges to the working directory
or this procedure will fail.
If a MPEG movie is being created, then the following programs
must be in the current path:
mpeg_encode
giftoppm
If a GIF movie is being created, then the following program
must be in the current path:
whirlgif
Side effects: Files and subdirectory are created in the working directory.
Prev. Hist. : None.
History : Version 1, 03-Feb-1998, William Thompson, GSFC
Version 2, 10-Apr-1998, William Thompson, GSFC
Use TVREAD, to allow reading even obscured windows.
Version 3, 23-Oct-2000, William Thompson
Added keywords INTERNAL_MPEG, JPEG, and PNG.
Version 4, 26-Oct-2000, William Thompson
Added keyword ALT_MPEG
Version 5, 27-Mar-2002, William Thompson, GSFC
Added keywords MIN, MAX, GLOBAL
Contact : WTHOMPSON
[Previous]
[Next]
PROJECT:
SOHO
NAME:
SOHO_CAMPAIGN
PURPOSE:
Make KAP style of list of SOHO campaign entries
CATEGORY:
Planning
SYNTAX:
soho_campaign
INPUTS:
None required.
OPTIONAL INPUTS:
None.
OUTPUTS:
An ASCII file containing detailed contents of campaign
OPTIONAL OUTPUTS:
None.
KEYWORDS:
TSTART - Beginning of date/time values to use in searching the
database. If missing, DEC-1-1956 is assumed.
TEND - End of date/time values to use in searching the database.
If missing, Dec-31-2006 is assumed.
FILE - Name of the output file, default to 'soho_campaign.txt'
NOIDL - Set this keyword not to use the IDL database
CALLS: ***
ANYTIM2UTC [1], ANYTIM2UTC [2], CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3]
DATATYPE [1], DATATYPE [2], DATATYPE [3], LIST_CAMPAIGN, LOC_FILE [1]
LOC_FILE [2], LOC_FILE [3], RD_ASCII [1], RD_ASCII [2], STR2ARR [1], STR2ARR [2]
STRPAD, TRIM, concat_dir [4]
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, March 4, 1997, Liyun Wang, NASA/GSFC. Written
CONTACT:
Liyun Wang, NASA/GSFC (Liyun.Wang.1@gsfc.nasa.gov)
[Previous]
[Next]
PROJECT:
SOHO - CDS/SUMER
NAME:
SOHO_ITEMS_HTML
PURPOSE:
List SOHO related plans in HTML format
CATEGORY:
Utility
SYNTAX:
soho_items_html, unit, title, entries
INPUTS:
UNIT - I/O unit number (must have opened)
TITLE - Title of items (instrument name, etc.)
ENTRIES - Structure array for entries of items
OPTIONAL INPUTS:
None.
OUTPUTS:
Partial HTML document written to UNIT
OPTIONAL OUTPUTS:
None.
KEYWORDS:
NEW - A name variable which must be set to 1 when called for
the 1st time; it's set to 0 afterwards
CALLS: ***
ANYTIM2UTC [1], ANYTIM2UTC [2], ARR2STR [1], Arr2Str [2], GET_OBJECT
GET_PLAN_ITIME, GET_UTC, HTML_TABLE_HEADER, SEC2DHMS, STR2ARR [1], STR2ARR [2]
STR_INDEX [1], STR_INDEX [2], TAG_EXIST [1], TAG_EXIST [2]
CALLED BY:
HTML_SPLAN, MK_PLAN_HTML
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
Keyword variable NEW is set to 0 after the first call
HISTORY:
Version 1, August 20, 1997, Liyun Wang, NASA/GSFC. Written
CONTACT:
Liyun Wang, NASA/GSFC (Liyun.Wang.1@gsfc.nasa.gov)
[Previous]
[Next]
NAME:
sohoephem
PURPOSE:
Compute solar/planetary ephemerides.
CATEGORY:
CALLING SEQUENCE:
sohoephem,tjd,rsoho,iorig,sunephem,planephem
INPUTS:
tjd: Julian date (including fraction of day).
rsoho: Position/velocity of SOHO in heliocentric coordinates
(in AU and AU/day).
iorig: Origin of coordinates.
iorig = 1: Geocentric.
iorig = 2: Sohocentric.
OUTPUTS:
sunephem: Structure containing solar ephemeris information.
planephem: Array of structures containing planetary ephemeris
information for 5 major planets.
CALLS: ***
SETLOG
CALLED BY:
GET_SOLAR_RADIUS, POINTING3, STARFIELD, get_soho_ephem
PROCEDURE:
Uses CALL_EXTERNAL to FORTRAN routine.
Results returned in structures.
HISTORY:
Written by Simon Plunkett, September 1995.
Adapted 29 March 1996 to include SOHO orbit parameters. (SPP).
Adapted 4 June 1996 to use FITS rather than CDF orbit files
(change only in output message). (SPP).
Adapted 14 March 1997 to use FITS or CDF files, including all
mods to CDF file structure (change only in output
message). (SPP).
Adapted 15 November 2000 to correct calling sequence in
comments (SPP).
Changed shareable object call for OSF from ephem.so to
ephem_dec.so, 15-Aug-2001 (SPP).
011109 Added Linux external file ephem_linux.so (DW)
011219, NR - Rename to "sohoephem"
12/19/01, @(#)sohoephem.pro 1.7 - NRL LASCO IDL Library
[Previous]
[Next]
PROJECT:
SOHO - CDS
NAME:
SOLAR_GRID
PURPOSE:
To plot gridding lines on the solar image
EXPLANATION:
CALLING SEQUENCE:
eit_sub_solar_grid, lati, longi, date=date
INPUTS:
LATI - The spacing in degrees between parallels of latitude;
default: 15.0 degrees
LONGI - The spacing in degrees between meridians of longitude;
default: 15.0 degrees
DATE - Data/time in CDS time format at which the grid is plotted.
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORD PARAMETERS:
LINESTYLE -- Line style to be used, default: dotted (1)
COLOR -- color of the line to be draw; default: !d.n_colors-1
CALLS: ***
EIT_SUB_SOLAR_GRID, HEL2ARCMIN [1], HEL2ARCMIN [2]
COMMON BLOCKS:
None.
RESTRICTIONS:
Can be called only AFTER the data coordinate system is established,
so it would be OK if it is called after PLOT_AXES is called (which
also sets the data coordinate system)
SIDE EFFECTS:
None.
CATEGORY:
Planning, Image_tool
PREVIOUS HISTORY:
Written April 11, 1995, Liyun Wang, GSFC/ARC
MODIFICATION HISTORY:
Version 1, created, Liyun Wang, GSFC/ARC, April 11, 1995
VERSION:
Version 1, April 11, 1995
[Previous]
[Next]
NAME: SOLAR_NORTH_UP
PURPOSE: Rotates the image to put the solar north at the
top of the image.
CATEGORY: REDUCTION
CALLING SEQUENCE: Result = SOLAR_NORTH_UP (Img, Tel)
INPUTS: Img = Image array, corrected for readout port
telescope = int representing telescope (0,1,2,3) -or-
string representing telescope
OPTIONAL INPUTS: None
KEYWORD PARAMETERS: None
OUTPUTS: Result = Image array, corrected for telescope
orientation
OPTIONAL OUTPUTS: None
CALLS: ***
DATATYPE [1], DATATYPE [2], DATATYPE [3], TRIM
COMMON BLOCKS:
SIDE EFFECTS:
RESTRICTIONS:
assumes that the images are already rectified so that the readout port
effect has been taken care of
To visualize the images properly, the parameter, !order, should be set =1
PROCEDURE:
EXAMPLE:
MODIFICATION HISTORY: Written, RA Howard, NRL
VERSION 1 rah 3 Nov 1995
VERSION 2 rah 2 Jan 1996 EIT changed from 1 to 0
nbr, 3 Jan 2002 - Can use string camera as input
@(#)solar_north_up.pro 1.2 01/03/02 LASCO IDL LIBRARY
[Previous]
[Next]
Name: sort_index
Purpose: return time sorted array of merged structures
Input Paramters:
index1, index2 - vectors of Yohkoh time structures to sort
Keyword Parameters
ss - is set, return sorted indices, not sorted/merged structures
negtim - indices where time runs backwards (-1 if none)
loud - report on number of records where time is backwards
Calling Sequnce:
newindex=sort_index(index1, index2) ; return merged index records
; (structures)
sortss=sort_index(index1, index2, /ss) ; return ssvector
; (longword array)
sortindex=sort_index(index1,/loud) ; sort single vector & report
Calling Example:
info=get_info(sort_index(findex,pindex)) ; merge SXT FFI and PFI records
; (index or roadmap)
CALLS: ***
deriv_arr [1], deriv_arr [2], int2secarr [1], int2secarr [2], str_concat [1]
str_concat [2]
CALLED BY:
PATROL_ORDER, goes_widget, lasteit, mk_sff_pair [1], mk_sff_pair [2]
pro interpretfemfemfemtimefemflgfemstrfemstrverboseverbose
pro optimizedbdrfileshowparamshowparam, rd_goesx_ascii, rd_guf_ascii
ref_term [2], soon_catstat, sxt_adjacent_image, sxt_ssn2fits [1]
History:
5-Nov-1993 (SLF)
10-Feb-1994 (SLF) - allow single input, /loud keyword
12-Dec-1994 (SLF) _ add uniq switch
[Previous]
[Next]
Project : SOHO - CDS
Name : SORT_WINDOWS
Purpose : Sort the technical planning line_window structure.
Explanation : In the line_window structure of window details an invalid
entry is signified by the tag .x_pos having a negative value.
This procedure sorts the input structure on the x_pos tag
and returns the number of valid (ie x_pos > 0) entries.
Use : IDL> sort_windows, line_window_str, num_windows
Inputs : line_window_str - the line-window structure defined in
tp_def_struct.
Opt. Inputs : None
Outputs : num_windows - the number of valid entries in the list.
Opt. Outputs: None
Keywords : None
Calls : ***
Bell, DATATYPE [1], DATATYPE [2], DATATYPE [3]
CALLED BY:
LOAD_TP_STRUCT, MK_RASTER, TP_DISP_IEF
Restrictions: None
Side effects: None
Category : Technical planning
Prev. Hist. :
Written : C D Pike, RAL, 14-May-93
Modified : Changed invalid entry to one with .x_pos < 0, CDP, 23-Mar-94
Version : Version 2, 23-Mar-94
[Previous]
[Next]
Project : SOHO - CDS
Name :
SPEC_DIR()
Purpose :
Appends a default disk or directory to a filename.
Explanation :
Provide a complete file specification by appending a default disk
or directory if necessary.
For Unix, SPEC_DIR will simply append the default directory obtained
from the CD command (if necessary). Under VMS one must also
determine if the disk and/or directory is already specified. Under
VMS, SPEC_DIR will also try to translate disk and directory logical
names.
Use :
File_spec = SPEC_DIR(filename,[extension])
Inputs :
filename - character string giving partial specification of a file
name. VMS examples include 'UIT$USER2:TEST.DAT', or
'[.SUB]TEST'. Unix examples include
'/home/idl/lib', or '$IDL_HOME/pro'.
Opt. Inputs :
exten - string giving a default file name extension to be used if
filename does not contain one. Do not include the period.
Outputs :
File_spec - Complete file specification using default disk or
directory when necessary. If the default directory
is UIT$USER1:[IDL] then, for the above VMS examples, the
output would be 'UIT$USER2:[IDL]TEST.DAT'
'UIT$USER2:[IDL.SUB]TEST'.
Opt. Outputs: None.
Keywords : None.
Calls : ***
FDECOMP [1], FDECOMP [2], FDECOMP [3]
CALLED BY:
DB_ITEM [1], DB_ITEM [2], DB_ITEM [3], DEF2C_FILL, DEF2C_FORMAT, DEF2C_INSERT
DEF2STRUCT, FITSDIR, NSTAR
Common : None.
Restrictions: None.
Side effects: None.
Category : Utilities, Operating_System
Prev. Hist. :
Written W. Landsman STX July, 1987
Revised for use on VAXes and on SUNs, W. Landsman, STX August 1991
Written : W. Landsman, GSFC/UIT (STX), July 1987
Modified : Version 1, William Thompson, GSFC, 29 March 1994
Incorporated into CDS library
Version : Version 1, 29 March 1994
[Previous]
[Next]
NAME: spikes
PURPOSE: To locate single pixel spikes, like Cosmic Rays,
in 2-D images.
METHOD: Default uses a three point median filter as a
reference, takes the difference and compares it with the
cutoff value. The returned variable is a vector of pointers
to spikes in the input variable. Default mode is to remove
holes and spikes. Average filter is also available.
CALLING SEQUENCE: spikes=(img,cutoff,[remove=remove,width=width,
average=average, pos=pos, neg=neg])
PARAMETERS: img input image
cutoff comparison cutoff
KEYWORDS: /remove when set return corrected
image
width median filter size (default
is 3).
/average use an average filter instead
of median.
/pos remove only spikes (or bright val)
/neg remove only holes (or dark values)
CALLED BY:
NAME [3], de_spiker [1], de_spiker [2], despike, sfc_de_spiker, wl_process
Note: spikes will use -1 * abs(cutoff)
NOTE: Default is to remove pos and neg.
CALLS: ***
coord_v2l
HISTORY: Drafted by A.McAllister, following a B.Labonte
algorythm, 10-jun-93.
Added code to handle borders, and keyword to
return corrected image, 2-jul-93.
trap for no spikes, 9-aug-93.
added control to filter size (default is the orginal
value of 3), also added absolute value on difference
12-Jan-94, gal
17-Mar-94, gal, added average filter, options for removal
of only pos or neg; keeping the default mode as removing
both pos and neg.
12-dec-94, JRL, Changed code to make /pos and /neg options work.
Improved the interpretation of input keywords.
Fixed the /remove option (now consistent with de_spiker).
[Previous]
[Next]
Project:
SOHO - SUMER
Name:
splice_sel
Purpose:
To select the wavelength at which two reference spectrum
exposures should be spliced together.
Use:
Result = Splice_sel(lam0,lam1,spec0,spec1,OverLap,zone_in)
Inputs:
lam0, lam1 - First and second wavelength arrays
spec0, spec1 - First and second data arrays
OverLap - Number of pixels by which the two exposures overlap
zone_in - if the spectra come from more than one spatial
zone on the referece spectrum, use this parameter
to select the zone plotted
Output:
DP1 - increase in pixel position of splice in first array
beyond the default value.
Input Keywords:
None
Output Keywords:
None
Calls:
None
CALLED BY:
mk_atlas, smk_atlas
Common:
None
Written:
Terry Kucera, 9 Apr 1996
New version to go with latest version of mk_atlas, 16 May 1996
[Previous]
[Next]
NAME: SPLIT_QKL
PURPOSE: Pre-process QKL files to split them up if they have gaps
CATEGORY: REDUCTION
CALLING SEQUENCE: SPLIT_QKL, yymmdd
INPUTS: date = Date to be processed
OPTIONAL INPUTS: None
KEYWORD PARAMETERS: None
OUTPUTS: None
OPTIONAL OUTPUTS: None
CALLS: ***
DATATYPE [1], DATATYPE [2], DATATYPE [3], GET_UTC, OBT2TAI, READ_TM_PACKET, TAI2UTC
CALLED BY:
UNPACK_ALL_SCIENCE
COMMON BLOCKS: UNPACK_SCIENCE
PROCEDURE:
A QKL file is broken into smaller files, for which the times in consecutive
packets differ by no more than 30 secs.
MODIFICATION HISTORY:
WRITTEN 4 Nov 1998 by Nathan Rich, Interferometrics/NRL
12 Nov 1998 NBR change qkl allowed gap to 30 sec
30 Nov 1998 RAH Check for undefined input date.
020312 Jake Added /SH to SPAWN
SCCS variables for IDL use
@(#)split_qkl.pro 1.7 03/12/02 :NRL Solar Physics
[Previous]
[Next]
TITLE:
SPM_FCOR
PURPOSE:
This function returns the Saito-Poland-Munro F corona
INPUT PARAMETERS:
R: Radius (in solar radii) Can be a single number or an array
OPTIONAL INPUT PARAMETERS:
PA: Position angle (in degrees). If omitted, then the equatorial
corona is returned (PA=90)
OUTPUTS:
The F corona is returned in Mean Solar Brightness units as an array
of floating point numbers corresponding to the size of the input R
array.
RESTRICTION:
The F corona is only valid for radial distances from 1.5 to 5 solar
radii.
PROCEDURE:
The F-coronal values for the polar and equatorial cases given in
Saito, Poland and Munro, Solar Physics, vol 55, pp 121-134, 1977 are
used as the reference points. The logs of the brightness values are
linearly interpolated to obtain the brightness at the desired radii.
To obtain the brightness for a position angle between the pole and
equator, the polar and equatorial values are linearly interpolated
(in the log).
EXAMPLES:
To obtain the polar F-corona at 2.8 solar radii:
f = SPM_FCOR(2.8,0)
To obtain the equatorial K-corona at 2.8 solar radii:
f = SPM_FCOR(2.8,90)
or
f = SPM_FCOR(2.8)
To obtain the F-corona at 45 degrees at 2, 3, 4, 5, and 6 Rs:
r = [2,3,4,5,6]
f = SPM_FCOR(r,45)
WRITTEN:
18 Dec 1997, RAHoward, NRL
@(#)spm_fcor.pro 1.1 12/30/97 :LASCO IDL LIBRARY
[Previous]
[Next]
TITLE:
SPM_KCOR
PURPOSE:
This function returns the Saito-Poland-Munro K corona
INPUT PARAMETERS:
R: Radius (in solar radii) Can be a single number or an array
OPTIONAL INPUT PARAMETERS:
PA: Position angle (in degrees). If omitted, then the equatorial
corona is returned (PA=90)
OUTPUTS:
The K corona is returned in Mean Solar Brightness units as an array
of floating point numbers corresponding to the size of the input R
array.
PROCEDURE:
The K-coronal values for the polar and equatorial cases given in
Saito, Poland and Munro, Solar Physics, vol 55, pp 121-134, 1977 are
used as the reference points. The logs of the brightness values are
linearly interpolated to obtain the brightness at the desired radii.
To obtain the coronal intensity for a position angle between the pole
and equator, the polar and equatorial values are linearly interpolated
(in the log).
EXAMPLES:
To obtain the polar K-corona at 2.8 solar radii:
K = SPM_KCOR(2.8,0)
To obtain the equatorial K-corona at 2.8 solar radii:
K = SPM_KCOR(2.8,90)
or
K = SPM_KCOR(2.8)
To obtain the K-corona at 45 degrees at 2, 3, 4, 5, and 6 Rs:
r = [2,3,4,5,6]
k = SPM_KCOR(r,45)
WRITTEN:
18 Dec 1997, RAHoward, NRL
@(#)spm_kcor.pro 1.1 12/30/97 :LASCO IDL LIBRARY
[Previous]
[Next]
TITLE:
SPM_NE
PURPOSE:
This function returns the Saito-Poland-Munro electron density
INPUT PARAMETERS:
R: Radius (in solar radii) Can be a single number or an array
OPTIONAL INPUT PARAMETERS:
Region: =0: Return the equatorial corona density
=1: Return the polar coronal density
=2: Return the coronal hole density
If omitted, then the equatorial corona density is returned
OUTPUTS:
The electron density in particles per cm^3 as an array of floating
point numbers corresponding to the size of the input R array.
PROCEDURE:
The electron density for the polar, equatorial and coronal hole cases
given in Saito, Poland and Munro, Solar Physics, vol 55, pp 121-134,
1977 are used as the reference points. The density models are given
in a function form as
Ne = c1 * R^d1 + c2 * R^d2
The coefficients c1, c2, d1 and d2 are given by SPM for each of the
three models.
EXAMPLES:
To obtain the polar electron density at 2.8 solar radii:
dne = SPM_NE(2.8,1)
To obtain the equatorial K-corona at 2.8 solar radii:
dne = SPM_NE(2.8,0)
or
dnef = SPM_NE(2.8)
To obtain the electron density in an equatorial coronal hole at 2, 3, 4, 5, and 6 Rs:
r = [2,3,4,5,6]
dne = SPM_NE(r,2)
WRITTEN:
18 Dec 1997, RAHoward, NRL
16 Aug 2000, AHayes, NRL, switched polar and equatorial CH order to agree with paper
@(#)spm_ne.pro 1.2 08/16/00 :LASCO IDL LIBRARY
[Previous]
[Next]
TITLE:
SPM_PB
PURPOSE:
This function returns the Saito-Poland-Munro polarization brightness
INPUT PARAMETERS:
R: Radius (in solar radii) Can be a single number or an array
OPTIONAL INPUT PARAMETERS:
Region: =0: Return the equatorial pB
=1: Return the polar pB
=2: Return the coronal hole pB
If omitted, then the equatorial pB is returned
OUTPUTS:
The polarization brightness in mean solar brightness units is returned
as an array of floating point numbers corresponding to the size of the
input R array.
PROCEDURE:
The polarization brightness for the polar, equatorial and coronal hole cases
given in Saito, Poland and Munro, Solar Physics, vol 55, pp 121-134,
1977 are used as the reference points. The pB models are given
in a function form as
pB = c1 * R^d1 + c2 * R^d2
The coefficients c1, c2, d1 and d2 are given by SPM for each of the
three models.
EXAMPLES:
To obtain the polar pB model at 2.8 solar radii:
pb = SPM_PB(2.8,1)
To obtain the equatorial K-corona at 2.8 solar radii:
pb = SPM_PB(2.8,0)
or
pb = SPM_PB(2.8)
To obtain the pB in an equatorial coronal hole at 2, 3, 4, 5, and 6 Rs:
r = [2,3,4,5,6]
pb = SPM_PB(r,2)
WRITTEN:
18 Dec 1997, RAHoward, NRL
16 Aug 2000, AHayes, NRL, corrected order of polar and CH
@(#)spm_pb.pro 1.2 08/16/00 :LASCO IDL LIBRARY
[Previous]
[Next]
PROJECT:
SOHO - CDS/SUMER
NAME:
SQL_QUERY()
PURPOSE:
Wrapper program to send SQL command to Oracle server
CATEGORY:
Utility, database
SYNTAX:
status = sql_query(sql_cmd, var1 [, var2 [, var3]])
INPUTS:
SQL_CMD - String scalar or vector, containing a maximum of three valid
SQL statements
OPTIONAL INPUTS:
None.
OUTPUTS:
STATUS - Running status; 1: succeeded, 0: failed
VAR1..3 - Named variable(s): string array of N x M elements, where
N is number of fields returned, and M is number of records
returned
OPTIONAL OUTPUTS:
None.
KEYWORDS:
NREC - Integer scalar or vector containing number of records returned
from each SQL statement passed in
ERROR - Named variable containing possible error message
CALLS: ***
DATATYPE [1], DATATYPE [2], DATATYPE [3], GET_HOSTNAME, GREP, SC_INIT_REQ
CALLED BY:
SUM_GET_LINELIST
COMMON:
screq_com (check definition in sc_common)
sql_query_com (for internal use)
RESTRICTIONS:
Requires the request server SIMUSUMER:SCREQ_SRV to be running
SIDE EFFECTS:
None.
HISTORY:
Version 1, May 21, 1997, Liyun Wang, NASA/GSFC. Written
CONTACT:
Liyun Wang, NASA/GSFC (Liyun.Wang.1@gsfc.nasa.gov)
[Previous]
[Next]
Project:
SOHO - SUMER
Name:
SSEL_DATCOL
Purpose:
To determin the tag indices of data with given wavelength and BTE
Use:
result = ssel_datcol(index,bte=[1,2],wavelength=[1393.76,1405.92])
Inputs:
index - The index structure returned from rd_sumer.
Output:
the tag numbers for the data having the input BTEs and wavelengths
num - The number of tags
Input Keywords:
BTE - array listing the BTE's wanted. Default is All.
wavelength - array listing the wavelengths wanted. Default is All
if the input is in string form it must be in the
format 'W_1234_56'
Calls: ***
DATATYPE [1], DATATYPE [2], DATATYPE [3], MATCH [1], MATCH [2], MATCH [3]
str_replace [1], str_replace [2]
CALLED BY:
CALL_TRIWARP, SUM_GAUSSB
Common:
None
Written:
Terry Kucera, 12 Aug 1996
Modifications:
fixed bug in string -> float wavelength conversion. 26 Feb 96, TAK
Added NUM output and changed behavior if there
are no matches. 03 Nov 97, TAK
Replaced calls to strreplace with str_replace 10 Mar 00, TAK
[Previous]
[Next]
NAME:
ssw_bypass
PURPOSE:
While integrating into the /ssw system, it was necessary
to control the order of the /tsw tree and /mdisw tree.
CALLS: ***
ssw_path
HISTORY:
Written 15-Nov-96 by M.Morrison
14-Apr-97 (MDM) - Brought online again.
16-Apr-97 (MDM) - Make the default "/old"
- Prepend /mdisw/idl paths too
- No switches
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
ST_AREA_SIZE()
PURPOSE:
Calculate the total pointing area size
CATEGORY:
ST_SUMER
SYNTAX:
Result = st_area_size(tki_udp_stc)
INPUTS:
tki_udp_stc - UDP structure created with TKI simulator
OPTIONAL INPUTS:
None.
OUTPUTS:
RESULT - Two-element floating point array containing width and height
(in arcsecs) of the pointing area
OPTIONAL OUTPUTS:
None.
KEYWORDS:
None.
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 8, 1996, Liyun Wang, NASA/GSFC. Written
CONTACT:
Liyun Wang, NASA/GSFC (Liyun.Wang.1@gsfc.nasa.gov)
[Previous]
[Next]
PROJECT:
SOHO - CDS/SUMER
NAME:
ST_COMP_OBJ()
PURPOSE:
Compare if two object codes are the same
CATEGORY:
ST_SUMER
SYNTAX:
Result = st_comp_obj(obj_file, tki_udp_stc)
INPUTS:
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
None.
CALLS: ***
COMPARE_VAR
CALLED BY:
ST_SUMER
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 21, 1996, Liyun Wang, NASA/GSFC. Written
CONTACT:
Liyun Wang, NASA/GSFC (Liyun.Wang.1@gsfc.nasa.gov)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
ST_MK_UDP_STC
PURPOSE:
Create an UDP structure via TKI simulation
CATEGORY:
st_sumer
SYNTAX:
st_mk_udp_stc
INPUTS:
INIT_PT - A structure having tags INIT_Y and INIT_Z indicating the
initial pointing value (in SUMER coordinate system)
EVENT - Widget event structure
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
ERROR - Named variable that holds an error message if any. If no error
occurrs, the null string is returned.
CALLS: ***
CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], ST_SUMER_WIN, ST_TKI_INIT
TEST_OPEN, TKI_SHOW_LAM, TKI_TCMD, XACK, XVALID, concat_dir [4]
CALLED BY:
ST_SUMER
COMMON:
@st_sumer_com
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 1, 1996, Liyun Wang, NASA/GSFC. Written
Version 2, November 18, 1996, Liyun Wang, NASA/GSFC
Changed pointing coordinate system to heliocentric
CONTACT:
Liyun Wang, NASA/GSFC (Liyun.Wang.1@gsfc.nasa.gov)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
ST_REG_STUDY
PURPOSE:
Register a single-item study with DB from a simulated UDP
CATEGORY:
ST_SUMER
SYNTAX:
st_reg_study, udp_stc
INPUTS:
UDP_STC - UDP structure, created via TKI simulator plus an extra
tag named UDP_SEQ which itself is a structure with the
following tags:
NAME - Name of UDP
TITLE - Title of UDP
CATEGORY - Category of UDP
PURPOSE - Purpose (description) of UDP
SCL_BASE - Base Name (no extention) of SCL for the UDP
SCL_PATH - Name of path where the original UDP
associated files reside
UDP_ID - ID of newly created UDP
If the study to be created requires a pointing sequence,
UDP_STC can also have another tag named ZONE_ID indicating
the pointing zone.
OPTIONAL INPUTS:
None.
OUTPUTS:
Records inserted in database
OPTIONAL OUTPUTS:
None.
KEYWORDS:
STD_ID - A named variable containing ID of newly registered study.
If an error occurs during the process, STD_ID will be -1
ERROR - A named variable containing error message returned. If no
error occurs, the null string is returned
COMMON:
screq_com
RESTRICTIONS:
Requires the request server SIMUSUMER:SCREQ_SRV to be running.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 1, 1996, Liyun Wang, NASA/GSFC. Written
Version 2, December 4, 1996, Liyun Wang, NASA/GSFC
Recorded DEFT_X and DEFT_Y values into the POINT_AREA table
CONTACT:
Liyun Wang, NASA/GSFC (Liyun.Wang.1@gsfc.nasa.gov)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
ST_REG_UDP
PURPOSE:
Register a simulated UDP with SUMER database
CATEGORY:
ST_SUMER
SYNTAX:
st_reg_udp, udp_stc
INPUTS:
UDP_STC - UDP structure, created via TKI simulator plus an extra
tag named UDP_SEQ which itself is a structure with the
following tags:
NAME - Name of UDP
TITLE - Title of UDP
CATEGORY - Category of UDP
PURPOSE - Purpose (description) of UDP; can be a string
array
SCL_BASE - Base Name (no extention) of SCL for the UDP
SCL_PATH - Name of path where the original UDP
associated files reside
UDP_ID - ID of newly created UDP (initially: -1)
INIT_Y - Initial Solar_Y (+XCEN, W/E) pointing
INIT_Z - Initial Solar_Z (-YCEN, N/S) pointing
EVENT - Event structure; used for writing message out in text widget
OPTIONAL INPUTS:
None.
OUTPUTS:
Records inserted in database, plus udp_stc.udp_seq.udp_id gets a new
value
OPTIONAL OUTPUTS:
None.
KEYWORDS:
ERROR - A named variable containing error message returned. If no
error occurs, the null string is returned
COMMON:
screq_com
RESTRICTIONS:
Requires the request server SIMUSUMER:SCREQ_SRV to be running.
SIDE EFFECTS:
Optionally, the user may change UDP_STC.UDP_SEQ.SCL_BASE, and
if so, all current UDP related files will be renamed.
UDP_STC.UDP_SEQ.UDP_ID is changed upon successful registration.
HISTORY:
Version 1, October 1, 1996, Liyun Wang, NASA/GSFC. Written
Version 2, February 7, 1997, Liyun Wang, NASA/GSFC
Added option to let user change SCL code name if the same
SCL code for the UDP exists already
Removed the TEST keyword
CONTACT:
Liyun Wang, NASA/GSFC (Liyun.Wang.1@gsfc.nasa.gov)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
ST_SCIENTIST_ID()
PURPOSE:
Get SC_SUMER scientist ID based on user's login name
CATEGORY:
ST_SUMER
SYNTAX:
Result = st_scientist_id()
INPUTS:
None.
OPTIONAL INPUTS:
None.
OUTPUTS:
RESULT - Scientist ID
OPTIONAL OUTPUTS:
None.
KEYWORDS:
LOGIN - Login name of the user
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 8, 1996, Liyun Wang, NASA/GSFC. Written
CONTACT:
Liyun Wang, NASA/GSFC (Liyun.Wang.1@gsfc.nasa.gov)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
ST_SUMER
PURPOSE:
Simulation Tool for SUMER
EXPLANATION:
The Simulation Tool for SUMER (ST_SUMER) is the front end of
the SUMER simulator (the TKI package) that can be used to
create simulated UDPs, register simulated UDPs with the SUMER
database, and make one-item studies.
CALLING SEQUENCE:
ST_SUMER [, file=file]
INPUTS:
None.
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORD PARAMETERS:
GROUP - ID of calling widget that serves as a group leader
CALLS: ***
ADD_TAG [1], ADD_TAG [2], ADD_UDP_HEAD, BREAK_FILE [1], BREAK_FILE [2]
BREAK_FILE [3], COMPARE_VAR, CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3]
CONGRID [1], CONGRID [2], CONGRID [3], DATATYPE [1], DATATYPE [2], DATATYPE [3]
DELVARX [1], DELVARX [2], DELVARX [3], DELVARX [4], FILE_EXIST [2]
GET_COMPILED_TKI, GET_LIB, GET_UDP_HEAD, GET_UTC, LOC_FILE [1], LOC_FILE [2]
LOC_FILE [3], MK_DFONT, PICKFILE2, RD_ASCII2, READ_GIF, REM_TAG [1], REM_TAG [2]
SC_TKI_INIT, SC_UPDATE_STATUS, SHOW_STRUCT, STREP [1], STREP [2], STREP [3]
STREP [4], STREP [5], ST_COMP_OBJ, ST_MK_UDP_STC, ST_SUMER_BUTTON, ST_SUMER_EVENT
ST_SUMER_LOGO, ST_SUMER_MSG, ST_SUMER_PURGE, ST_SUMER_WIN, ST_TKI_INIT
ST_UPDATE_FIELD, TEST_OPEN, TKI_INIT_MAIN, TKI_SAVE_UDP, WIDG_HELP, WRITE_ASCII
XACK, XANSWER, XCHOICE, XKILL, XMANAGER, XREGISTERED, XSTRUCT, XTEXT, break_file [4]
concat_dir [4], delvarx [5], file_exist [1], file_exist [3]
COMMON BLOCKS:
@st_sumer_com
RESTRICTIONS:
None.
SIDE EFFECTS:
The caller widget, if any, is frozen till this program exits.
CATEGORY:
Simulator
WORKING ENVIRONMENT:
IDL: Version 4.0 and up
OS: VMS
PREVIOUS HISTORY:
Written September 19, 1996, Liyun Wang, NASA/GSFC
MODIFICATION HISTORY:
Version 1, Liyun Wang, NASA/GSFC, September 19, 1996
Version 1.1, October 15, 1996, Liyun Wang, NASA/GSFC
Made sure that single quotation mark is removed from title, etc.
Version 1.2, November 18, 1996, Liyun Wang, NASA/GSFC
Added message reminding the user not to register UDP when
he/she really wants to create a study
Changed pointing widgets to use the heliocentric system
Check imported UDP if pointing has been changed since last
simulation
Version 1.3, January 27, 1997, Liyun Wang, NASA/GSFC
Added mechanism of purging UDP files upon successful creation
Version 1.4, February 7, 1997, Liyun Wang, NASA/GSFC
Allowed user to rename the SCL related files during registration
Version 1.5, April 9, 1997, Liyun Wang, NASA/GSFC
Allowed SIRIUS to be the machine capable of registering UDPs
Version 1.6, April 15, 1997, Liyun Wang, NASA/GSFC
Made it more portable
Version 1.7, May 12, 1997, Liyun Wang, NASA/GSFC
Added check against database update status
Added check against compilation error
Version 1.8, June 24, 1997, Liyun Wang, NASA/GSFC
Added option to select detector and telemetry rate when running
from a non-SUMER machine
Version 1.9, October 15, 1999, Dietmar Germerott, MPAE Lindau
Added option to go on with current pointing without resimulation
Version 2.0, December 3, 2000, Dietmar Germerott, MPAE Lindau
Added new SUMER NODE at Lindau (VMS3)
VERSION:
Version 1.9, June 24, 1997
CONTACT:
Liyun Wang, NASA/GSFC (Liyun.Wang@gsfc.nasa.gov)
[Previous]
[Next]
PROJECT:
SOHO - CDS/SUMER
NAME:
ST_SUMER_PURGE
PURPOSE:
Clean up files associated with current UDP
CATEGORY:
ST_SUMER
SYNTAX:
sc_sumer_purge, WID
INPUTS:
WID -- Structure containing necessary widget IDs
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
None.
CALLS: ***
CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], concat_dir [4]
CALLED BY:
ST_SUMER
COMMON:
@st_sumer_com
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, January 27, 1997, Liyun Wang, NASA/GSFC. Written
Version 2, February 10, 1997, Liyun Wang, NASA/GSFC
Modified such that commands are spawned in current UDP source path
to avoid failure of spawning long commands
CONTACT:
Liyun Wang, NASA/GSFC (Liyun.Wang.1@gsfc.nasa.gov)
[Previous]
[Next]
PROJECT:
SOHO - CDS/SUMER
NAME:
ST_SUMER_WIN
PURPOSE:
Create graphic windows for st_sumer
CATEGORY:
widget
SYNTAX:
st_sumer_win, draw_win_base, tech_win, sun_win
INPUTS:
None.
OPTIONAL INPUTS:
None.
OUTPUTS:
draw_win_base, tech_win, sun_win
OPTIONAL OUTPUTS:
None.
KEYWORDS:
None.
CALLS: ***
DATATYPE [1], DATATYPE [2], DATATYPE [3], MK_DFONT, ST_MAP_WIN, ST_SUMER_WIN_EVENT
ST_TKI_INIT, TKI_PHOTO_BASE, TKI_SHOW_LAM, XKILL, XMANAGER
CALLED BY:
ST_MK_UDP_STC, ST_SUMER
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, September 27, 1996, Liyun Wang, NASA/GSFC. Written
CONTACT:
Liyun Wang, NASA/GSFC (Liyun.Wang.1@gsfc.nasa.gov)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
ST_TKI_INIT
PURPOSE:
Make a bridge between ST_SUMER and TKI
CALLING SEQUENCE:
ST_TKI_INIT
INPUTS:
None.
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORD PARAMETERS:
SUN_WIN - ID of the draw widget on which the solar disc is drawn
TECH_WIN - ID of the draw widget on which result of simulation is shown
TEXT_WIN - ID of the text widget on which message is shown
OBJ_FILE - Name of POP/UDP object file fed into TKI
ERROR - A named variable that contains error message. If no error
occurrs, the null string is returned.
HAS_DB - Set this keyword if Oracle database system exists
CALLS: ***
CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], SC_TKI_INIT, TEST_OPEN, TKI_CHKIT
TKI_GRAPH_STC, concat_dir [4]
CALLED BY:
ST_MK_UDP_STC, ST_SUMER, ST_SUMER_WIN
COMMON BLOCKS:
@TKI_COMMON_SHARE
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
PREVIOUS HISTORY:
Written March 4, 1996, Liyun Wang, GSFC/ARC
MODIFICATION HISTORY:
Version 1, Liyun Wang, GSFC/ARC, March 4, 1996
Version 2, Dietmar Germerott, MPAE, April 16, 1998
Set to detector 'B' by def
Version 3, October 16, 1999, Dietmar Germerott, MPAE Lindau
Modified selection of detector depending global parameter file
VERSION:
Version 3, October 16, 1999
[Previous]
[Next]
PROJECT:
SOHO - CDS/SUMER
NAME:
ST_UPDATE_FIELD
PURPOSE:
Update widget fields in ST_SUMER
CATEGORY:
ST_SUMER
SYNTAX:
st_update_field, doc_stc, wid
INPUTS:
DOC_STC - Documentation header structure
WID - Widget ID structure
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
None.
CALLS: ***
DATATYPE [1], DATATYPE [2], DATATYPE [3], GREP, TAG_EXIST [1], TAG_EXIST [2]
CALLED BY:
ST_SUMER
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, November 1, 1996, Liyun Wang, NASA/GSFC. Written
Version 2, November 18, 1996, Liyun Wang, NASA/GSFC
Changed pointing coordinate system to heliocentric
CONTACT:
Liyun Wang, NASA/GSFC (Liyun.Wang.1@gsfc.nasa.gov)
[Previous]
[Next]
Project : SOHO - CDS
Name : ST_WINDATA
Purpose : Putting back the data block for a detector window
Explanation : Stores the passed data array into the QLDS structure.
Use : ST_WINDATA,QLDS,WINDOWI,DATA
Inputs : QLDS : Quick Look Data Structure
WINDOWI : The window index
DATA : The data to be stored.
Opt. Inputs : None.
Outputs : None.
Opt. Outputs: None.
Keywords : NO_COPY : Set to user the /NO_COPY keyword when performing the
handle_value,/set operation. Will make the DATA
variable disappear.
Calls : ***
DEFAULT, PARCHECK, TAG_EXIST [1], TAG_EXIST [2], TYP
CALLED BY:
CDS_CLEAN, CDS_CLEAN_EXP, CDS_CLEAN_SPIKE, CDS_FILL_MISSING, CDS_NEW_SPIKE
CDS_PAD_QLDS, CDS_READ_MISSING, CDS_REPAIR_TOP, CDS_SAVE_MISSING, CF_174LG
CF_177LG, CF_180LG, CF_765LG, CF_770LG, GHOST_BUSTER, GHOST_MOVE, GIS_CALIB
GIS_SMOOTH, GT_BIMAGE, GT_IIMAGE, GT_SCANP, GT_SCANT, GT_SCANX, GT_SCANY, GT_SPECTRUM
NIS_CALIB, NIS_MRGDATA, NIS_ROTATE, STORE_WND, VDS_CALIB, VDS_DEBIAS, XCDS_COSMIC
Common : None.
Restrictions: Of course, DATA should have the correct format.
Side effects: DATA becomes undefined when the /NO_COPY keyword is used.
This routine is mostly for internal use by CDS software, like
vds_calib and vds_debias.
Category : Data_handling, Soho, CDS
Prev. Hist. : None.
Written : Stein Vidar H. Haugan, 9 August 1996
Modified : Version 1, Stein Vidar H. Haugan, 9 August 1996
Version 2, 04-Dec-1998, William Thompson, GSFC
Added keyword NOPAD
Version : Version 2, 04-Dec-1998
[Previous]
[Next]
PROJECT:
SOHO - LASCO
NAME:
STARFIELD
PURPOSE:
Widget interface to display stars and planets in field of view
of any of the three LASCO coronagraphs.
CATEGORY:
Widgets.
CALLING SEQUENCE:
Starfield
INPUTS:
OPTIONAL INPUTS:
KEYWORD PARAMETERS:
OUTPUTS:
OPTIONAL OUTPUTS:
CALLS: ***
AD2XY, ANYTIM2UTC [1], ANYTIM2UTC [2], ARROW, C2_DISTORTION, C3_DISTORTION, CDS2JD
COCO_J2000, CW_BSELECTOR, CW_FIELD, DTSELECT, GET_ORBIT_CDF2, GET_ORBIT_FITS
ORBIT_FILE_TYPE, RD_CATALOG, SETUP_ASTROM, STARFIELD_EVENT, SUBTENSE, TAI2UTC
TVCIRCLE, UTC2TAI, WRITEFITS [1], WRITEFITS [2], XDISPLAYFILE [1]
XDISPLAYFILE [2], XMANAGER, sohoephem
COMMON BLOCKS:
SIDE EFFECTS:
RESTRICTIONS:
PROCEDURE:
EXAMPLE:
MODIFICATION HISTORY:
Written by: Simon Plunkett, February 1996
(adapted from pointing3.pro).
Adapted to use SOHO orbit parameters from either CDF or FITS
files. 14 March 1997 (SPP).
Removed use of LASCO_ASTROMETRY environment variable for
output. Now writes to current directory. 23-Jun-2000 (SPP).
Use library routines for C2/C3 distortion. 15-Aug-2001 (SPP).
Use default occulter centers for all telescopes, instead of
assuming occulter at center of CCD. 15-Aug-2001 (SPP).
Changes needed in future:
1) Decouple Sun location from occulter center.
011219, NBR - Change "sohoephem3" to "sohoephem"
@(#)starfield.pro 1.3, 12/19/01 : IDL NRL LIBRARY
[Previous]
[Next]
NAME:
STARTFITS
PURPOSE:
Create a blank FITS header and insert initial FITS information.
(SIMPLE=T)
CATEGORY:
File IO.
CALLING SEQUENCE:
STARTFITS,HEADER
INPUTS:
KEYWORD PARAMETERS:
OUTPUTS:
HEADER, a byte array with mostly blanks, updated later with other
FITS header information.
CALLS: ***
PUTFITSVAL
CALLED BY:
FITSBASIC
COMMON BLOCKS:
FITSW, used to keep track of output ROW in FITS HEADER.
SIDE EFFECTS:
RESTRICTIONS:
Can only have one FITS HEADER for output at one time - limit in
FITW common block keeping rowno...
PROCEDURE:
Call STARTFITS first. Call FITSVALUE or FITSTRING repeatedly
Call ENDFITS when HEADER has all required information. Write
Header followed by byteswapped data.
MODIFICATION HISTORY:
Jan. 1990 P. Milford Stanford University.
[Previous]
[Next]
NAME: stat_2d_frm.pro
PURPOSE: Build a image of means and a image of sd (standard deviations)
CATEGORY: General tools high level routines, Statistics.
CALLING SEQUENCE: stat_2d_frm, ima,kx,ky,imb,imc
INPUTS: ima image array
kx step_size in x
ky step_size in y
OPTIONAL INPUT PARAMETERS: None
KEYWORD PARAMETERS: None
OUTPUTS:imb image array of means
imc image array of sd. deviations
OPTIONAL OUTPUT PARAMETERS: None
COMMON BLOCKS: None
SIDE EFFECTS:
RESTRICTIONS:
PROCEDURE:
MODIFICATION HISTORY: defined by ALL 6/24/93
SCCS variables for IDL use
@(#)stat_2d_frm.pro 1.0 25/6/93 :LAS
[Previous]
[Next]
NAME:
STAT_CURSOR.PRO
PURPOSE:
Draws a box in a image and does a statistic (mean and standard
deviation inside
CATEGORY:
??
CALLING SEQUENCE:
STAT_CURSOR, ima
INPUTS:
ima image array (in memory)
KEYWORD PARAMETERS:
None
OUTPUTS:
Values
CALLS: ***
ALIGN1, visu_cal
COMMON BLOCKS:
None.
SIDE EFFECTS:
None
RESTRICTIONS:
PROCEDURE:
Straightforward.
MODIFICATION HISTORY:
Written by A.LL v.1.0 LAS 08/25/93
[Previous]
[Next]
NAME: stat_ima.pro
PURPOSE: local statistics in a image array (in memory)
CATEGORY: General tools high level routine
CALLING SEQUENCE: stat_ima, ima, x1, x2, y1, y2, z
INPUTS: ima image array
x1,x2 x interval of rectangle
y1,y2 y interval of rectangle
OPTIONAL INPUT PARAMETERS: None
KEYWORD PARAMETERS: None
OUTPUTS:z array of values
z(0) = ntot
z(1) = sum
z(2) = moy
z(3) = std
OPTIONAL OUTPUT PARAMETERS: None
CALLED BY:
FILTMEDIAN, crevig, lunuleR1R2d, lux_diff, pattern1 [1], pattern1 [2]
vignettage [1], vignettage [2]
COMMON BLOCKS: None
SIDE EFFECTS:
RESTRICTIONS:
PROCEDURE:
MODIFICATION HISTORY: defined by ALL 6/24/93
SCCS variables for IDL use
@(#)stat_ima.pro 1.0 25/6/93 :LAS
[Previous]
[Next]
NAME: statima.pro
PURPOSE: extract a image from another
CATEGORY: General tools high level routine
CALLING SEQUENCE: extract_ima2, iin, hin, x1, x2, y1, y2, iout, hout
INPUTS: iin image array
hin header of image array
x1,x2 x interval of rectangle
y1,y2 y interval of rectangle
OPTIONAL INPUT PARAMETERS: None
KEYWORD PARAMETERS: None
OUTPUTS:iout extracted image array
hout header for extracted image
OPTIONAL OUTPUT PARAMETERS: None
COMMON BLOCKS: None
SIDE EFFECTS: opens a catalog of darks
RESTRICTIONS:
PROCEDURE:
MODIFICATION HISTORY: defined by ALL 6/24/93
SCCS variables for IDL use
@(#)extract_ima2.pro 1.0 25/6/93 :LAS
[Previous]
[Next]
NAME:
STD_INT_SCALE
PURPOSE:
Scale the intensities of the input image into DN/sec, accounting for
the bias in case of summing.
CATEGORY:
LASCO REDUCTION
CALLING SEQUENCE:
Result = STD_INT_SCALE(Img,Hdr)
INPUTS:
Img = Input Image array.
Hdr = FITS header
KEYWORDS:
None
OUTPUTS:
The function returns a floating point image.
CALLS: ***
FXPAR [1], FXPAR [2], OFFSET_BIAS
PROCEDURE:
The input header is examined to extract the on-chip and off-chip
summing parameters, and the exposure time. The appropriate bias
value is subtracted off the image and then the resultant is
divided by the exposure time.
MODIFICATION HISTORY:
Written, RA Howard, NRL, 22 October 1996
@(#)std_int_scale.pro 1.1 10/22/96 LASCO IDL LIBRARY
[Previous]
[Next]
Name:
STDIMGPLOT
Purpose:
generates standard plots for image analysis
Usage:
STDIMGPLOT,A,Hdr
Inputs:
A = image
Hdr = FITS header, header structure
SCCS variables for IDL use
%W% %H% :NRL Solar Physics
CALLS:
[Previous]
[Next]
Name:
STDIMGPLOT2
Purpose:
generates standard plots for analysis of 64x1024 images
Usage:
STDIMGPLOT2,A,Hdr
Inputs:
A = image
Hdr = FITS header
%W% %H% :LASCO IDL LIBRARY
CALLS:
[Previous]
[Next]
Project : SOHO - CDS
Name : STDNAME2USER()
Purpose : Converts CDS standard line names to user format.
Explanation : Spectral lines in the CDS software have an associated 'name'.
This name is also allocated to the data extraction window
derived from the line. For ease of use the internal format
used is of the form N_5_1234.5 ie the element, the ionization
level and the wavelength separated by underscores. Since users
may prefer to refer to the line by a name using another format
this routine is provided to try and translate between the two.
Use : IDL> uname = stdname2user(std_name[,form=form,$
errmsg=errmsg,$
no_wave=no_wave])
Inputs : std_name - standard internal CDS line name as created by
ANYNAME2STD().
Opt. Inputs : form - specifies option for format of the output.
Default (form=0) is 'Fe 10 123.4'
form=1 is 'Fe X 123.4'
(More later)
Outputs : Function returns userversion of name or null string
if an error is detected.
Opt. Outputs: None
Keywords : ERRMSG - if this variable is defined on entry, any error
messages will be returned in it.
eg IDL> errmsg = ''
IDL> un = stdname2user(std, errmsg=errmsg)
ISL> if errmsg ne '' then print,errmsg
----> 'Input not in standard format'
NO_WAVE - if present the wavelength field is suppressed.
Calls : ***
STR_SEP
Common : None
Restrictions: None
Side effects: None
Category : Util, string
Prev. Hist. : None
Written : C D Pike, RAL, 6-Mar-95
Modified : Handle '?' fields from CDS line list. CDP, 7-Mar-95
Version : Version 2, 7-Mar-95
[Previous]
[Next]
NAME:
STEPPER
PURPOSE:
Step through individual images a single frame at a time.
SAMPLE CALLING SEQUENCE:
STEPPER, DATA
STEPPER, INDEX, DATA
STEPPER, INDEX, DATA, INFO_ARRAY
STEPPER, DATA, INFO_ARRAY ; Info can be the 2nd parameter
STEPPER, INDEX, DATA, /FILTER_PANELS ; To show each filter separate
INPUTS:
DATA = Three-dimensional array
OPTIONAL INPUTS:
INDEX = The index structure that goes with the data
INFO_ARRAY = descriptive text string (pass as parameter or keyword)
OPTIONAL INPUT KEYWORDS:
XSIZE,YSIZE = If present, the routine will use rebin to using the
the /sample option. If only XSIZE is present, YSIZE
will be set equal to XSIZE.
If one of the "panels" options is used, then this is the
size of a single panel (the size that a single image
should be displayed)
START = Index of starting image
INFO_ARRAY = String array containing descriptive text
NOSCALE = If set, will turn off tvscale
SUBSCRIPT = Subset of array is displayed.
MOVIE = If present and =1, will initiate movie mode when called
INTERP = Controls how REBIN is done. If present and set to 1,
/INTERP ==> REBIN(A,xsize,ysize)
else ==> REBIN(A,xsize,ysize,/sample)
COLOR = The color to use for displaying the info text string.
noinfo - If set, then do not build the INFO_ARRAY string even
when the index is passed in.
panels - An array with the same number of images as the data saying
which panel to display the image in (ie: 0,1,2,3,0,1,2...).
This allows images from a different filters to be displayed
in a different region on the x-window.
filter_panels - If set, then build the "panels" array based on the
unique filters
sequence_panels - If set, then build the "panels" array based on the
SXT sequence number
nolcur - If set, then stepper is being called from LCUR_IMAGE and
it should not allow the LCUR option to be used
VERSION:
V1.2 17-NOV-92
V2.0 19-Oct-93
CALLS: ***
STEPPER_S1, UNIQ [1], UNIQ [2], UNIQ [3], data_type [1], data_type [2], get_info [1]
get_info [2], get_info [3], get_info [4], gt_filta, gt_filtb, gt_seq_num
CALLED BY:
ALIGN1BIGGRAM, BOX_LC, LAY1GKM, PIXEL_LC, ext_subset [1], ext_subset [2], fstepper
go_nvs4, lastsfd [1], lastsfd [2], lastspd, lcur_image, video_title, wdefroi [3]
wdefroi [4]
HISTORY:
Written 20-sep-91, JRL and LWA
Updated 21-sep-91, JRL: Added xloadct and zoom options.
Updated 24-sep-91, JRL: Added SUBSCRIPT and MOVIE options.
Updated 2-dec-91, JRL: Break the text string into two lines if
info_array is > 44
Updated 15-dec-91, slf; Replaced get_kbrd calls with get_kbrd2
to work around SGI anomoly
Updated 16-apr-92, slf; To work with single image
Updated 28-apr-92, JRL: Break text if strlen(info) > 38
Updated 29-apr-92, JRL: Added the INTERP keyword
Updated 17-nov-92, JRL: Added color keyword. Allow info_array to
be a 2nd parameter
Updated 15-mar-93, JRL: Added an option to call profiles
Updated 13-may-93, SLF; Return last selected in lastss
------------------------------------------------------------
Updated 17-Oct-93, MDM; Broke the routine into two parts
Allowed new options
"g" will plot sxt grids
"l" will call LCUR_PLOT to plot curves
"h" will make hardcopies
"c" will call loadct
different panels for different filters
Updated 29-Nov-93, MDM; Added NOLCUR option
Updated 24-Aug-94, MDM; Added NONORMALIZE option
[Previous]
[Next]
NAME:
STEPPER
PURPOSE:
Step through individual images a single frame at a time.
INPUTS:
DATA = Three-dimensional array
OPTIONAL INPUT KEYWORDS:
XSIZE,YSIZE = If present, the routine will use rebin to using the
the /sample option. If only XSIZE is present, YSIZE
will be set equal to XSIZE.
START = Index of starting image
INFO_ARRAY = String array containing descriptive text
NOSCALE = If set, will turn off tvscale
SUBSCRIPT = Subset of array is displayed.
MOVIE = If present and =1, will initiate movie mode when called
INTERP = Controls how REBIN is done. If present and set to 1,
/INTERP ==> REBIN(A,xsize,ysize)
else ==> REBIN(A,xsize,ysize,/sample)
COLOR = The color to use for displaying the info text string.
nolcur - If set, then stepper is being called from LCUR_IMAGE and
it should not allow the LCUR option to be used
VERSION:
V1.2 17-NOV-92
CALLS: ***
LOADCT, PROFILES [1], PROFILES [2], STEPPER_S1, SXT_GRID [1], SXT_GRID [2]
SXT_GRID [3], XLOADCT [1], XLOADCT [2], XLOADCT [3], ZOOM, data_type [1]
data_type [2], get_logenv [1], get_logenv [2], gt_pfi_ffi, hardcopy [1]
hardcopy [2], input [1], input [2], lcur_image, pfi_loc, tbeep [1], tbeep [2]
tbeep [3]
CALLED BY:
ALIGN1BIGGRAM, BOX_LC, LAY1GKM, PIXEL_LC, ext_subset [1], ext_subset [2], fstepper
go_nvs4, lastsfd [1], lastsfd [2], lastspd, lcur_image, video_title, wdefroi [3]
wdefroi [4]
HISTORY:
Written 20-sep-91, JRL and LWA
Updated 21-sep-91, JRL: Added xloadct and zoom options.
Updated 24-sep-91, JRL: Added SUBSCRIPT and MOVIE options.
Updated 2-dec-91, JRL: Break the text string into two lines if
info_array is > 44
Updated 15-dec-91, slf; Replaced get_kbrd calls with get_kbrd2
to work around SGI anomoly
Updated 16-apr-92, slf; To work with single image
Updated 28-apr-92, JRL: Break text if strlen(info) > 38
Updated 29-apr-92, JRL: Added the INTERP keyword
Updated 17-nov-92, JRL: Added color keyword. Allow info_array to
be a 2nd parameter
Updated 15-mar-93, JRL: Added an option to call profiles
Updated 13-may-93, SLF; Return last selected in lastss
------------------------------------------------------------
17-Oct-93 (MDM) - Broke the routine into two parts
Allowed new options
"g" will plot sxt grids
"l" will call LCUR_PLOT to plot curves
"h" will make hardcopies
"c" will call loadct
different panels for different filters
19-Oct-93 (MDM) - Allowed exit from STEPPER when using q to exit movie
25-Oct-93 (MDM) - Added passing NOSCALE parameter to LCUR_IMAGE
29-Nov-93 (MDM) - Added NOLCUR option
- Added /NORMALIZE to LCUR_IMAGE call
10-Jan-94 (MDM) - Added "O" option - obs region location
11-Jan-94 (MDM) - Corrected "O" option
21-Feb-94 (MDM) - Added "W" option - calls WSHOW to pop the window
- Replaced call to GET_KBRD2 with GET_KBRD
18-Apr-94 (MDM) - Added /NODEL_WIN_P to not delete window after light
curve plot is made
10-Jun-94 (MDM) - Added option to establish the breakpoint location
in the info_array by setting STEPPER_BREAK
24-Aug-94 (MDM) - Added NONORMALIZE option
[Previous]
[Next]
Name: stepper_title
Purpose: overly title on graphics device for stepper/xstepper
History - slf, 10-Jun-92 - provide single point maint for title
slf, 31-aug-93 - add charsize and color keywords
Side Effects - title is written to default graphics device
CALLED BY
chk_pointing, get_daily [1], get_daily [2], lastsfd [1], lastsfd [2], update_image
xspr [1], xspr [2], xstepper_event
[Previous]
[Next]
Project : SOHO - CDS
Name :
STORE_ARRAY
Purpose :
Insert array into an array of arrays.
Explanation :
Inserts array INSERT into array DESTINATION, allowing the dimensions of
DESTINATION to adjust to accommodate it.
Use :
STORE_ARRAY, DESTINATION, INSERT, INDEX
Inputs :
DESTINATION = Array to be expanded.
INSERT = Array to insert into DESTINATION.
INDEX = Index of the final dimension of DESTINATION to insert
INSERT into.
Opt. Inputs :
None.
Outputs :
DESTINATION = Expanded output array. If both input arrays have the
same number of dimensions, then the DESTINATION will
be replaced with INSERT.
Opt. Outputs:
None.
Keywords :
None.
Calls :
None.
CALLED BY:
FXBPARSE [1], FXBPARSE [2]
Common :
None.
Restrictions:
DESTINATION and INSERT have to be either both of type string or both of
numerical types.
INSERT must not have more dimensions than DESTINATION.
Side effects:
None.
Category :
Utilities, Arrays.
Prev. Hist. :
William Thompson, Feb. 1992, from BOOST_ARRAY by D. Zarro and P. Hick.
Written :
William Thompson, GSFC, February 1992.
Modified :
Version 1, William Thompson, GSFC, 12 April 1993.
Incorporated into CDS library.
Version :
Version 1, 12 April 1993.
[Previous]
[Next]
Project : SOHO - CDS
Name : STORE_WND
Purpose : Store data from read_cds into a CDS QLDS
Explanation : Stores detector data from Data.Array into:
Det.DetData(currentix:stopix
[,0:size_dimension_2
[,0:size_dimension_3]] )
The number of indexes depends on the dimensionality of the
data.
- Updates CurrentIx to point to the next free index.
- Stores indexes (to Det.DetData) for this data window into
Det.DetDesc(WndNo).ixstart/ixstop
Use : STORE_WND,WINDOW_NO,CURRENT_INDEX,DET,DATA
Inputs : WINDOW_NO :
The index (into DET.DETDESC) of the
detector data window in question.
CURRENT_INDEX:
The index (into DET.DETDATA's first dimension) of
where a block of detector data may be placed.
DET : An IDL structure containing the tags DetDesc and
DetData, as described in the CDS QL Data Format.
DATA: An IDL structure returned from READ_CDS after
a successful read of detector data.
DDIMS: The number of dimensions in the data block
Opt. Inputs : None.
Outputs : CURRENT_INDEX:
is updated to point to the room after
the current block of data in DET.DETDATA
DET.DETDATA: The data from DATA.ARRAY i stored here under
the old storage system. The data is stored
as handle values (detdesc.handle) under the
new system.
DET.DETDESC.IXSTART,
DET.DETDESC.IXSTOP:
Indexes into DET.DETDATA for the current detector
data window.
Opt. Outputs: None.
Keywords : None.
Calls : ***
DATATYPE [1], DATATYPE [2], DATATYPE [3], QL_SIZE, ST_WINDATA, TAG_EXIST [1]
TAG_EXIST [2]
CALLED BY:
DETREAD
Common : None.
Restrictions: See the data formats.
Side effects: None.
Category : Data_Handling, CDS, QuickLook, Internal
Prev. Hist. : None.
Written : Stein Vidar Hagfors Haugan, 27 September 1993
Modified : SVHH, 20-Feb-1995: Uing QL_SIZE() instead of
SIZE() to stop trailing singular dimensions
from disappearing.
Version 2, SVHH, 21-Aug-1995
Modified the call to QL_SIZE to save
memory.
Version 3, SVHH, 12 August 1996
New version compatible with both old and new
storage system.
Version 4, SVHH, 1 October 1996
Improved speed in calculation of min/max values.
Version : 4, 1 October 1996
[Previous]
[Next]
Project : SOHO - CDS
Name : STORESUMWND
Purpose : Store SUMER data from READSUMCOL into a CDS QLDS
Explanation : SUMER version of CDS routine STORE_WND.
Stores detector data from Data.Array into:
Det.DetData(currentix:stopix
[,0:size_dimension_2
[,0:size_dimension_3]] )
The number of indexes depends on the dimensionality of the
data.
- Updates CurrentIx to point to the next free index.
- Stores indexes (to Det.DetData) for this data window into
Det.DetDesc(WndNo).ixstart/ixstop
Use : STORESUMWND,WINDOW_NO,CURRENT_INDEX,DET,DATA
Inputs : WINDOW_NO :
The index (into DET.DETDESC) of the
detector data window in question.
CURRENT_INDEX:
The index (into DET.DETDATA's first dimension) of
where a block of detector data may be placed.
DET : An IDL structure containing the tags DetDesc and
DetData, as described in the CDS QL Data Format.
DATA: An IDL structure returned from READSUMCOL after
a successful read of detector data.
DDIMS: The number of dimensions in the data block
Opt. Inputs : None.
Outputs : CURRENT_INDEX:
is updated to point to the room after
the current block of data in DET.DETDATA
DET.DETDATA: The data from DATA.ARRAY i stored here.
DET.DETDESC.IXSTART,
DET.DETDESC.IXSTOP:
Indexes into DET.DETDATA for the current detector
data window.
Opt. Outputs: None.
Keywords : None.
Calls : ***
QL_SIZE
CALLED BY:
SUMDETREAD
Common : None.
Restrictions: See the data formats.
Side effects: None.
Category : Data_Handling, CDS, SUMER, QuickLook, Internal
Prev. Hist. : Converted from STORE_WND by Stein Vidar Hagfors Haugan
Written : William Thompson, GSFC, 5 July 1996
Modified : Version 1, William Thompson, GSFC, 5 July 1996
Version : Version 1, 5 July 1996
[Previous]
[Next]
NAME:
STR2ARR
PURPOSE:
Convert delimited string into string array
CALLING SEQUENCE:
STR2ARR, text [, delim=delim]
INPUTS:
TEXT - string, (for example,extracted from SXT generic file)
OUTPUTS:
ARRAY - string array, number elements=number of delimeters+1
COMMON BLOCKS;
NONE
CALLS: ***
deriv_arr [1], deriv_arr [2]
CALLED BY:
ACOPY [1], ACOPY_TEST, BCS_INFIL, BSC_CHAN, CATEGORY, CDS_WAVE_CAT, CHIANTI_NE
CHIANTI_TE, CkFurFiles, DB_CHECK, DISK_SUMMARY, DsetVec, EIS_IMAGE_TOOL_EVENT [1]
EIS_IMAGE_TOOL_EVENT [2], EXP_DBASE, Energy_res [2], FIND_CAT, FIX_DATE
FTP__DEFINE, F_CON_LIN, GET_BSA_ANS [1], GET_BSA_ANS [2], GET_SOHO_ROLL, GET_SSWDB
GE_WINDOW_SIM, GIS_HV_CAL, GT_CDS_WINDOW, HESSI FRAMEWORK TEMPLATE CLASS [2]
HESSI FRAMEWORK TEMPLATE CLASS [3], HSI_CLKDELTAFILETIME_2_UT
HSI_DRM_MOD CLASS, HSI_DRM_MOD_CONTROL__DEFINE, HSI_RD_FITS_SPECTRUM
HTTP__DEFINE, IMAGE_TOOL_EVENT, INDEX2MAP, ITOOL_GETFILE, KILL_JOB, KeySea [1]
KeySea [2], KeySearch, LIST_GEV, LIST_NAR, Load_recs, MAKE_ION_LIST, MAKE_STR [1]
MAKE_STR [2], MAX_TEMP, MERGE_DISCSP_HKG_OCC, MK_PLAN_FORM, MK_PLAN_POINT, MK_SOHO
MK_SOHO_TARGET, MkFnMapMake Filename Map, MkInsArr, Modify_Merge_list [1]
Modify_Merge_list [2], OCC_DBASE, OP_COM [1], OP_COM [2], PARSE_GROSSC_ATTITUDE
PLOT_MAP, PRINT_GEV, PRINT_NAR, PRINT_STR, PURPOSE, ParsKey, QL_RD_LLIST, RD_CHIANTI
RD_GEN [1], RD_GEN [2], RD_LINE_LIST, RD_SERTS, RD_TAR, READ_ANALIST, READ_KAP_ITEM
REORDER_PATH, RdTap [1], RdTap [2], RdTap [3], SETUP_DRM, SHOW_EVARS, SITE__DEFINE
SOHO_CAMPAIGN, SOHO_ITEMS_HTML, SPEX_DRM__DEFINE, SPEX_FIT__DEFINE
SPEX_THISTORY [1], SPEX_THISTORY [2], STR_DEBLANK, STR_EXPAND, STR_MATCH, STR_SEP2
SUMM_CALS, SYNOP_DB__DEFINE, SYNOP_DEFINE, Strs2Mat, TrimDvec, UNIX_CMD [1]
UNIX_CMD [2], UPDATE_CAMPAIGN, UPDATE_DEX, WLOADC, XCAT, XSTRUCT, align_label, ar_prep
break_doc [1], break_doc [2], break_doc [3], cal_fig_mich, cat_form
cdrom_files [2], check_process [1], check_process [2], chkffscl, compare_resp
ctraj2orbit, db_gbo, dbase2disk, dejitter, disk_monitor [1], disk_monitor [2]
diskfree [1], diskfree [2], disp_sci160k [1], disp_sci160k [2], disp_therm_rs232
doc1liners, eit_genx_cat, expand_dirs, extract_val, file_info [1], file_info [2]
file_info2 [1], file_info2 [2], file_purge [1], file_purge [2], files_since [1]
files_since [2], fit_comp_kw, fits2rm, fitstap2tap [1], fitstap2tap [2], fix_path
fl_summary [1], fl_summary [2], fl_summary [3], flare_hist, flares2disk
fmt_doc [1], fmt_doc [2], fmt_doc [3], gen_fn [1], gen_fn [2], get1gbo
get_atomic [1], get_atomic [2], get_bsc_anno, get_dn_rate [1], get_dn_rate [2]
get_eit_info, get_fninfo, get_group, get_hk_info [1], get_hk_info [2]
get_host [1], get_host [2], get_infox, get_ksc_holiday, get_selsis, get_site
get_visible, getm1ans, gettime, go_batch [1], go_batch [2], go_mk_cd, go_nvs4
go_rdtap [1], go_rdtap [2], go_yo_prod_batch, goes3sec_copy, goes_plot [1]
goes_plot [2], goes_plot [3], goes_plot [4], goes_plot [5], goes_value2class
gt2exe [1], gt2exe [2], gt_yo_station, hist_count, hist_summary, hsi_1orbit_allpak
hsi_get_file_verno, hsi_get_flare_flags, hxt_rdpara, idl_server_control, ihy_db
img_sumtr2, index2fov, ip_que_dmpver, is_alive [1], is_alive [2], is_bestnode [1]
is_bestnode [2], is_open, jitter_gif_xyimg, keyword_db, killold [1], killold [2]
ksc_commands, lapalma_cat, lastgki, make_32 [2], make_views, map2index, mdilaser
mk_bad_pix_map_load, mk_cd [1], mk_cd [2], mk_dpc_image, mk_formt_html [1]
mk_formt_html [2], mk_formt_html [3], mk_hst_summary, mk_mapfile [1]
mk_mapfile [2], mk_sdc [2], mk_sdc [3], mk_sdc [4], mk_sfc [1], mk_sfc [2]
mk_ssc_batch [1], mk_ssc_batch [2], mk_vcr, mktap, mo_check, mo_filelist, mo_patch
modvolume_inf [1], modvolume_inf [2], momount, mon_sci5k, mreadfits_fixup
newfiles [1], newfiles [2], newfiles [3], nn_rd2_sxt_noaa, nn_rd_sxt_noaa
op_rd_special, op_term_score, orcent, path_ucon, pathfix, plot_ace, pr_his_index [1]
pr_his_index [2], pr_his_index [3], pr_path [1], pr_path [2], pr_visible
prcols [1], prcols [2], prcols [3], pro_list [1], pro_list [2], rd_atodat [1]
rd_atodat [2], rd_fdss_durevt_fil, rd_fdss_orbevt_fil, rd_fdss_viewpd_fil
rd_ionbal [1], rd_ionbal [2], rd_pkt_head [1], rd_pkt_head [2], rd_rasm
rd_raw_station_plan, rd_selsis, rd_soup, rd_srspas, rd_taer, rd_tfile [1]
rd_tfile [2], rd_tr_seq_head, rd_trace_i0 [1], rd_trace_i0 [2], rd_ulin_col
rd_video_menu, read_eit, read_mdi, redo_disploi, redo_mon_sci5k, reg_check
required_tags, run_dsnfil, savegen [1], savegen [2], set_fastpath [1]
set_fastpath [2], set_logwindows, setssw_windows, soon_cadence, soon_catstat
soon_table, sooncat_cadence, special_movie, spex_convert_results [1]
spex_convert_results [2], spex_hessi_image__define, ssw_addmm_gen, ssw_bin
ssw_check_contrib, ssw_contrib_info, ssw_contrib_monitor
ssw_contrib_ok2online, ssw_findstuff2html, ssw_fs_maskdbase, ssw_getapplet
ssw_getcme_cdaw, ssw_getdst, ssw_install [1], ssw_install [2]
ssw_install_explinkages, ssw_instr_info, ssw_instruments, ssw_javamovie
ssw_packages, ssw_path, ssw_set_chianti, ssw_set_instr, ssw_start_rpcserver
ssw_track_demo, ssw_upgrade [1], ssw_upgrade [2], ssw_upgrade_backup, sswdb_info
sswdb_upgrade, sswstruct_fill [1], str_pow_conv, str_replace [1]
str_replace [2], str_subset, strfind_urls, struct2fitshead, sw_tape, sxt_prep_exe
sxt_ssc2file, syst2ex [1], syst2ex [2], syst2ex [3], table2struct, term_times
timeline, timstr2ex [1], timstr2ex [2]
to check data generated by the IP instruction TWAVG
to return information about a function which can consist of multiple
topsdb [1], topsdb [2], tr_rd_index, tr_rd_inventory, trace_cosmic2hist_accum
trace_dph2struct [1], trace_files, trace_get1www_image, trace_goodobs
trace_make_tmr [1], trace_make_tmr [2], trace_movie_index [1]
trace_movie_index [2], trace_movies_prioritize [1]
trace_movies_prioritize [2], trace_prioritize_um, trace_special_movie [1]
trace_special_movie [2], trace_special_movie [3], trace_special_movie2
trace_struct2filename, trace_uniq_movies, trace_wave2point, trace_wavename2num
url_decode, url_encode, valid_pass4 [1], valid_pass4 [2], video_title
wc_where [1], wc_where [2], web_seq, where_pattern [1], where_pattern [2]
wrttapdir, wrtwkdat, wwwidl_server_check, x_new hsi_set_file_vernofilex verno
xcheckip, xdate [1], xdate [2], xdisp_fits, xhkplot, xset_chain [1], xset_chain [2]
xsw2tree, xsw2tree_event, xswlist [2], xsxt_prep_event, ycopy, ydb_install [1]
ydb_install [2], ydump, yoh_orb_interp [1], yoh_orb_interp [2], yow_sz [1]
yow_sz [2], ys_contrib [1], ys_contrib [2]
RESTRICTIONS:
MODIFICATION HISTORY:
Version 0 - SLF, 5/9/91
slf - feature correction (occur is array, then prob.)
slf - 25-feb-92 - added positional delim parameter
slf - 2-feb-93 - changed recursion to loop for memory problems
slf - 19-mar-93 - optimize case where delimiter is 1 character (comma)
slf - 20-mar-93 - fixed a minor bug with major implications
[Previous]
[Next]
Name: str2cols
Purpose: break strarry into columns
Input Parameters:
inarr - string or string array to break
Optional Keyword Parameters:
ncols - number of columns in output (default is auto at line1 delimiter)
colpos - user supplied position breaks (default is via delimiter search)
CALLS: ***
data_chk [1], data_chk [2], deriv_arr [1], deriv_arr [2], remtab [1], remtab [2]
CALLED BY:
READ_ANALIST, cdrom_files [2], cont2time [1], cont2time [2]
fit_model_components, flares2disk, ftp_copy_new, ftp_list_since, get_selsis
get_utevent [1], get_utevent [2], get_uvxsections, go_yo_prod_batch
gtt_wave_tru, hessi_var, hsi_params_write_pro, hsi_plot_flux, idl_server_control
killold [1], killold [2], map_env2dir, mk_sfc [1], mk_sfc [2], mk_ssc_batch [1]
mk_ssc_batch [2], mo_patch, mobad_summ, msok_copy_jpg, msok_poi_copy [1]
msok_poi_copy [2], password_info, pctime2ssw, rd_exec_synop_index, rd_tfiles
rd_ulin_col, rmosaic [1], rmosaic [2], rmosaic [3], set_logwindows, show_contacts
soon_cadence, soon_catstat, soon_table, ssw_contrib_monitor, ssw_findstuff2html
ssw_getcme_cactus, ssw_getcme_cdaw, ssw_install [2], ssw_sec_aktxt2struct
ssw_swmap_info, ssw_swmap_uniqinfo, sswdb_info, sswdb_install
sswstruct_fill [1], sxt_patch_att, sxt_plan, tim2dbase, tr_decode_head [1]
tr_decode_head [2], tr_summary_head, trace_get1www_image, trace_success_file
trace_uniq_movies, track_proc [1], track_proc [2], unixtime2ex, uvf_interval
xgen_widget, xhkplot, ydb_use
History:
19-May-1994 (SLF) Written
2-Jun-1994 (SLF) call revised remtab if delimiter is blank
3-Jun-1994 (SLF) return value order = arr(cols,rows)
29-Jun-1994 (MDM) modified to mark delimitors at the left edge of
the first occurance of the delimitor, not the right
edge. This is done because unformatted print statements
are right justified and the length of the non-blank
portion varies depending on the value
[Previous]
[Next]
Name: str2html
Purpose: format a block of free-form ascii text into a standard 'html'
Input Parameters:
text - string array to convert to html
link_text - if present, lable links with this text
(default = "More Information"
Method:
identify tables - block with <p><pre>TABLE</pre> ;
replace null lines with <p> ; paragraph
insert link when full URL supplied
CALLS: ***
UNIQ [1], UNIQ [2], UNIQ [3], deriv_arr [1], deriv_arr [2], remtab [1], remtab [2]
str_replace [1], str_replace [2], strlist2html [1], strlist2html [2]
wc_where [1], wc_where [2], where_table [1], where_table [2], where_table [3]
where_title [1], where_title [2]
CALLED BY:
genx2html [1], genx2html [2], go_sxt_sss2secondary, html_linklist, image2movie
soon_catstat, soon_search_www, special_movie, ssw_findstuff2html
ssw_install [1], ssw_install [2], sxt_ssn2fits [1], thumbnail_table_html
timeline, topsdb [1], topsdb [2], trace_movie_index [1], trace_movie_index [2]
web_seq, xset_chain [1], xset_chain [2]
History:
29-mar-1995 (SLF)
2-jun-1995 (SLF) - add auto links and NOLINKS keyword
6-jun-1995 (SLF) - add auto-title & auto <hr>
26-jul-1995 (SLF) - add call to strlist2html
8-aug-1995 (SLF) - fixed typo in ascii URL->html reference code
25-aug-1995 (SLF) - add LINK_TEXT keyword
23-aug-1995 (SLF) - allow LINK_TEXT to be a vector
(to format linked diretory lists, for example)
[Previous]
[Next]
Name: str2number
Purpose: return numeric part of a string or string array
Input Parameters:
strarr - string or string array which contain numeric info
Output:
Function returns numeric array (long or floating, as appropriate)
For elements w/no numeric info, output set to zero (0)
Calling Sequence:
numbers=str2number(strarr) ; return numeric portion of strarr
Calling Example:
IDL> print,str2number(['as34','asdfsadf','a234.5','asdf-8.734asdf'])
% STR2NUMBER: Some input contains no numeric data (set those to zero)
34.0000 0.00000 234.500 -8.73400
CALLED BY:
get_history, get_xfont [1], get_xfont [2], lasco_time2file, merge_genxcat
mk_week_file [1], mk_week_file [2], plot_ace, reltime [1], reltime [2]
soon_search_www, ssw_fov_context, ssw_getcme_cactus, ssw_kyoto2dst
ssw_unspike_cube, sswstruct_fill [1], trace_cosmic2hist_accum
trace_get_vignette, trace_movie_context, trace_unspike_time, update_history
History:
1-May-1995 (SLF) Written (to return font sizes orignially)
form='FONTNAMEfonssize'
Method:
make non-numeric characters blanks and eliminate with strcompress
Restrictions:
exponential format not recognized
[Previous]
[Next]
Project : SOHO - CDS
Name : STR2UTC()
Purpose : Parses UTC time strings.
Explanation : This procedure parses UTC time strings to extract the date and
time.
Use : Result = STR2UTC( UTC )
Result = STR2UTC( UTC, /EXTERNAL )
Inputs : UTC = A character string containing the date and time. The
target format is the CCSDS ASCII Calendar Segmented
Time Code format (ISO 8601), e.g.
"1988-01-18T17:20:43.123Z"
The "Z" is optional. The month and day can be
replaced with the day-of-year, e.g.
"1988-018T17:20:43.123Z"
Other variations include
"1988-01-18T17:20:43.12345"
"1988-01-18T17:20:43"
"1988-01-18"
"17:20:43.123"
Also, the "T" can be replaced by a blank, and the
dashes "-" can be replaced by a slash "/". This is
the format used by the SoHO ECS.
In addition this routine can parse dates where only
two digits of the year is given--the year is assumed
to be between 1950 and 2049. Character string
months, e.g. "JAN" or "January", can be used instead
of the number.
Dates in a different order than year-month-day are
supported, but only through the /MDY and /DMY
keywords. The only exceptions are dates where the
month is given as a character string, and the year is
given with all four digits, e.g. "18-JAN-1988" or
"Jan-18-1988".
Opt. Inputs : None.
Outputs : The result of the function is a structure containing the (long
integer) tags:
MJD: The Modified Julian Day number.
TIME: The time of day, in milliseconds since the
beginning of the day.
Alternatively, if the EXTERNAL keyword is set, then the result
is a structure with the elements YEAR, MONTH, DAY, HOUR,
MINUTE, SECOND, and MILLISECOND.
Any elements not found in the input character string will be
set to zero.
Opt. Outputs: None.
Keywords : EXTERNAL = If set, then the output is in CDS external format,
as described above.
DMY = Normally the date is in the order year-month-day.
However, if DMY is set then the order is
day-month-year.
MDY = If set, then the date is in the order
month-day-year.
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 = STR2UTC( UTC, ERRMSG=ERRMSG )
IF ERRMSG NE '' THEN ...
Calls : ***
DATATYPE [1], DATATYPE [2], DATATYPE [3], DATE2MJD [1], DATE2MJD [2], DATE2MJD [3]
MJD2DATE, STR_SEP, UTC2INT [1], UTC2INT [2], UTC2INT [3], VALID_NUM [1]
VALID_NUM [2], VALID_NUM [3]
CALLED BY:
ADJUST_DATE_OBS, ANYTIM2UTC [1], ANYTIM2UTC [2], C2_CALFACTOR, C2_CALIBRATE
C3_CALFACTOR [1], C3_CALIBRATE, CAT_FITS, CDS_OUTPLOT, CDS_UTPLOT, CDS_UTSTRING
COMBINE_MVI, COMB_FULL_EQ, DAYS2LAUNCH, DOY2UTC, GETBKGIMG, GET_CAL_STRUCT
GET_CROTA, GET_ORBIT_CDF, GET_SUN_CENTER [1], GT_DURATION, GT_START, KAP_DATE, KDAY
LIST_FITS, LOCAL_DIFF, MAKE_ALL_DAYS, MAKE_ALL_MINDAYS, MAKE_ALL_MONEXP
MAKE_ALL_MONTHS, MAKE_DAILY_IMAGE, MAKE_FITS_HDR, MAKE_GIFS, MKMOVIE
MKMOVIE0 obsolete version of mkmoviepro, MKMOVIEM, MKMOVIEWLC, MKMOVIE_kpd
MK_ALL_MIN, MK_DAILY_C1_MED, MK_DAILY_MED, MK_DAILY_MIN, MK_IMG, MK_MONTHLY_MIN
MLO_FITSHDR2STRUCT, MONITOR_EXP, MVI2FRAMES, OCCLTR_CNTR, OFFSET_BIAS, PB_INVERTER
PLOT_CDS_CRAYS, PLOT_EXPINT, PLOT_EXP_FACTOR, PLOT_HT, PLOT_RASTER, PLOT_SCI_TLM
PLOT_TEMP_POS, READ_CARR_LONG, READ_DOOR_STATUS, READ_HT, READ_MSP_ITEM
READ_OCC_DAT, REDUCE_IMG_HDR, REDUCE_MAIN, REDUCE_TRANSFER, REGEN_SYNOP, REMOVE_CR
ROLL_TIMES, RTMOVIE, RTMVI [1], RTMVIPLAY [1], RTMVIPLAY [2], RTMVIPLAYPNG
SHOW_PLAN, SYNOPTIC_STATS, UNPACK_LZ_SCIENCE, UPDATE_HDR_ROLLXY, UPDATE_MPG
UTC2DOW, UTC2DOY, UTC2INT [1], UTC2INT [2], UTC2INT [3], UTC2TAI, V4MCART, V4MSPH
WMESSAGE [1], WPLOT_NONOP, WPLOT_SUBHTR [2], WRITE_HT, WRITE_SUMMARIES [1]
WSAVE_PS [2], XCME_MES, XCOR_CDS, YYMMDD2UTC, carrmapmaker2
cmap2gif ftsfile maxdmind ROOTroot CONTROLcontrol, cube_interp, datify
get_soho_ephem, later
rt_carrmapmaker yymmdd num_r rad limb wlimb hdr disp saveset nextrot
zcheck_hdr, zintervals, zpb0r [1], zpb0r [2], zstr2utc [1], zstr2utc [2]
Common : None.
Restrictions: The components of the time must be separated by the colon ":"
character, except between the seconds and fractional seconds
parts, where the separator is the period "." character.
The components of the date must be separated by either the dash
"-" or slash "/" character.
The only spaces allowed are at the beginning or end of the
string, or between the date and the time.
This routine does not check to see if the dates entered are
valid. For example, it would not object to the date
"1993-February-31", even though there is no such date.
Side effects: If an error is encountered and the ERRMSG keyword is set,
STR2UTC returns an integer scalar equal to -1.
Category : Utilities, Time.
Prev. Hist. : Part of the logic of this routine is taken from TIMSTR2EX by M.
Morrison, LPARL. However, the behavior of this routine is
different from the Yohkoh routine. Also, the concept of
"internal" and "external" time is based in part on the Yohkoh
software by M. Morrison and G. Linford, LPARL.
Written : William Thompson, GSFC, 13 September 1993.
Modified : Version 1, William Thompson, GSFC, 21 September 1993.
Version 2, William Thompson, GSFC, 28 September 1993.
Expanded the capabilities of this routine based on
TIMSTR2EX.
Version 3, William Thompson, GSFC, 20 October 1993.
Corrected small bug when the time string contains
fractional milliseconds, as suggested by Mark Hadfield,
NIWA Oceanographic.
Version 4, William Thompson, GSFC, 18 April 1994.
Corrected bugs involved with passing arrays as
input--routine was not calling itself reiteratively
correctly.
Version 5, Donald G. Luttermoser, GSFC/ARC, 28 December 1994
Added the keyword ERRMSG.
Version 6, William Thompson, GSFC, 25 January 1995
Changed to call intrinsic ROUND instead of NINT. The
version of NINT in the Astronomy User's Library doesn't
automatically select between short and long integers as
the CDS version does.
Version 7, William Thompson, GSFC, 26 January 1995
Modified to support VMS-style format.
Made error-handling more robust.
Version 8, Donald G. Luttermoser, GSFC/ARC, 30 January 1995
Added ERRMSG keyword to internally called procedures.
Note that this routine can handle both scalars and
vectors as input.
Version 9, William Thompson, GSFC, 2 February 1995
Fixed bug with years input with two-digits.
Version 10, William Thompson, GSFC, 22 March 1995
Fixed bug when date string contains OCT in capital
letters.
Version : Version 10, 22 March 1995
[Previous]
[Next]
Project : SOHO - CDS
Name : STR2UTC()
Purpose : Parses UTC time strings.
Explanation : This procedure parses UTC time strings to extract the date and
time.
Use : Result = STR2UTC( UTC )
Result = STR2UTC( UTC, /EXTERNAL )
Inputs : UTC = A character string containing the date and time. The
target format is the CCSDS ASCII Calendar Segmented
Time Code format (ISO 8601), e.g.
"1988-01-18T17:20:43.123Z"
The "Z" is optional. The month and day can be
replaced with the day-of-year, e.g.
"1988-018T17:20:43.123Z"
Other variations include
"1988-01-18T17:20:43.12345"
"1988-01-18T17:20:43"
"1988-01-18"
"17:20:43.123"
Also, the "T" can be replaced by a blank, and the
dashes "-" can be replaced by a slash "/". This is
the format used by the SoHO ECS.
In addition this routine can parse dates where only
two digits of the year is given--the year is assumed
to be between 1950 and 2049. Character string
months, e.g. "JAN" or "January", can be used instead
of the number.
Dates in a different order than year-month-day are
supported, but only through the /MDY and /DMY
keywords. The only exceptions are dates where the
month is given as a character string, and the year is
given with all four digits, e.g. "18-JAN-1988" or
"Jan-18-1988".
Opt. Inputs : None.
Outputs : The result of the function is a structure containing the (long
integer) tags:
MJD: The Modified Julian Day number.
TIME: The time of day, in milliseconds since the
beginning of the day.
Alternatively, if the EXTERNAL keyword is set, then the result
is a structure with the elements YEAR, MONTH, DAY, HOUR,
MINUTE, SECOND, and MILLISECOND.
Any elements not found in the input character string will be
set to zero.
Opt. Outputs: None.
Keywords : EXTERNAL = If set, then the output is in CDS external format,
as described above.
DMY = Normally the date is in the order year-month-day.
However, if DMY is set then the order is
day-month-year.
MDY = If set, then the date is in the order
month-day-year.
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 = STR2UTC( UTC, ERRMSG=ERRMSG )
IF ERRMSG NE '' THEN ...
Calls : ***
DATATYPE [1], DATATYPE [2], DATATYPE [3], DATE2MJD [1], DATE2MJD [2], DATE2MJD [3]
MJD2DATE, STR2UTC_KB, STR_SEP, UTC2INT [1], UTC2INT [2], UTC2INT [3], VALID_NUM [1]
VALID_NUM [2], VALID_NUM [3]
CALLED BY:
ADJUST_DATE_OBS, ANYTIM2UTC [1], ANYTIM2UTC [2], C2_CALFACTOR, C2_CALIBRATE
C3_CALFACTOR [1], C3_CALIBRATE, CAT_FITS, CDS_OUTPLOT, CDS_UTPLOT, CDS_UTSTRING
COMBINE_MVI, COMB_FULL_EQ, DAYS2LAUNCH, DOY2UTC, GETBKGIMG, GET_CAL_STRUCT
GET_CROTA, GET_ORBIT_CDF, GET_SUN_CENTER [1], GT_DURATION, GT_START, KAP_DATE, KDAY
LIST_FITS, LOCAL_DIFF, MAKE_ALL_DAYS, MAKE_ALL_MINDAYS, MAKE_ALL_MONEXP
MAKE_ALL_MONTHS, MAKE_DAILY_IMAGE, MAKE_FITS_HDR, MAKE_GIFS, MKMOVIE
MKMOVIE0 obsolete version of mkmoviepro, MKMOVIEM, MKMOVIEWLC, MKMOVIE_kpd
MK_ALL_MIN, MK_DAILY_C1_MED, MK_DAILY_MED, MK_DAILY_MIN, MK_IMG, MK_MONTHLY_MIN
MLO_FITSHDR2STRUCT, MONITOR_EXP, MVI2FRAMES, OCCLTR_CNTR, OFFSET_BIAS, PB_INVERTER
PLOT_CDS_CRAYS, PLOT_EXPINT, PLOT_EXP_FACTOR, PLOT_HT, PLOT_RASTER, PLOT_SCI_TLM
PLOT_TEMP_POS, READ_CARR_LONG, READ_DOOR_STATUS, READ_HT, READ_MSP_ITEM
READ_OCC_DAT, REDUCE_IMG_HDR, REDUCE_MAIN, REDUCE_TRANSFER, REGEN_SYNOP, REMOVE_CR
ROLL_TIMES, RTMOVIE, RTMVI [1], RTMVIPLAY [1], RTMVIPLAY [2], RTMVIPLAYPNG
SHOW_PLAN, SYNOPTIC_STATS, UNPACK_LZ_SCIENCE, UPDATE_HDR_ROLLXY, UPDATE_MPG
UTC2DOW, UTC2DOY, UTC2INT [1], UTC2INT [2], UTC2INT [3], UTC2TAI, V4MCART, V4MSPH
WMESSAGE [1], WPLOT_NONOP, WPLOT_SUBHTR [2], WRITE_HT, WRITE_SUMMARIES [1]
WSAVE_PS [2], XCME_MES, XCOR_CDS, YYMMDD2UTC, carrmapmaker2
cmap2gif ftsfile maxdmind ROOTroot CONTROLcontrol, cube_interp, datify
get_soho_ephem, later
rt_carrmapmaker yymmdd num_r rad limb wlimb hdr disp saveset nextrot
zcheck_hdr, zintervals, zpb0r [1], zpb0r [2], zstr2utc [1], zstr2utc [2]
Common : None.
Restrictions: The components of the time must be separated by the colon ":"
character, except between the seconds and fractional seconds
parts, where the separator is the period "." character.
The components of the date must be separated by either the dash
"-" or slash "/" character.
The only spaces allowed are at the beginning or end of the
string, or between the date and the time.
This routine does not check to see if the dates entered are
valid. For example, it would not object to the date
"1993-February-31", even though there is no such date.
Side effects: If an error is encountered and the ERRMSG keyword is set,
STR2UTC returns an integer scalar equal to -1.
Category : Utilities, Time.
Prev. Hist. : Part of the logic of this routine is taken from TIMSTR2EX by M.
Morrison, LPARL. However, the behavior of this routine is
different from the Yohkoh routine. Also, the concept of
"internal" and "external" time is based in part on the Yohkoh
software by M. Morrison and G. Linford, LPARL.
Written : William Thompson, GSFC, 13 September 1993.
Modified : Version 1, William Thompson, GSFC, 21 September 1993.
Version 2, William Thompson, GSFC, 28 September 1993.
Expanded the capabilities of this routine based on
TIMSTR2EX.
Version 3, William Thompson, GSFC, 20 October 1993.
Corrected small bug when the time string contains
fractional milliseconds, as suggested by Mark Hadfield,
NIWA Oceanographic.
Version 4, William Thompson, GSFC, 18 April 1994.
Corrected bugs involved with passing arrays as
input--routine was not calling itself reiteratively
correctly.
Version 5, Donald G. Luttermoser, GSFC/ARC, 28 December 1994
Added the keyword ERRMSG.
Version 6, William Thompson, GSFC, 25 January 1995
Changed to call intrinsic ROUND instead of NINT. The
version of NINT in the Astronomy User's Library doesn't
automatically select between short and long integers as
the CDS version does.
Version 7, William Thompson, GSFC, 26 January 1995
Modified to support VMS-style format.
Made error-handling more robust.
Version 8, Donald G. Luttermoser, GSFC/ARC, 30 January 1995
Added ERRMSG keyword to internally called procedures.
Note that this routine can handle both scalars and
vectors as input.
Version 9, William Thompson, GSFC, 2 February 1995
Fixed bug with years input with two-digits.
Version 10, William Thompson, GSFC, 22 March 1995
Fixed bug when date string contains OCT in capital
letters.
Version : Version 10, 22 March 1995
[Previous]
[Next]
Name: str_checks
Purpose: turn structure checks on or off (for make_str.pro)
Keyword Parameters:
on - if set, turns checking on (more diagnostic messages but avoids
conflicts with idl save files)
off - if set, turns checking off (quieter but may conflict with
idl save files)
CALLED BY:
MAKE_STR [1], MAKE_STR [2], WBDA [1], WBDA [2]
History:
slf, 3-feb-1993
slf, 4-feb-1993 ; add diagnostics and quiet keyword
slf,26-mar-1993 ; document inquire keyword
Calling Sequence:
str_checks ; enable checks (and noisy messages)
str_checks,/on ; equivilent to above
str_checks,/off ; disable checks
str_checks,/inquire ; check flag state but dont change it
Common Blocks:
make_str_blk1
Restrictions: uses common block - should be handled by system variable
when system variable definitions are full integrated
[Previous]
[Next]
Name: str_concat
Purpose: allow concatenation of identical structures even though
the structure name may differ
Input Parameters
str1 - first structure or structure array
str2 - second structure or structure array
Output: ; function returns concatenated vector of structure name=str1
Method: uses str_copy which is recursive for nested structures
CALLS: ***
HIS_EXIST, his_index, str_copy_tags [1], str_copy_tags [2], str_copy_tags [3]
str_copy_tags [4]
CALLED BY:
FIX_SFD, RD_BDA_DP, RD_LP, RECONCILE_SFD_INFIL, UPDATE_TERM, deciyr2ints
doc_summ [1], doc_summ [2], eit_catrd [3], last_lc, mk_daily_ints, mk_trace_i1
mxfread, pfi_dominant, rd_sci5k, rd_xbd, search_obs, sort_index [1], sort_index [2]
sxl_analysis, sxt_av_teem, sxt_dark_sample, term_obs, trace_make_tmr [1]
wrt_fits_bin_exten [2]
History: slf, 10/23/91
2-Mar-94 (MDM) - Modified to create SXT history index portion
if only one input has the .HIS portion
- Modified to use STR_COPY_TAGS instead of
STR_COPY
[Previous]
[Next]
Name: str_copy_tags
Purpose: copy structures where the tag names match. The
default is NOT to copy the tags "index_version"
and "entry_type"
Input Parameters:
str1 - destination structure (template)
str2 - source structure
Optional Input:
vercopy - If present, then the keywords "index_version" and
"entry_type" are not copied (to preserve the
new structure version number)
Output: function return value is type str1 copy of str2 contents
CALLED BY:
BSC_FIELD, EIT_CATRD [1], EIT_PREP, MK_SSX, RD_XDA [1], RD_XDA [2], TRACE_PREP
def_yssysv [1], def_yssysv [2], fit_bsc, fit_bsc_as, get_dc_image [2]
get_dc_image [3], get_leak_image [1], get_leak_image [2], get_leak_image [3]
get_sxa, mk_week_file [1], mk_week_file [2], rd_dt_genx, rd_sdl, rd_sld, rd_sls
rd_sot, rd_sxtgoes, rd_trace_i0 [1], rd_trace_i0 [2], rd_week_file [1]
rd_week_file [2], rd_week_file [3], rd_week_file [4], read_genxcat
str_concat [1], str_concat [2], str_ver_update [1], str_ver_update [2]
sxt_prep [1], sxt_prep [2], sxt_prep [3], weekid [2], ydb_exist [2]
History: slf, 10/24/91
slf, 10/24/91 - streamlined recursive segment
mdm, 11/10/91 - took "str_copy" and made it copy by
matching tag names
12-Nov-91 MDM - Added "spare1" and "spare2" to the skip-list
18-Dec-92 MDM - Added code to avoid copying any SPARE tags all the
time (not just if /vercopy is set)
4-Jan-94 MDM - Modified so that it will work if passing in
an index with .GEN, .SXT, and .HIS and the other
structure just has .GEN and .SXT.
- Previously, the input structure was being modified.
Made changes to not corrupt the input template
Method: recursive for nested structures
[Previous]
[Next]
NAME:
str_ebc2asc
PURPOSE:
To convert a string from EBCDIC to ASCII
INPUT:
in - Input string (or byte array)
OUTPUT:
RETURNS - The byte array equivalent in EBCDIC of the
input. If the "str" keyword is used, the
output is converted to a string variable
OPTIONAL INPUT:
qstop - Stop the routine at the end (for debugging)
str - If set, the value returned is converted to
a string.
CALLED BY:
wrt_ebc2asc [1], wrt_ebc2asc [2]
HISTORY:
Written Oct-91 by M.Morrison
[Previous]
[Next]
NAME:
str_insert
PURPOSE:
To insert one structure into an identical array of structures,
but which might have a different structure name.
SAMPLE CALLING SEQUENCE:
str_insert, str_array, str, i
INPUT/OUTPUT:
str_array - the array of structures
INPUT:
str - The structure to put into the array of structures
i - The indicy of where to insert "str"
CALLS: ***
str_copy
HISTORY:
Written 6-Jun-93 by M.Morrison
[Previous]
[Next]
Name: str_is
Purpose: boolean function - is input a structure or structure array?
Input:
test - data structure to test
Output:
function returns: 1 if test is structure
0 if test is not a structure
CALLED BY
diff_str [1], diff_str [2], get_doc [1], get_doc [2], get_doc [3], get_info [1]
get_info [2], get_info_lp, saa_in [1], saa_in [2], tim2tfss
[Previous]
[Next]
Name: str_lastpos
Purpose: find last occurence of a substring in the source string
Input Paramters:
source - string or string array to search
substring - string to search for
Output:
return value is position in string or -1 if not present
CALLS: ***
REVERSE
CALLED BY:
FILE_EXIST [2], HESSI_DATA_PATHS [1], break_doc [1], break_doc [2]
break_doc [3], build_str [1], build_str [2], dir_since, file_exist [1]
file_exist [3], finddir [1], finddir [2], get1doc [1], get1doc [2], hessi_version
pro_list [1], pro_list [2], read_trace, show_pix [1], show_pix [2]
ssw_install [2], wc_where [1], wc_where [2], yohkoh_legacy_files [1]
yohkoh_legacy_files [2]
History: slf, 11/1/91
modified, 11/19/91 to allow string arrays for source
[Previous]
[Next]
Name: str_replace
Purpose: replace all occurences of a substring with a replacement
if no replacement string is specified, a blank is inserted
Input Parameters:
source - source string
insub - target string for replace
outsub - replacement string
CALLS: ***
ARR2STR [1], Arr2Str [2], STR2ARR [1], STR2ARR [2]
CALLED BY:
ACOPY [1], ADD_METHOD, BREAK_FILE [1], BREAK_FILE [3], BSC2BSD, CACHE_LIST
CACHE__DATA, DISPLOI_MON5K, EIS_ITOOL_STC [1], EIS_ITOOL_STC [2], EIT__DEFINE
FIND_CAT, FIND_COMPRESSED, FIX_DATE, FIX_IAP, FTP__DEFINE, GET_SSWDB
GET_SUMER_FILES, GET_SUMER_FLAT, HTTP__DEFINE, KANZ__DEFINE, LATEST_SFDS_GIF
LIST_FILE, LOC_FILE [2], MAKE_BROWSE [1], MK_SUMER_DBASE, ParsKey, ROUND_TIME
SITE__DEFINE, SOCK_FIND, SOCK_SSW, SPEX__DEFINE, SSEL_DATCOL, SSW_LAST_UPDATE
STRIP_ARG, STR_FIND, STR_MATCH, SYNOP_DEFINE, UTPLOT [1], UTPLOT [2], UTPLOT [3]
UTPLOT [4], UTPLOT [5], WHERE_VAL, Y2KFIX, break_file [4], cdrom_files [2]
cfl_summary [1], cfl_summary [2], ch_ss, check_compile [1], check_compile [2]
chk_flares [1], chk_flares [2], chk_pointing, configure_http, ctraj2orbit
daily_forecast [2], data2files, db_gbo, def_save, def_tapd [1], def_tapd [2]
def_tapd [3], dir_exist [1], dir_exist [2], dir_since, disp_sci5k, doc1liners
dps_proc_lev0_hk, eis_acronym_input_gui, eis_get_study_descriptions_path [1]
eis_get_study_descriptions_path [2], eis_import_acronym_gui
eis_import_title_gui, eit_files, eit_fulldiskdb, eit_genx_cat, eit_mirror
eit_proton_summary, event_movie [1], event_movie [2], extract_val, file_list [1]
file_list [2], file_purge [1], file_purge [2], file_uncompress [1]
file_uncompress [2], fits_interp, fitshead2struct, fix_path, fix_slash
full_graph_gif, genx2html [1], genx2html [2], get_ads [1], get_ads [2]
get_atomic [1], get_atomic [2], get_dn_rate [1], get_dn_rate [2], get_eit_data
get_gevloc_data, get_hk_info [1], get_hk_info [2], get_last_tfr, get_sirius [1]
get_sirius [2], get_subdirs [1], get_subdirs [2], get_xfont [1], get_xfont [2]
get_ydbhelp [1], get_ydbhelp [2], go_sxt_sss2secondary, go_yo_prod_batch
goes_gaps, gt2exe [1], gt2exe [2], gzip, hsi_format_flare, hsi_get_flare_flags
hsi_image_plot, hsi_ui_img, html_basics, html_doc, html_form_addtime [1]
html_form_addtime [2], html_form_addtime [3], html_get_files
html_remove_template, http_names, id2nam, ihy_db, image2movie, image_summary
ip_que_dmpver, jitter_gif_xyimg, last_lc, lastgbo, lastsfd [1], lastsfd [2]
les_archive_info, make_32 [2], make_mirror, make_ssw_mirror, map_env2dir
mk_ascii_list, mk_bad_pix_map_load, mk_dpc_image, mk_formt_html [1]
mk_formt_html [2], mk_formt_html [3], mk_gev [1], mk_gev [2], mk_gx
mk_hst_summary, mk_imgsum_html, mk_lasteit_movie, mk_limb_pixmap, mk_mdi_fits
mk_nar [1], mk_nar [2], mk_obs_str, mk_orbit [1], mk_orbit [2], mk_pix [1]
mk_pix [2], mk_pubydb, mk_query [1], mk_query [2], mk_query_genx, mk_sdm, mk_sfc [1]
mk_sfc [2], mk_spd, mk_ssc_batch [1], mk_ssc_batch [2], mk_sumer_dbase_ff, mk_sxh
mk_syn_sfc [1], mk_syn_sfc [2], mk_synsfc_coeff [1], mk_synsfc_coeff [2]
mk_trace_i0, mk_week_file [1], mk_week_file [2], mk_ydbtab, mktap_prep, mo_patch
mon_sci5k, mreadfits_header, netscape_control, new_disp_sci5k [1]
new_disp_sci5k [2], password_info, path_data [1], path_data [2], path_sw [1]
path_sw [2], plot_goesp, pref_super, raw_list2pixmap, rd_goesp_ascii, rd_hk [1]
rd_hk [2], rd_rasm, rd_rdb [1], rd_rdb [2], rd_sumer [1], rd_sumer [2]
rd_therm_rs232, rd_week_file [2], rd_ydbtap, read_eit, read_hessi_4_ospex
read_msok_jpg, read_spartan, read_xsm_4_ospex, redo_disploi, redo_mon_sci5k
reg_check, rename [1], rename [2], rep_logenv, safe_log10, save_idl_routines
savegenx, selsis_copy [1], selsis_copy [2], selsis_week, set_logwindows
show_pix [1], show_pix [2], soon_cadence, soon_catstat, soon_com2html
soon_search_www, spartan_pb2fits, spartan_roll2fits [1], spex_hessi_fits2drm
spex_image__define, sprint, ssw_addmm_gen, ssw_check_contrib, ssw_conflicts
ssw_findstuff2html, ssw_install [1], ssw_install [2], ssw_kyoto2dst, ssw_move
ssw_path, ssw_post_query, ssw_set_instr, ssw_start_rpcserver, ssw_swmap_bestof
ssw_swmap_info, ssw_time2paths, ssw_upgrade [1], ssw_upgrade [2]
ssw_upgrade_backup, sswdb_files, sswdb_info, sswdb_install, sswdb_upgrade, sswloc
str2html [1], str2html [2], str2html [3], strcapitalize [1], strcapitalize [2]
strlist2html [1], strlist2html [2], strrempat [1], strrempat [2], sxi_files
sxt2file, sxt2mpeg, sxt_html, sxt_plan, sxt_prep [1], sxt_prep [2], sxt_prep [3]
sxt_prep_exe, sxt_ssc2sss, sxt_ssn2fits [1], synop_link, sysprint [1]
sysprint [2], teambb [1], teambb [2], thumbnail_table_html, timeline, topsdb [1]
topsdb [2], tr_list_frames, tr_rd_inventory, tr_reformat, trace_cosmic2filename
trace_do_data_requests, trace_dph2struct [1], trace_files, trace_jpeg_decomp
trace_last_movie [1], trace_last_movie [3], trace_make_tma, trace_make_tmr [1]
trace_make_tmr [2], trace_make_tsma, trace_request_summary
trace_special_movie [1], trace_special_movie [2], trace_special_movie [3]
trace_special_movie2, trace_submit_request, trace_success_file
trace_uniq_movies, trace_wavename2num, trace_write_genxcat, uncompress
url_decode, url_encode, valid_pass4 [1], valid_pass4 [2], web_seq, weekid [1]
weekid [2], weekid [3], which_hessi_version, write_trace, wrt_fits_bin_exten [2]
wrt_sci160k_img, xanal_emi, xdisp_fits, xdisp_sci5k, xdisp_tfr, xdisp_trace [1]
xdisp_trace2, xdisp_trace3, xset_chain [1], xset_chain [2], xspr [1], xspr [2]
xsxt_prep_event, ydb_exist [2], ydb_use, yo_index2path, yo_xda2legacy, yoyo_man2
ys_contrib [1], ys_contrib [2]
History: slf, 11/19/91
slf, 19-mar-93 ; optimize case where insub and outsub
; are each 1 character in length
[Previous]
[Next]
NAME:
STR_SEP2
PURPOSE:
This function breaks up a string into words that are separated by
either spaces or tabs.
CATEGORY:
UTIL
CALLING SEQUENCE:
Result = STR_SEP2(Str)
INPUTS:
Str: String to be processed
OUTPUTS:
The function result is a string array with each word in each element
of the array.
CALLS: ***
STR2ARR [1], STR2ARR [2]
CALLED BY:
DEF2C_FILL, DEF2C_FORMAT, DEF2C_INSERT, DEF2STRUCT
MODIFICATION HISTORY:
Written by:
@(#)str_sep2.pro 1.1 10/05/96 LASCO IDL LIBRARY
[Previous]
[Next]
NAME:
STR_SIZE
PURPOSE:
The purpose of this function is to return the proper
character size to make a specified string a specifed
width in a window. The width is specified in normalized
coordinates. The function is extremely useful for sizing
strings and labels in resizeable graphics windows.
AUTHOR:
FANNING SOFTWARE CONSULTING
David Fanning, Ph.D.
2642 Bradbury Court
Fort Collins, CO 80521 USA
Phone: 970-221-0438
E-mail: davidf@dfanning.com
Coyote's Guide to IDL Programming: http://www.dfanning.com/
CATEGORY:
Graphics Programs, Widgets.
CALLING SEQUENCE:
thisCharSize = STR_SIZE(thisSting, targetWidth)
INPUTS:
thisString: This is the string that you want to make a specifed
target size or width.
OPTIONAL INPUTS:
targetWidth: This is the target width of the string in normalized
coordinates in the current graphics window. The character
size of the string (returned as thisCharSize) will be
calculated to get the string width as close as possible to
the target width. The default is 0.25.
KEYWORD PARAMETERS:
INITSIZE: This is the initial size of the string. Default is 1.0.
STEP: This is the amount the string size will change in each step
of the interative process of calculating the string size.
The default value is 0.05.
OUTPUTS:
thisCharSize: This is the size the specified string should be set
to if you want to produce output of the specified target
width. The value is in standard character size units where
1.0 is the standard character size.
CALLED BY:
eis_plot_spectrum [1], eis_plot_spectrum [2]
EXAMPLE:
To make the string "Happy Holidays" take up 30% of the width of
the current graphics window, type this:
XYOUTS, 0.5, 0.5, ALIGN=0.5, "Happy Holidays", $
CHARSIZE=STR_SIZE("Happy Holidays", 0.3)
MODIFICATION HISTORY:
Written by: David Fanning, 17 DEC 96.
Added a scaling factor to take into account the aspect ratio
of the window in determing the character size. 28 Oct 97. DWF
Added check to be sure hardware fonts are not selected. 29 April 2000. DWF.
Added a pixmap to get proper scaling in skinny windows. 16 May 2000. DWF.
Forgot I can't do pixmaps in all devices. :-( Fixed. 7 Aug 2000. DWF.
[Previous]
[Next]
Name: str_tagval
Purpose: return value stored in specified tag - (nested N-deep struct OK)
Input Parameters:
item - structure (FITS header)
tag/field - tag to search for
Optional Keyword Parameters:
str_pattern (input) - optional match pattern in structure name
struct (output) - structure name at match level
level (output) - nest level where match found
[ -1 -> not found, 0 -> top level, 1 -> nested one down, etc)
(rfound&recurse - for internal use only)
Calling Sequence:
tag_val=str_tagval(item, tagname [,str_patt='pattern', struct=struct, $
level=level)
Calling Examples:
tagval=str_tagval(structure,'tagname',level=level)
tagval=str_tagval(index,'periph',str_pattern='sxt',level=level)
tagval=str_tagval(rmap ,'periph',str_pattern='sxt',level=level)
Method:
recursive for nested structures
CALLS: ***
data_chk [1], data_chk [2], tag_index [1], tag_index [2], wc_where [1]
wc_where [2]
CALLED BY:
fitsgen, gt_EITfilter, gt_EITsector
Restrictions:
need to add case where item is FITS header (call WT routine)
[Previous]
[Next]
NAME:
STR_UNIQUE
PURPOSE:
Returns an array which is the unique elements of the input string
CATEGORY:
UTIL
CALLING SEQUENCE:
Result = STR_UNIQUE(Str)
INPUTS:
Str: A string array
OUTPUTS:
This function returns a string array containing the unique elements
of the input array
CALLED BY:
COMPUTE_MONEXP_FACTORS, CORR_ALLSUBS, PLOT_MONEXP_STD
RESTRICTIONS:
The input string must be a singly dimensioned array
PROCEDURE:
EXAMPLE:
Suppose you have a string array, s, that contains, ['A','A','a','B','B','A']
To create an array of the unique elements of the array s:
unique= STR_UNIQUE(s)
The output array, unique will contain ['A','a','B']
MODIFICATION HISTORY:
Written by: RA Howard, 7/30/97
@(#)str_unique.pro 1.2 11/20/97 LASCO IDL LIBRARY
[Previous]
[Next]
NAME:
str_ver_update
PURPOSE:
Allow old structures to be copied to new structure definitions
where the tag names match.
INPUT:
str - old structure
ref_str - reference structure type which should have the data
copied over to
OUTPUT:
returns - a structure of type "ref_str" with the contents of
"str" copied into it.
CALLS: ***
str_copy_tags [1], str_copy_tags [2], str_copy_tags [3], str_copy_tags [4]
CALLED BY:
RD_BDA_DP
RESTRICTIONS:
It assumes that the general organization of the two structures
is close and that only a few tags do not match.
HISTORY:
Written 10-Nov-91 by M.Morrison
[Previous]
[Next]
Name: strcapitalize
Purpose: capatilize first letters in Names and Titles
Input Parameters:
strarr - string array to capitalize
Keyword Parameters:
except - (switch) - if set, dont capitalize 'a', 'the'
<ANYTHING> - input - other words NOT to capitalize (any other keyword)
Calling Sequence:
cap=strcapitalize(strarr [,/except ,/ANYTHING])
Calling Examples:
cap=strcapitalize(strarr ,/is) ; dont capitlize a, the, or "is"
CALLS: ***
data_chk [1], data_chk [2], str_replace [1], str_replace [2]
CALLED BY:
hsi_select_flare, mk_formt_html [1], mk_formt_html [2], mk_formt_html [3]
soon_catstat, timeline, web_seq
History:
5-jul-1995 (SLF) - prettying up html and other documents...
[Previous]
[Next]
PROJECT:
SOHO - CDS
NAME:
STRIP_DIRNAME()
PURPOSE:
Strip off directory name associated with filenames.
EXPLANATION:
Given a string array containing full filenames (including
directory paths), this routine will strip off directory names
and return only the file names.
CALLING SEQUENCE:
Results = STRIP_DIRNAME(full_names [,path=path])
INPUTS:
FULL_NAMES -- String array containing full names of files
including directory paths.
OPTIONAL INPUTS:
None.
OUTPUTS:
Results -- String array in which directory paths have beeb
stripped off from the full filename.
OPTIONAL OUTPUTS:
PATH -- An optional return variable that contains the stripped path
string of the file names.
KEYWORD PARAMETERS:
None.
CALLS: ***
DATATYPE [1], DATATYPE [2], DATATYPE [3], RSTRPOS
CALLED BY:
CAT_RAW, EIS_CPT_PROCESS_REAL_COMMAND_SEQUENCES [1]
EIS_CPT_PROCESS_REAL_COMMAND_SEQUENCES [2], EIS_IMAGE_TOOL [1]
EIS_IMAGE_TOOL [2], EIS_IMAGE_TOOL_EVENT [1], EIS_IMAGE_TOOL_EVENT [2]
EIS_LOAD_IMAGE [1], EIS_LOAD_IMAGE [2], IMAGE_TOOL, IMAGE_TOOL_EVENT
ITOOL_LOAD_IMAGE, ITOOL_PICKFILE, XGET_SYNOPTIC
COMMON BLOCKS:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
CATEGORY:
Utilities, os
PREVIOUS HISTORY:
Written September 19, 1994, by Liyun Wang, GSFC/ARC
MODIFICATION HISTORY:
Liyun Wang, GSFC/ARC, September 20, 1994
Added the PATH keyword.
VERSION:
Version 1, September 19, 1994
[Previous]
[Next]
Name: strlastchar
Purpose: return last non-blank character(s) in a string or string array
Input Parameters:
array - string or string array
Calling Sequence:
lastchar=strlastchar(strarr)
CALLS: ***
REVERSE
CALLED BY:
hsi_params_write_pro, make_mirror, ospex_params_write_pro, rd_gxd [1]
rd_gxd [2], rd_gxd [3], strfind_urls, strspecial [1], strspecial [2], timeline
topsdb [1], topsdb [2], web_seq
History:
29-jul-1995 (SLF)
[Previous]
[Next]
Name: strlist2html
Purpose: identify ordered/unordered lists in string array and cnvt->html
Input Parameters:
array - string array to search
Keyword Parameters:
ordered - if set, ordered lists only (default)
unordered - if set, unordereed lists only
all - if set, ordered AND unordered lists (recursive)
maxsep - maximum seperation expected between list entries (def=3 lines)
Calling Sequence:
list=strlist2html(array [/ordered, /unordered, /all, maxsep=NN]
CALLS: ***
ARR2STR [1], Arr2Str [2], deriv_arr [1], deriv_arr [2], str_replace [1]
str_replace [2], strspecial [1], strspecial [2], strsplit
CALLED BY:
str2html [1], str2html [2], str2html [3]
Restrictions:
may let some lists slip through the cracks...
History:
26-jul-1995 (SLF) -
[Previous]
[Next]
PROJET:
SOHO - LASCO
NAME:
STRMAP2MB
PURPOSE:
Convert a 'string map' to a missing block image map
CATEGORY:
missing blocks
CALLING SEQUENCE:
INPUTS:
sm : string coded MB map
sx,sy : size in pixel of the original image
OPTIONAL INPUTS:
rebindex : only necessary if 'full' parameter is passed
rebin factor of the original image: 1 : full resolution
2 : half resolution
4 : quarter resolution
8 : 8th resolution
OUTPUTS:
mb : missing block map mask
OPTIONAL OUTPUTS:
KEYWORD INPUT:
full : set to [frame_start_X,frame_start_Y] in 1024 CCD pix if
image is not full field
CALLS: ***
B32TOINT
MODIFICATION HISTORY:
V1.0 Writen by A.Thernisien on 18/07/2001
CVSLOG:
$Log: strmap2mb.pro,v $
Revision 1.2 2002/07/11 07:24:19 arnaud
Insertion of the Log in each header
[Previous]
[Next]
Project : SOHO - CDS
Name :
STRN
Purpose : Convert number to unpadded string.
Explanation :
The main and original purpose of this procedure is to convert a number
to an unpadded string (i.e. with no blanks around it.) However, it
has been expanded to be a multi-purpose formatting tool. You may
specify a length for the output string; the returned string is either
set to that length or padded to be that length. You may specify
characters to be used in padding and which side to be padded. Finally,
you may also specify a format for the number. NOTE that the input
"number" need not be a number; it may be a string, or anything. It is
converted to string.
Use :
tmp = STRN( number, [ LENGTH=, PADTYPE=, PADCHAR=, FORMAT = ] )
print,'Used ',strn(stars),' stars.' ==> 'Used 22 stars.'
print,'Attempted ',strn(ret,leng=6,padt=1,padch='0'),' retries.'
==> 'Attempted 000043 retries.'
print,strn('M81 Star List',length=80,padtype=2)
==> an 80 character line with 'M81 Star List' centered.
print,'Error: ',strn(err,format='(f15.2)')
==> 'Error: 3.24' or ==> 'Error: 323535.22'
Inputs :
NUMBER This is the input variable to be operated on. Traditionally,
it was a number, but it may be any scalar type.
Opt. Inputs : None.
Outputs :
tmp The formatted string
Opt. Outputs: None.
Keywords :
LENGTH This KEYWORD specifies the length of the returned string.
If the output would have been longer, it is truncated. If
the output would have been shorter, it is padded to the right
length.
PADTYPE This KEYWORD specifies the type of padding to be used, if any.
0=Padded at End, 1=Padded at front, 2=Centered (pad front/end)
IF not specified, PADTYPE=1
PADCHAR This KEYWORD specifies the character to be used when padding.
The default is a space (' ').
FORMAT This keyword allows the FORTRAN type formatting of the input
number (e.g. '(f6.2)')
Calls : None.
CALLED BY:
APER, Automatic polarization determination with background subtraction
Determine Drift Rate, EXTGRP, EXTRAP, FITS_INFO [1], FITS_INFO [2], FTPRINT, GETPSF
HBOXAVE, HCONGRID, HEXTRACT, HREBIN, HREVERSE, HROT, MEANCLIP, NSTAR, SKYADJ_CUBE, VECT
XDISPSTR, rhessi_get_spin_axis_position
Common : None.
Restrictions: None.
Side effects: None.
Category : Utilities, String.
Prev. Hist. :
03-JUL-90 Version 1 written by Eric W. Deutsch
10-JUL-90 Trimming and padding options added (E. Deutsch)
29-JUL-91 Changed to keywords and header spiffed up (E. Deutsch)
Ma7 92 Work correctly for byte values (W. Landsman)
19-NOV-92 Added Patch to work around IDL 2.4.0 bug which caused an
error when STRN('(123)') was encountered. (E. Deutsch)
Written : Eric W. Deutsch, 3 July 1990
Modified : Version 1, William Thompson, GSFC, 10 June 1994
Incorporated into CDS library
Version : Version 1, 10 June 1994
[Previous]
[Next]
NAME:
STRNUMBER
PURPOSE:
Function to determine if a string is a valid numeric value.
CALLING SEQUENCE:
result = strnumber( st, [val] )
INPUTS:
st - any IDL scalar string
OUTPUTS:
1 is returned as the function value if the string st has a
valid numeric value, otherwise, 0 is returned.
OPTIONAL OUTPUT:
val - (optional) value of the string. real*8
WARNING:
(1) In V2.2.2 there was a bug in the IDL ON_IOERROR procedure that
will cause the following statement to hang up IDL
IDL> print,'' + string( strnumber('xxx') )
This bug was fixed in V2.3.0
(2) In V2.3.2, an IDL bug is seen in the following statements
IDL> st = 'E'
IDL> q = strnumber(st) & print,st
The variable 'st' gets modified to an empty string. This problem
is related to the ambiguity of whether 'E' is a number or not
(could be = 0.0E). This bug was fixed in V3.0.0
(3) STRNUMBER was modified in February 1993 to include a special
test for empty or null strings, which now returns a 0 (not a
number). Without this special test, it was found that a
empty string (' ') could corrupt the stack.
CALLED BY:
APER, CREATE_STRUCT [1], CREATE_STRUCT [2], DBFPARSE [1], DBFPARSE [2]
DBFPARSE [3], GETPSF, HESSI SOHDATA CLASS DEFINITION, NORH_CREATE_STRUCT [1]
NORH_CREATE_STRUCT [2], NORH_FITS_INTERP [1], NORH_FITS_INTERP [2]
READCOL [1], READCOL [2], READCOL [3], READFMT, SXPAR [1], SXPAR [2], SXPAR [3]
TBPRINT, fits_interp
HISTORY:
version 1 By D. Lindler Aug. 1987
test for empty string, W. Landsman February, 1993
[Previous]
[Next]
Project : SOHO - CDS
Name :
STRNUMBER()
Purpose :
Function to determine if a string is a valid numeric value.
Explanation :
Function to determine if a string is a valid numeric value.
This routine is mainly here to support routines from the IDL Astronomy
User's Library. The routine VALID_NUM performs the same function, but
is more robust.
Use :
result = strnumber( st, [val] )
Inputs :
st - string
Opt. Inputs :
None.
Outputs :
1 is returned as the function value if the string st has a
valid numeric value, otherwise, 0 is returned.
Opt. Outputs:
val - (optional) value of the string. real*8
Keywords :
None.
Calls :
None.
CALLED BY:
APER, CREATE_STRUCT [1], CREATE_STRUCT [2], DBFPARSE [1], DBFPARSE [2]
DBFPARSE [3], GETPSF, HESSI SOHDATA CLASS DEFINITION, NORH_CREATE_STRUCT [1]
NORH_CREATE_STRUCT [2], NORH_FITS_INTERP [1], NORH_FITS_INTERP [2]
READCOL [1], READCOL [2], READCOL [3], READFMT, SXPAR [1], SXPAR [2], SXPAR [3]
TBPRINT, fits_interp
Common :
None.
Restrictions:
None.
Side effects:
(1) Note that a blank string (e.g. " ") is not a valid numeric value,
although an empty string ("") is (=0.0).
(2) In V2.2.2 there was a bug in the IDL ON_IOERROR procedure that
will cause the following statement to hang up IDL
IDL> print,'' + string( strnumber('xxx') )
This bug was fixed in V2.3.0
(3) As of V2.3.2, an IDL bug is seen in the following statements
IDL> st = 'E'
IDL> q = strnumber(st) & print,st
The variable 'st' gets modified to an empty string. This problem
is related to the ambiguity of whether 'E' is a number or not
(could be = 0.0E). A fix is expected a new IDL version.
Category :
Utilities, Numerical
Prev. Hist. :
version 1 By D. Lindler Aug. 1987
Written :
Don Lindler, GSFC/HRS August 1987.
Modified :
Version 1, William Thompson, GSFC, 12 April 1993.
Incorporated into CDS library.
Version :
Version 1, 12 April 1993.
[Previous]
[Next]
Name: strposarr
Purpose: find position of 1st or last occurence of substring in each element
of a string array (extended array version of idl strpos)
Input Paramters:
source - string or string array to search
substring - substring to match
Optional Keyword Paramters:
lastpos - if set, position of last occurence is returned
(calls str_lastpos instead of strpos)
Ouptut Paramters:
function returns long array with each element = character postion
of first match; return element is -1 if no match
CALLED BY:
break_doc [1], break_doc [2], break_doc [3], get1doc [1], get1doc [2]
tr_mk_seq_alph
History: slf, 24-July-1992O
[Previous]
[Next]
Name: strrempat
Purpose: identify/remove 1st occurence of pattern in inarray
Input Paramters:
inarray - string array
pattern - pattern to remove
remcount - number of elements in inarray where pattern was found
Keyword Parameters:
trunc - if set, truncation after pattern (not removal) is performed)
all - if set, all occurences are removed (using str_replace)
patss - returns subscripts of inarray where pattern matctched
Method: 1st occurence of pattern in inarray is found
(since idl does not allow strmid with vector positions)
this routine uses vector operations for simular pattern
positions for optimization instead of looping through each
element of inarray
CALLS: ***
UNIQ [1], UNIQ [2], UNIQ [3], str_replace [1], str_replace [2]
CALLED BY:
wc_where [1], wc_where [2]
History:
slf, 7-jan-1992
Category:
gen , util, string
[Previous]
[Next]
NAME:
STRSEC
PURPOSE:
Convert seconds after midnight to a time string.
CATEGORY:
CALLING SEQUENCE:
tstr = strsec(sec, [d])
INPUTS:
sec = seconds after midnight. in
Scalar or array.
d = optional denominator for a fraction. in
KEYWORD PARAMETERS:
Keywords:
/HOURS forces largest time unit to be hours instead of days.
OUTPUTS:
tstr = resulting text string. out
CALLS: ***
ARRAY_JHUAPL [1], ARRAY_JHUAPL [2], ISARRAY [1], ISARRAY [2], ISARRAY [3]
CALLED BY:
SUN [1], SUN [2], TIMER
COMMON BLOCKS:
NOTES:
Notes: Output is of the form: [DDD/]hh:mm:ss[:nnn/ddd]
where DDD=days, hh=hours, mm=minutes, ss=seconds,
nnn/ddd=fraction of a sec given denominator ddd in call.
If sec is double precision then 1/10 second can be
resolved in more than 10,000 days. Use double precision when
possible. Time is truncated, so to round to nearest second,
when not using fractions, add .5 to sec.
MODIFICATION HISTORY:
Written by R. Sterner, 8 Jan, 1985.
Johns Hopkins University Applied Physics Laboratory.
RES --- Added day: 21 Feb, 1985.
RES 19 Sep, 1989 --- converted to SUN
RES 18 Mar, 1990 --- allowed arrays.
TRM 08 May, 1991 --- changed array to array_jhuapl
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.
[Previous]
[Next]
Name: strspecial
Purpose: return true if input is a 'special' character (or as defined by keyword)
Input Parameters:
strarray - scaler string or string array
Output
function returns truth value (VECTOR) , depending upon keyords set
Keyword Parameters:
lastchar (input) switch, look at LAST character (default is FIRST)
firstchar (input) switch, look at FIRST character (default for arrays)
digit - (input) switch, return TRUE where character in {0-9}
alpha - (input) switch, return TRUE where character in {a-z, A-Z}
lchar - (output) return LAST character array (last char in strarray)
chkall - (input) strarray must be scaler - boolean for entire string
Calling Sequence:
truth=strspecial(arr) ; =1 where leading chars are special
truth=strspecial(arr,/digit) ; =1 where leading chars in {0-9}
truth=strspecial(arr,/alpha,/last); =1 where trailing chars in {a-z,A-Z}
Sample Calls:
A: Scaler input, no positional keywords (FIRSTCHAR & LASTCHAR)
IDL> print,strspecial('*-TITLE-*') ; boolean for each character
1 1 0 0 0 0 0
B: Scaler input w/ positional keyword
IDL> print,strspecial('abcd1',/last,/digit) ; only first or last
1
C: Array input (default looks at FIRSTCHAR of each element)
IDL> print,strspecial(['abc','123','!@#'],/lastchar)
0 0 1
CALLED BY:
extract_fids, fitshead2struct, image2movie, keyword_db, save_idl_routines
soon_search [1], soon_search [3], ssw_strfind, ssw_time2filelist
strlist2html [1], strlist2html [2], trace_dph2struct [1], where_title [1]
where_title [2]
History:
15-jul-1995
28-jul-1995 - add DIGIT, ALPHA, LASCHAR keywords
2-aug-1995 - added recursive segment for all characters of scaler
CALLS: ***
data_chk [1], data_chk [2], strlastchar [1], strlastchar [2]
Restrictions:
just looks at FIRST or LAST characters if input is an ARRAY
trailing blanks are not "special"
Method: recursive for scaler strings
[Previous]
[Next]
Name: strsplit
Purpose: split string array at first (or last) occurence of pattern
Input Paramters:
inarry - initial string array to split
pattern - search string (default is blank)
Output:
function return value is string array
Calling Sequence:
strarr=strsplit(inarray, pattern , tail=tail)
strarr=strsplit(inarray, pattern , /tail, head=head)
Calling Examples:
head=strsplit(inarray, pattern)
tail=strsplit(inarray, pattern, /tail)
CALLS: ***
UNIQ [1], UNIQ [2], UNIQ [3], data_chk [1], data_chk [2]
CALLED BY:
BATSE_FLARES_WEEK, CREATE_STRUCT [1], CREATE_STRUCT [2], DEF_DIRLIST, FF_SUMMARY
FITSDIR, FITS_OPEN, FTAB_EXT, FTPRINT, HKG_DBASE, MRD_STRUCT [1], MRD_STRUCT [2]
PROGRESSBAR__DEFINE, QUERYGSC, QUERYSIMBAD, QUERYUSNO, RDFLOAT, READCOL [1]
READCOL [2], READ_ANALIST, READ_GDFILE_GD, SSW_LOCAL_PATH, TBPRINT, TVIMAGE [1]
TVREAD [2], VSO__DEFINE, WEBGET, anystr2tim [1], anystr2tim [2], cont2time [1]
cont2time [2], eis_acronym_input_gui, eis_dr_obj__DEFINE [1]
eis_dr_obj__DEFINE [2], eis_import_acronym_gui, eis_import_linelist [1]
eis_import_linelist [2], eis_import_raster [1], eis_import_raster [2]
eis_import_title_gui, eis_line_name_gui [1], eis_line_name_gui [2]
eis_linelist_gui [1], eis_linelist_gui [2], eis_lines_gui [1]
eis_lines_gui [2], eis_ll_obj__DEFINE [1], eis_ll_obj__DEFINE [2]
eis_raster_gui [1], eis_raster_gui [2], eis_raster_index_gui [1]
eis_raster_index_gui [2], eis_read_linelist_block [1]
eis_read_linelist_block [2], eis_read_raster_block [1]
eis_read_raster_block [2], eis_read_study_block [1]
eis_read_study_block [2], eis_read_studyraster_block [1]
eis_read_studyraster_block [2], eis_sci_obj_gui, eis_study_gui [1]
eis_study_gui [2], ftp_copy2sites, get_mk3 [1], get_mk3 [2], get_xfont [1]
get_xfont [2], hsi_sas_plot_scpointing, makemovie, mk_sxh, mobad_summ
monitor_scratch [1], monitor_scratch [2], pr_visible, qView_Save2File, rd_ydbtap
read_msok_jpg, reltime [1], reltime [2], sfc_check, sfc_prep [1], sfc_prep [2]
spartan_pb2fits, spartan_roll, spartan_roll2fits [1], ssc_files [1]
ssc_files [2], ssc_files [3], ssw_findstuff2html, strlist2html [1]
strlist2html [2], sxt_mauna, trace_get1www_image, trace_request_summary
trace_success_file, xdate [1], xdate [2], ydb_pre2dir [1], ydb_pre2dir [2]
ydbtapsets
History:
13-Jan-1993 (SLF)
11-Mar-1993 (SLF) 'released'
10-jun-1994 (SLF) bug fix
[Previous]
[Next]
Name: strstat
Purpose: check to see if the input structure name exists
Input Parameters:
strname = string containing structure name to check
Optional Keyword Parameters:
quiet - if keyword set then quietinformational messages are
inhibited
Output:
function returns 1 if structure exists
returns 0 if structure does not exist
CALLED BY:
BFITS, MAKE_STR [1], MAKE_STR [2], add2str [1], add2str [2], substruc
Side Effects:
prints informational message if info is set
History: SLF, 10/23/91 to allow make_str to avoid previously
allocated names as occured when idl restore was used
[Previous]
[Next]
Name: struct2ms
Purpose: convert an structure to a make_str structure
(allow nesting of anonymous structures)
CALLS: ***
FMT_TAG [1], FMT_TAG [2], MAKE_STR [1], MAKE_STR [2], data_chk [1], data_chk [2]
str_copy
History:
10-Feb-1994 (SLF)
10-Feb-1996 (MDM) - Modified to handle nested structures
[Previous]
[Next]
Project : SOHO - CDS
Name : STUDY_BRIEF
Purpose : Lists information on CDS studies available at EOF
Explanation : As above
Use : IDL> study_brief [, study_names, /hardcopy, /status, /summary]
Inputs : None
Opt. Inputs : study_names - enter study acronym (or array of them) for
for which info is required. Info on all known
studies is given if this parameter is omitted.
Outputs : None
Opt. Outputs: None
Keywords : STATUS - if present the status of the study is given, rather
than the definition.
SUMMARY - gives a list of available acronyms
TEXT, SAVE_TEXT - captured text arrays
QUIET - suppress output
Calls : ***
CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], FILE_EXIST [2], PRINT_STR
RD_ASCII [1], RD_ASCII [2], concat_dir [4], file_exist [1], file_exist [3]
CALLED BY:
MK_CDS_PLAN, XSTUDY
Common : None
Restrictions: Requires $CDS_STUDYSHEETS to be defined
Side effects: None
Category : Info, help
Prev. Hist. : None
Written : C D Pike, RAL, 29-Mar-96
Modified : Cater for slightly changed input file format and
trap non-existant files. CDP, 12-Apr-96
Zarro, GSFC, 9 Sept. 1996 -- return text arrays as keywords
Version : Version 2, 12-Apr-96
[Previous]
[Next]
NAME:
STV
PURPOSE:
Create a scrolling graphics window for examining large images.
By default, 1 draw widgets are used. It displays the actual image with
scrollbars that allow sliding
the visible window.
CALLING SEQUENCE:
STV , Image
INPUTS:
Image: The 2-dimensional image array to be displayed. If this
argument is not specified, no image is displayed. The
WID keyword can be used to obtain
the window number of the draw widget so it can be drawn
into at a later time.
KEYWORDS:
GROUP: The widget ID of the widget that calls SLIDE_IMAGE. If this
keyword is specified, the death of the caller results in the
death of STV.
ORDER: This keyword is passed directly to the TV procedure
to control the order in which the images are drawn. Usually,
images are drawn from the bottom up. Set this keyword to a
non-zero value to draw images from the top down.
REGISTER: Set this keyword to create a "Done" button for SLIDE_IMAGE
and register the widgets with the XMANAGER procedure.
The basic widgets used in this procedure do not generate
widget events, so it is not necessary to process events
in an event loop. The default is therefore to simply create
the widgets and return. Hence, when register is not set,
SLIDE_IMAGE can be displayed and the user can still type
commands at the "IDL>" prompt that use the widgets.
RETAIN: This keyword is passed directly to the WIDGET_DRAW
function, and controls the type of backing store
used for the draw windows. If not present, a value of
2 is used to make IDL handle backing store.
WID: A named variable in which to store the IDL window number of
the sliding window. This window number can be used with the
WSET procedure to draw to the scrolling window at a later
time.
TITLE: The title to be used for the SLIDE_IMAGE widget. If this
keyword is not specified, "STV Image" is used.
TOP_ID: A named variable in which to store the top widget ID of the
STV hierarchy. This ID can be used to kill the
hierarchy as shown below:
STV, TOP_ID=base, ...
.
.
.
WIDGET_CONTROL, /DESTROY, base
XVISIBLE: The width of the viewport on the scrolling window. If this
keyword is not specified, 1/2 of display size is used.
YVISIBLE: The height of the viewport on the scrolling window. If
this keyword is not present, 1/2 of display size is used.
OUTPUTS:
None.
CALLS: ***
SLIDE_IMG_EVENT, XMANAGER
COMMON BLOCKS:
None.
SIDE EFFECTS:
Widgets for displaying a very large image are created.
The user typically uses the window manager to destroy
the window, although the TOP_ID keyword can also be used to
obtain the widget ID to use in destroying it via WIDGET_CONTROL.
RESTRICTIONS:
Scrolling windows don't work correctly if backing store is not
provided. They work best with window-system-provided backing store
(RETAIN=1), but are also usable with IDL provided backing store
(RETAIN=2).
Various machines place different restrictions on the size of the
actual image that can be handled.
MODIFICATION HISTORY:
04.01.02, nbr - Written, based on SLIDE_IMAGE.pro
01/02/04 @(#)stv.pro 1.1
[Previous]
[Next]
EIT_SUBFIELD can run locally on the OPs machine or using SSW.
To run using IDL, the code expects the following logicals/environment:
Path to EIT data files : REF_DIR
Path to EIT QKL catalog files : CAT_DIR
CALLED BY:
EIT_SUBFIELD
Note: The code can function without CAT_DIR if
there are images in the directory REF_DIR.
Path to EIT QKL catalog files : EIT_QKL_CATALOG
Path to EIT_SUBFIELD data files : EIT_SUB
ex: setenv EIT_SUB /data/subfield
Note: The code can function without EIT_SUB if
exact pointing is not needed
(the subfield coords will still be accurate)
and if you do not use the /LASCO keyword and
Definition for EIT color table : COLOREIT
To run using SSWIDL, the expects the following environment variables:
Path to EIT data files : EIT_QUICKLOOK
Path to EIT QKL catalog files : EIT_QKL_CATALOG
Path to EIT_SUBFIELD data files : EIT_SUB
ex: setenv EIT_SUB $SSWDB/soho/eit/planning/subfield
Note: The code can function without EIT_SUB if
exact pointing is not needed
(the subfield coords will still be accurate)
and if you do not use the /LASCO keyword and
Definition for EIT color table : COLOREIT
==============================================================================
NAME : SUBFIELD_EV
PURPOSE :
CATEGORY :
EXPLANATION :
SYNTAX :
EXAMPLES : To view files that are on the archive
IDL> file = eit_catrd('1-aug-1996', /lz, wave = 304)
IDL> eit_subfield, over_file=eit_file2path(file)
CALLED BY :
CALLS TO : none
ARGURMENTS : none
KEYWORDS : OLD_POINT if set, use pre recentering (sun more north) coords.
OUTPUTS : none
CALLS: ***
ANYTIM2UTC [1], ANYTIM2UTC [2], BREAK_FILE [1], BREAK_FILE [2], BREAK_FILE [3]
CW_PDMENU, DATATYPE [1], DATATYPE [2], DATATYPE [3], EIT_CATRD [1], EIT_CATRD [2]
EIT_SUBFIELD, EIT_SUB_DISP, EIT_SUB_MAN_INPUT, EIT_SUB_MDI, EIT_SUB_PRINT
EIT_SUB_TOOL, GET_UTC, RESPOND_WIDG, REVERSE, STR_SEP, UTC2TAI, XLOADCT [1]
XLOADCT [2], XLOADCT [3], XMANAGER, break_file [4], eit_catrd [3], linecolors [1]
linecolors [2]
COMMON : none
RESTRICTIONS: none
SIDE EFFECTS: none
PROJECT : SOHO - EIT
HISTORY : V1, Elaine Einfalt (HSTX)
1998 Jan - eitnfalt- added old_point keyword
V1.0.1, D.M. fecit: Spelling correction 1996/07/14
1999-march Einfalt - - passing group to more routines for V5 modal
2000-nov-27 einfalt - changed initial draw widget size from 640 to 1024
2004-jun-02 einfalt - initial draw widget to 832, macs cant grab corners off screen
CONTACT : eit@xanado.nascom.nasa.gov
[Previous]
[Next]
Project : SOHO - CDS/SUMER
Name : SUBMIT_CAP()
Purpose : Submits a CAP file to the ECS.
Explanation : This routine is used to ftp a CAP file to the ECS workstation
soc.nascom.nasa.gov.
Use : Result = SUBMIT_CAP( FILENAME )
IF NOT SUBMIT_CAP(FILENAME) THEN ...
Inputs : FILENAME = The name of the CAP file to submit. The default
directory is that given by the SOHO_CAP environment variable,
and the default extension is ".IAP".
Opt. Inputs : None.
Outputs : The result of the function is either 1 for (apparently)
successful, or 0 for not successful.
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 = SUBMIT_CAP( FILENAME, ERRMSG=ERRMSG )
IF ERRMSG NE '' THEN ...
Calls : ***
BREAK_FILE [1], BREAK_FILE [2], BREAK_FILE [3], FIND_WITH_DEF [1]
FIND_WITH_DEF [2], FIND_WITH_DEF [3], STR_SEP, break_file [4]
Common : None.
Restrictions: In order to use this routine, the user must have a file called
".netrc" in that user's home directory. This file must have
the following lines in it.
machine soc.nascom.nasa.gov
login <NAME>
password <PASSWORD>
where <NAME> and <PASSWORD> are the login information needed to
access the SOC workstation. The protection on this file should
be such that only the owner can read the file.
The file .netrc is actually a standard Unix file. However,
its use in this program is strictly as an input file to be
read by IDL. Any other directives in the file are ignored. It
has no meaning in VMS, except as an input file to this IDL
program.
Side effects: A temporary file called FTP.TEMPORARY is written to the user's
home directory. It is deleted upon exit of the program.
Category : Planning, Activity Plan.
Prev. Hist. : None.
Written : William Thompson, GSFC, 3 August 1995
Modified : Version 1, William Thompson, GSFC, 3 August 1995
Version 2, William Thompson, GSFC, 8 August 1995
Modified for changed directory on ECS computers.
Version : Version 2, 8 August 1995
[Previous]
[Next]
Project : SOHO - CDS/SUMER
Name : SUBMIT_IAP()
Purpose : Submits an IAP file to the ECS.
Explanation : This routine is used to ftp an IAP file to the ECS workstation
soc.nascom.nasa.gov.
Use : Result = SUBMIT_IAP( FILENAME )
IF NOT SUBMIT_IAP(FILENAME) THEN ...
Inputs : FILENAME = The name of the IAP file to submit. The default
directory is that given by either the CDS_IAP or SUMER_IAP
environment variable, and the default extension is ".IAP".
Opt. Inputs : None.
Outputs : The result of the function is either 1 for (apparently)
successful, or 0 for not successful.
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 = SUBMIT_IAP( FILENAME, ERRMSG=ERRMSG )
IF ERRMSG NE '' THEN ...
Calls : ***
BREAK_FILE [1], BREAK_FILE [2], BREAK_FILE [3], FIND_WITH_DEF [1]
FIND_WITH_DEF [2], FIND_WITH_DEF [3], STR_SEP, break_file [4]
CALLED BY:
XCPT
Common : None.
Restrictions: In order to use this routine, the user must have a file called
".netrc" in that user's home directory. This file must have
the following lines in it.
machine soc.nascom.nasa.gov
login <NAME>
password <PASSWORD>
where <NAME> and <PASSWORD> are the login information needed to
access the SOC workstation. The protection on this file should
be such that only the owner can read the file.
The file .netrc is actually a standard Unix file. However,
its use in this program is strictly as an input file to be
read by IDL. Any other directives in the file are ignored. It
has no meaning in VMS, except as an input file to this IDL
program.
Side effects: A temporary file called FTP.TEMPORARY is written to the user's
home directory. It is deleted upon exit of the program.
Category : Planning, Activity Plan.
Prev. Hist. : None.
Written : William Thompson, GSFC, 24 May 1995
Modified : Version 1, William Thompson, GSFC, 24 May 1995
Version 2, William Thompson, GSFC, 8 August 1995
Modified for changed directory on ECS system.
Version 3, Liyun Wang, GSFC/ARC, June 4, 1996
Modified such that the .netrc file is required
to be located in PLROOT:[SUMER_PLAN.PLAN]
for SUMER case
Modified to supress the output of spawned commands
Version 4, Zarro, GSFC, Jan 14 1997, modified to ensure
ASCII mode transfer in FTP
Version : Version 4
[Previous]
[Next]
NAME: SUBTENSE
PURPOSE: Returns the angular subtense (arc sec/pixel)
for the requested telescope
CATEGORY: REDUCTION
CALLING SEQUENCE: Result = SUBTENSE (Telescope)
INPUTS: Telescope = Number of the telescope that the
angular subtense is desired
Either (C1..C4/EIT) or (0..3)
OPTIONAL INPUTS: None
KEYWORD PARAMETERS: None
OUTPUTS: Result = angular subtense of a pixel in arc
seconds
OPTIONAL OUTPUTS: None
CALLS: ***
DATATYPE [1], DATATYPE [2], DATATYPE [3]
CALLED BY:
C2_DISTORTION, C3_DISTORTION, CALC_CME_MASS, GET_IMG_CENTER, GET_SEC_PIXEL
MAKE_FITS_HDR, STARFIELD, SYNSCAN
COMMON BLOCKS: None
MODIFICATION HISTORY: Written, RAH, NRL
Version 1 rah 5 Nov 1995
Version 2 rah 13 Apr 1996 Added test for telescope as string
Version 3 rah 6 May 1997 Changed C2 and C3 based on star transits
Version 4 sep 16 Dec 1997 Changed EIT from 2.8 to 2.59
Version 4 rah 26 Feb 1998 Changed C2 from 12.4 to 12.1
Version 5 sep 7 Apr 1998 Changed C1 from 5.6 to 5.8
Version 6 sep 28 Aug 1998 Mods for telescope being a structure
Version 7 rah 12 Nov 1998 Mods for MLO MK3 k-coronameter
Version 8 rah 20 Nov 1998 Changed C2 from 12.1 to 11.9
Version 9 dab 14 Jan 2000 Mods for MLO MK$ k-coronameter
nbr 26 Jul 2000 Use SCCS version for reduce_history common block
SCCS variables for IDL use
version= '@(#)subtense.pro 1.13 08/07/00' ; LASCO IDL LIBRARY
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
SUM_ANA_TEMP
PURPOSE:
CATEGORY:
EXPLANATION:
SYNTAX:
sum_ana_temp,
EXAMPLES:
INPUTS:
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
None.
CALLS: ***
ANYTIM2TAI, ANYTIM2UTC [1], ANYTIM2UTC [2], LABEL_TAI, SUM_HK0_T1, SUM_HK0_T2
SUM_HK0_T3
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, February 27, 1999, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
SUM_DISPERSE
PURPOSE:
Calculates the dispersion for a given line in angstrom/XDL-pixel
EXPLANATION:
This calculation uses the correct pixels size, and preduces more
accurate results that than the TDELT values listed in the FITS
headers at this time.
CALLING SEQUENCE:
delt = disperse(lambda,detector='A')
INPUTS:
lambda - wavelength in Angstroms
OPTIONAL INPUTS:
detector - detector used. Default is detector A
order - 1st or 2nd order. Default is dependent on detector:
Det A: first order >780, <780 2nd order
Det B: first order >660, <660 2nd order
As there are regions (780-805 for A and 660-750 for B) which can
be either 1st or 2nd order, it is important to specifiy
if wavelengths in these ranges are 2nd order
It is assumed that all wavelengths in a given call
are all either 1st or 2nd order
OUTPUTS:
wavelength dispersion at input wavelength
KEYWORD PARAMETERS:
Method - number of compression scheme. If not given, the user will be
prompted.
CALLS:
None
COMMON BLOCKS:
None
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
PREVIOUS HISTORY:
Written by Werner Curdt 6-Feb-95
Detector now entered as a keyword
and an array of lambdas can be entered. T. Kucera 24-Jul-96
Order now entered as a keyword. T.Kucera 7-Dec-99
[Previous]
[Next]
Project:
SOHO - SUMER
Name:
sum_FField
Purpose:
Apply flat field correction to sumer data
Use:
data_out = sum_ffield(data,slit,RefPix,FFfile)
Inputs
Data - data to be flat fielded. Can be an array of images with
the images number as the 3rd dimension if all the images are
from the same spot on the detector
Slit - Number of Slit used
RefPix = Reference CoPixel + 1 for the wavelength.
RefPix = 1023 - pixpos(header_data) + 1
FFfile - FITS file containing flat field (optional).
Keyword Inputs:
Reverse - undo Flat Field
NorthUp - set if data has been flipped so that north is up, as is
the case for data from the .fts files. Only important for
offset slits (3,5,6,8). Default is to assume that South is
at the top of the array.
Quiet - Turn off the new message about the NorthUp keyword
Keyword Output:
FF - the flat field
Output
Data_Out - Flat Fielded data
Calls: ***
FILE_EXIST [2], file_exist [1], file_exist [3], ft_sumread_fits
Common:
None
Restrictions:
This program should NOT be used on data which has been binned or
subjected to compression schemes 6 and up.
It is assumed that the data and flat field have the same North-South
orientation.
Written:
Terry Kucera, June 25, 1996
Modified:
Use of MPAE-restore files,
correct behavior for windows which extend
beyond the edge of the detector. Udo Schuehle, Feb. 11, 1998
Checks to make sure files are there. TAK July 1, 1998
Input changed to floating point to prevent round off errors.
TAK, July 1, 1999
NorthUp keyword added, FLAT keyword fixed TAK , Oct. 16, 2000
If large image format is used, flatfield
will be centered regardless of slit. US,TAK June 8, 2001
[Previous]
[Next]
Project:
SOHO - SUMER
Name:
sum_FField_FTS
Purpose:
Apply flat field correction to sumer .FTS data (created from CD_ROM)
Use:
data_out = FlatField(data,slit,RefPix,FFfile)
Inputs
Data - data to be flat fielded. Can be an array of images with
the images number as the 3rd dimension if all the images are
from the same spot on the detector
Slit - Number of Slit used
RefPix - Reference Pixel for the wavelength. Should be either
the actual reference pixel or the reference co-pixel +1
(the latter is in the binary fits header TSPIX)
FFfile - file containing flat field. Otherwise will use file closest
to observation time.
Keyword input:
Reverse - undo Flat Field
Keyword Output:
FF - the flat field
Output
Data_Out - Flat Fielded data
Calls: ***
ft_sumread_fits
Common:
None
Restrictions:
This program should NOT be used on data which has been binned or
subjected to compression schemes 6 and up.
Written:
Terry Kucera, June 25, 1996
modified:
Philippe Lemaire oct. 14,1997 to use with .FTS files
[Previous]
[Next]
Project:
SOHO - SUMER
Name:
SUM_Flatfield
Purpose:
Apply flat field correction to sumer data
Use:
data_out = sum_flatfield(data,slit,RefPix,FFdat)
Inputs
Data - data to be flat fielded. Can be an array of images with
the images number as the 3rd dimension if all the images are
from the same spot on the detector
Slit - Nuber of Slit used
RefPix = 1023 - pixpos(header_data) + 1
FFdat = variable containing flat field matrix.
Keyword input:
Reverse - undo Flat Field
Keyword Output:
FF - the flat field
Output
Data_Out - Flat Fielded data
Calls:
None
CALLED BY:
FF_GC, FF_ODDEVEN
Common:
None
Restrictions:
This program should NOT be used on data which has been binned or
subjected to compression schemes 6 and up.
Written:
Terry Kucera, June 25, 1996
Modified:
Udo Schuehle, May 11, 1998
Use of MPAE-restore files
Udo Schuehle, May 10, 2001
Accept large image formats with short slits
[Previous]
[Next]
Project:
SOHO - SUMER
Name:
SUM_GAUSSB
Purpose:
Fit data to Gaussian function using the Gaussian B compression
used on board SOHO/SUMER (compression method 12)
Use:
sum_gaussB,index,data,index_out,data_out,wavelength=wavelength,$
bte=bte,WRange=WRange
Inputs:
index - The index structure returned from rd_sumer.
data - data structrure from rd_sumer
Output:
index_out - index structure corresponding to data_out
data_out - gaussian fit parameters
Gaussian parameters:
0: Background (count/pixel)
1: Maximum (counts/pixel)
2: Centroid (pixels, Original units: pixels*100.)
3: Width (sigma in pixels, Original: sigma*0.745*100.)
Input Keywords:
BTE - array listing the BTE's wanted. Default is All.
wavelength - array listing the wavelengths wanted. Default is All
col_ind - index of collumns to fit. Supersedes BTE and wavelength
original - return results in original compression units (those
(returned is compression is used on board)
wrange - pixel range in the wavelength direction
int_pix - return the centroid in pixel value internal to the input
array. Default is to return the value in detector co-pixels.
(NOT co-pixel +1)
Calls: ***
MAKE_STR [1], MAKE_STR [2], SF_GAUSSB, SGT_CRPIX, SGT_NEWREF, SSEL_DATCOL, sgt_dims
sgt_refpix
Common:
None
Written:
Terry Kucera, 12 Aug 1996
Modifications:
Index_out now exists. UNITS and DESC are now set.
Centroid now in the co-pixel on the detector (range 0-1023) rather
than the pixel in the array 25-Sep-1996 TAK
[Previous]
[Next]
PROJECT:
SOHO - CDS/SUMER
NAME:
SUM_GET_LINELIST()
PURPOSE:
Make line list struture array
CATEGORY:
Utility
EXPLANATION:
This routine returns a structure array of line list, containing
wavelengths and names of selected lines in SUMER database.
SYNTAX:
STC = sum_get_linelist()
INPUTS:
None.
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
OUTDIR - Name of directory where an output IDL save file is written
ERROR - Named variable containing possible error message.
CALLS: ***
CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], DATATYPE [1], DATATYPE [2]
DATATYPE [3], FIND_WITH_DEF [1], FIND_WITH_DEF [2], FIND_WITH_DEF [3], SQL_QUERY
concat_dir [4]
CALLED BY:
XSPECT
COMMON:
None.
RESTRICTIONS:
Depends on SUMER Oracle database
SIDE EFFECTS:
None.
HISTORY:
Version 1, May 16, 1997, Liyun Wang, NASA/GSFC. Written
CONTACT:
Liyun Wang, NASA/GSFC (Liyun.Wang.1@gsfc.nasa.gov)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
SUM_HK0_T1()
PURPOSE:
Decode Temperature T1 from SUMER HK0
CATEGORY:
EXPLANATION:
SYNTAX:
Result = sum_hk0_t1()
CALLED BY:
SUM_ANA_TEMP
EXAMPLES:
INPUTS:
hk0 - Bytearray of Raw HK0 (bytarr(200,*))
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
None.
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
Version 1.1, March 12, 1999, Dietmar Germerott, MPAE Lindau
correct mc4t1 and selection
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
SUM_HK0_T2()
PURPOSE:
Decode Temperature T2 from SUMER HK0
CATEGORY:
EXPLANATION:
SYNTAX:
Result = sum_hk0_t2()
CALLED BY:
SUM_ANA_TEMP
EXAMPLES:
INPUTS:
hk0 - Bytearray of Raw HK0 (bytarr(200,*))
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
None.
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
Version 1.1, March 12, 1999, Dietmar Germerott, MPAE Lindau
made corrections
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
SUM_HK0_T3()
PURPOSE:
Decode Temperature T3 from SUMER HK0
CATEGORY:
EXPLANATION:
SYNTAX:
Result = sum_hk0_t3()
CALLED BY:
SUM_ANA_TEMP
EXAMPLES:
INPUTS:
hk0 - Bytearray of Raw HK0 (bytarr(200,*))
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
None.
CALLS: ***
OBT2TAI
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
None.
HISTORY:
Version 1, October 9, 1998, Dietmar Germerott, MPAE Lindau. Written
Version 1.1, March 12, 1999, Dietmar Germerott, MPAE Lindau
corrections
CONTACT:
Dietmar Germerott, MPAE Lindau (germerott@linmpi.mpg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
SUM_IMAGE_HEAD()
PURPOSE:
Decode SUMER Image Head to Structure
CATEGORY:
SUMER - DATA
EXPLANATION:
SYNTAX:
Result = sum_image_head(header [,num_of_header=num_of_header])
CALLED BY:
SUM_SHOW_HEADER
EXAMPLES:
INPUTS:
header - SUMER Image header BYTARR(92..)
OPTIONAL INPUTS:
None.
OUTPUTS:
Result - Structure or -1.0 in case of error
OPTIONAL OUTPUTS:
None.
KEYWORDS:
num_of_header - returns the number of headers
errmsg - returns the ERROR String
CALLS: ***
DATATYPE [1], DATATYPE [2], DATATYPE [3], IEEE_TO_HOST [1], IEEE_TO_HOST [2]
IEEE_TO_HOST [3], IEEE_TO_HOST [4], OBT2TAI, TAI2UTC, UTC2STR
COMMON:
None.
RESTRICTIONS:
CALL TAI2UTC, OBT2TAI, IEEE_TO_HOST, DATATYPE
The Structure Tag UTC_VMS contains a string only
if the number of headers is less 1024.
SIDE EFFECTS:
None.
HISTORY:
Version 1, December 1, 1996, Dietmar Germerott, MAPE Lindau. Written
Version 2, April 28, 1998, Dietmar Germerott, MPAE Lindau
modified ret_head.ssdet_t entry to RSC in case of format = 34,35
Version 3, August 6, 1998, Dietmar Germerott, MPAE Lindau
correct the case of only one header input - do not double
header input variable itself
Version 4, August 5, 1999, Dietmar Germerott, MPAE Lindau
added calculation of X- and Y-events
CONTACT:
Dietmar Germerott, MAPE Lindau (germerott@linax1.mpae.gwdg.de)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
SUM_SHOW_HEADER
PURPOSE:
Print the informtion of SUMER binary Headers human readable
CATEGORY:
SUMER - Header
EXPLANATION:
The binary Header is decoded via SUM_IMAGE_HEAD function and
printed on Display. You can give an array of SUMER Image
headers as input, then you'll be asked after the displaying
of each header wether you want to continue or to quit.
If F (full) or N (not full) are given as Input at this place,
the output will be with more or less additional information.
SYNTAX:
sum_show_header, inheader [,/full]
EXAMPLES:
INPUTS:
inheader - SUMER binary Header (92 to ... Bytes )
OPTIONAL INPUTS:
None.
OUTPUTS:
None.
OPTIONAL OUTPUTS:
None.
KEYWORDS:
FULL - show additional Information
CALLS: ***
SUM_IMAGE_HEAD
COMMON:
None.
RESTRICTIONS:
None.
SIDE EFFECTS:
Needs SUM_IMAGE_HEAD function
HISTORY:
Version 1, August 5, 1998, Dietmar Germerott, MPAE Lindau. Written
CONTACT:
Dietmar Germerott, MPAE Lindau (Dietmar Germerott@linmpi.mpg.de)
[Previous]
[Next]
Project:
SOHO - SUMER
Name:
SUM_TRIWARP
Purpose:
A program to do dewarp SUMER data to pixel level accuracy.
See science:[software.moran]destretch.pro for a higher
accuarcy program.
Use:
sum_triwarp,curr_image,new_image
Inputs:
curr_image - input image. Should be 1024 x 360
Output:
new_image - output corrected image.
Calls: ***
FIND_DATFILE, WARP_TRI
CALLED BY:
CALL_TRIWARP, CALL_WARP
Common:
None
Written:
Udo Schuehle? 1996
Modifications
Name change from SUMER_WARP and addition of FIND_DATFILE calls.
TAK Aug 15, 1996
[Previous]
[Next]
Project:
SOHO - SUMER
Name:
SUM_XINPUT
Purpose:
Put index and data structure information into xraster common block.
Explanation:
Designed so that data maniputlated indepemndently of xraster
can still be displayed with that tool.
Only one BTE can be input at a time, and you have to leave xraster
and run sun_xinput in order to load in a new one.
You can't save xraster data in fits files, because the original
FITS headers are not available.
Use:
sum_xinput,index,data,2
xraster,/nodata
Inputs:
Index - a sumer index structure from rd_sumer
Data - a sumer data strucuture
ext - the binary table extension (default = 1)
Output:
None
Keywords:
None
Calls: ***
SCONV_TAGNAMES, SXADDPAR [1], SXADDPAR [2], SXADDPAR [3]
[Previous]
[Next]
PURPOSE:
Fix *.img science headers when summing buffer is used
Problem: Using the summing buffers generates files with wrong FITs headers
Image 1: Sum Buffer A +, Hdr only
Image 2: Sum Buffer B +, Hdr only
Image 3: Image Buffer, Rice, Sum Buffer A, Rice, Sum Buffer B, Rice
produces
3 files with the Image 3 FITS hdr
Solution: Replace sci hdr with the proper one
CALL:
SUMBUFFIX,Root_dir,Filename,Outdir,Rep_file,Rep_hdr
INPUT:
Root_dir - directory name containing filename and rep_file
Filename - file needing new header
Outdir - output directory
Rep_file - replacement header filename
OUTPUT:
Rep_hdr - replacement header
CALLS: ***
FILEPATH
CALLED BY:
ANALYZE_IMG
EXAMPLE:
SUMBUFFIX,'/ql/raw','file1.img','/ql/fixed','hdr.img',rep_hdr
HISTORY:
Written by: Dennis Wang
@(#)sumbuffix.pro 1.1 06/28/00 : NRL IDL LIBRARY
[Previous]
[Next]
NAME:
SUMCOL
PURPOSE:
Some along columns of a matrix
CALLING SEQUENCE:
Vector = SUMCOL(A)
CALLED BY
font_size [1], font_size [2], sat_obs_loc, text_size
[Previous]
[Next]
Project : SOHO - CDS
Name : SUMDETREAD()
Purpose : Reads detector data from SUMER FITS level-1 file.
Explanation : SUMER version of CDS routine DetRead.
Based on information from DETSELECT(), read and store
detector data from the file into one contiguous array,
QLDS.DetData, with descriptors (indexes & wavelength
information) in QLDS.DetDesc(WndNo)
Use : Sumdetread,UNIT,HEADER,QLDS,SELECTION_DATA
Inputs : UNIT = Device unit associated with the FITS file
HEADER = Header (string array) of the FITS file
QLDS = The QuickLook data structure to put data into.
SELECTION_DATA = Structure from DETSELECT() with
information on windows etc.
Opt. Inputs : None.
Outputs : Places the data from the file into the QLDS.
Opt. Outputs: None.
Keywords : STATUS : Set to an initialized, named variable to
return an error message instead of crashing. If
everything's ok, a null string will be returned.
Calls : ***
FXBDIMEN [1], FXBDIMEN [2], MKSUMWDESC, READSUMCOL, STORESUMWND
CALLED BY:
READSUM2CDS
Common : None.
Restrictions: UNIT/HEADER must refer to a SUMER FITS level-1 file.
Normally used internally from READSUM2CDS.
Side effects: None.
Category : Data_Handling, I_O, CDS, SUMER, FITS, QuickLook
Prev. Hist. : Converted from DETREAD by Stein Vidar Hagfors Haugan.
Written : William Thompson, GSFC, 5 July 1996
Modified : Version 1, William Thompson, GSFC, 5 July 1996
Version : Version 1, 5 July 1996
[Previous]
[Next]
Project : SOHO - CDS
Name : SUMDETSELECT()
Purpose : Select detector data from SUMER FITS level-1 file.
Explanation : SUMER version of CDS routine DetSelect.
Figure out how much space will be needed to store all
detector data in this file into one contiguous array,
Det.DetData, and return information necessary for
SUMDETREAD to actually read the data and store them.
Use : Det = Sumdetselect(UNIT,HEADER)
Inputs : UNIT = Device unit associated with the FITS file
HEADER = Header (string array) of the FITS file
Opt. Inputs : None.
Outputs : Structure with information for DETREAD.
Opt. Outputs: None.
Keywords : SELECT : set to enable selection of some data windows
For the windows that are not selected, descriptive
information (DetDesc's) are created, but no detector
data is stored. For windows that are not selected,
ixstart will be all zeros, while ixstop will have
a negative lambda entry, but by using absolute values,
the sizes of the potential data block can be found.
Note that, as with selected data, the size of
dimension i is now: sz = abs(ixstop(i)) - ixstart(i) + 1
PRESELECTED : Array of selected windows to read in.
References the windows by their index (0..Nwindows-1)
/HEADER : Set to only read descriptive information
about detector data windows -- no data will be loaded
/AUTO : Set to force automatic, silent truncation of the data
by reading just those detector data windows that
fit below the memory limit. If the memory limit is exceeded
withouth this flag set, the user is prompted for either
setting the /HEADER flag or making a manual selection of
the data windows.
MEMLIMIT : Set to the maximum size of memory that
the detector data are allowed to occupy.
STATUS : Set to a initialized, named variable to
return an error message instead of crashing. If
everything's ok, a null string will be returned.
BACKGROUND : Structure returning the BACKGROUND
window statistics if present.
Tags AVERAGE, STDEV, MINVAL, MAXVAL. These are
arrays with dimension (EXPCOUNT,4), reflecting
the values for each exposure and quadrant.
Calls : ***
Bell, FXBFIND [1], FXBFIND [2], FXBTFORM [1], FXBTFORM [2], FXPAR [1], FXPAR [2]
MKSUMWDESC, READSUMCOL, TRIM, YES_NO
CALLED BY:
READSUM2CDS
Common : None.
Restrictions: UNIT/HEADER must refer to a CDS FITS level-1 file.
Normally used internally from READCDSFITS.
Side effects: None.
Category : Data_Handling, I_O, CDS, SUMER, FITS, QuickLook
Prev. Hist. : Converted from DetSelect by Stein Vidar Hagfors Haugan
Written : William Thompson, GSFC, 5 July 1996
Modified : Version 1, William Thompson, GSFC, 5 July 1996
Version : Version 1, 5 July 1996
[Previous]
[Next]
NAME: SUMER_ARCHIVE_DIR
Purpose:
Determine a SUMER data directory in SOHO-archive
CALLING SEQUENCE:
dir = SUMER_ARCHIVE_DIR(YEAR, MONTH)
INPUT: YEAR (integer value: e.g., 1996 or 96)
MONTH (integer value: 1,2,.., 12)
KEYWORD:
OS operating system (either 'vms' or 'unix')
if not specfied, it is set to the machine OS.
HISTORY
1998 November Chae
CALLED BY
SUMER_FILE
[Previous]
[Next]
Project : SOHO-SUMER
Name : SUMER_CALIB
Purpose : calibrate SUMER fits files
Category : SUMER data analysis
Explanation :
Syntax : sumer_calib,file,index,data OR sumer_calib,index,data
Examples :
Inputs : INDEX,DATA = Yohkoh-style index and data cube
FILE = SUMER filename to read
Opt. Inputs : None
Outputs : INDEX,DATA = Yohkoh-style index and data cube
(if FILE is used).
Opt. Outputs: None
Keywords : DESTRETCH = optional destretch image
FLAT = flatfield file name
CALLS: ***
COPY_VAR, DATATYPE [1], DATATYPE [2], DATATYPE [3], GET_SUMER_FILES, PR_SYNTAX
SUMER_FLATFIELD, rd_sumer [1], rd_sumer [2], sumer_destretch
Common : None
Restrictions: None
Side effects: None
History : Written 20 November 1998, D. Zarro (SM&A)
Contact : dzarro@solar.stanford.edu
[Previous]
[Next]
NAME: SUMER_CONFIG_DEF
PURPOSE:
Define the default SUMER configurations
Modified, 1-Dec-1998, Zarro (SM&A) -- added path to SOHO-ARCHIVE
CALLS:
CALLED BY
SUMER_FILE, SUMER_SEARCH, SUMER_SEARCH_PD_EVENT, SUMER_TOOL, SUMER_TOOL_PD_EVENT
[Previous]
[Next]
NAME:
sumer_destretch
PURPOSE:
Calls Tom Moran's destretch routine which does sub-pixel corrections
for optical distortion for SOHO/SUMER observations.
CATEGORY:
Data analysis.
CALLING SEQUENCE:
sumer_destretch,index,data
INPUTS:
The index and data structures returned from rd_sumer.
OPTIONAL INPUTS:
None.
KEYWORD PARAMETERS:
verbose: if set an explanation of destretch will be printed
and program will keep user informed of progess
OUTPUTS:
The input data is overwritten with the corrected data.
OPTIONAL OUTPUTS:
None.
CALLS: ***
BILIN_INTERP, CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], DESTR_BILIN2, LOADCT
LOC_FILE [1], LOC_FILE [2], LOC_FILE [3], REVERSE, TRIM, concat_dir [4], sgt_bin
sgt_detector, sgt_dims, sgt_range, sgt_refpix, sgt_slit
CALLED BY:
SUMER_CALIB, destr_bilin [2]
COMMON BLOCKS:
None.
SIDE EFFECTS:
None.
RESTRICTIONS:
The corrected data may correspond to a slightly different region of
the detector than was input.
PROCEDURE:
Calls destretch. If a subsection of the detector is passed as input,
the array is embedded in a full detector array and that is processed
with destretch. Information about the processing is noted in the
index structures using the OPTDIST and HISTORY tag names.
EXAMPLE:
IDL> file = "sum_960513_085055.fits"
IDL> rd_sumer,file,index,data,data_cols=[1]
IDL> flatfield,index,data
IDL> sumer_destretch,index,data
MODIFICATION HISTORY:
HPW 03-SEP-1996:
TAK 13-NOV-1996: Verbose keyword controls the DESTRETCH QUIET
keyword.
HPW 19-NOV-1996: Added check on detector.
HPW 10-OCT-1997: Fixed bug related to sgt_range.
HPW 18-DEC-1997: Modified the routine to handle files created from
both real time data and cd-rom data.
DMZ 29-DEC-1998: renamed to SUMER_DESTRETCH
[Previous]
[Next]
NAME :
SUMER_DISPLAY_IMA
PURPOSE :
Display raster image (only for XRASTER)
CALIING SEQUENCE :
SUMER_DISPLAY_IMA [,ps=ps]
INPUTS :
None
OUPUTS :
None
COMMON BLOCKS
XRASTER_WIDGET_BLOCK XRASTER_DRAW_BLOCK
RDSUMEREXT_BLOCK DROP_INDEX_BLOCK DRAW_BLOCK
XLOADCT_COM MONOCOLORS_BLOCK
IDL_vector_font_comm
KEYWORDS :
PS If set to have non-zero value, the image is
displayed on POSTCRIPT device.
CALLS: ***
ANNOTATE, CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], CONGRID [1], CONGRID [2]
CONGRID [3], LINE_PAR_CONV, MARK_ON_IMAGE, STDEV, VDF_HEIGHT, XPS_SETUP
concat_dir [4]
CALLED BY:
SUMER_TOOL, SUMER_TOOL_MAIN_EVENT, SUMER_TOOL_PD_EVENT
SIDE EFFECTS:
A Raster image is displayed either on X-window or POSTSCRIPT
REQUIRED ROUTINES:
GET_IMAGE HARDCOPY_MESSAGE
MODIFICATION HISTORY
March 1997 Jongchul Chae
[Previous]
[Next]
NAME :
SUMER_DISPLAY_SPECTRUM
PURPOSE :
Display a single spectrum image(only for XRASTER)
CALIING SEQUENCE :
SUMER_DISPLAY_SPECTRUM [,ps=ps]
INPUTS :
None
OUPUTS :
None
COMMON BLOCKS
XRASTER_WIDGET_BLOCK XRASTER_DRAW_BLOCK
RDSUMEREXT_BLOCK DROP_INDEX_BLOCK DRAW_BLOCK
XLOADCT_COM MONOCOLORS_BLOCK
IDL_vector_font_comm
KEYWORDS :
PS If set to have non-zero value, the spectrum image is
displayed on POSTCRIPT device.
CALLS: ***
CONGRID [1], CONGRID [2], CONGRID [3], IMAGE_COMPRESS, VDF_HEIGHT, XPS_SETUP
CALLED BY:
SUMER_TOOL, SUMER_TOOL_MAIN_EVENT, SUMER_TOOL_PD_EVENT
SIDE EFFECTS:
A spectrum is displayed either on X-window or POSTSCRIPT
REQUIRED ROUTINES:
HARDCOPY_MESSAGE
MODIFICATION HISTORY
March 1997 Jongchul Chae
[Previous]
[Next]
NAME :
SUMER_DISPLAY_W
PURPOSE :
Display W profile (only for SUMER_TOOL)
CALIING SEQUENCE :
SUMER_DISPLAY_W [,ps=ps]
INPUTS :
None
OUPUTS :
None
COMMON BLOCKS
XRASTER_WIDGET_BLOCK XRASTER_DRAW_BLOCK
RDSUMEREXT_BLOCK DROP_INDEX_BLOCK DRAW_BLOCK
XLOADCT_COM MONOCOLORS_BLOCK
IDL_vector_font_comm
KEYWORDS :
PS If set to have non-zero value, the w profile is
displayed on POSTCRIPT device.
CALLS: ***
GAUSS_PROFILE [1], GAUSS_PROFILE [2], VDF_HEIGHT, XGAUSSFIT, XPS_SETUP
CALLED BY:
SUMER_TOOL, SUMER_TOOL_MAIN_EVENT, SUMER_TOOL_PD_EVENT
SIDE EFFECTS:
A w profile is displayed either on X-window or POSTSCRIPT
REQUIRED ROUTINES:
HARDCOPY_MESSAGE
MODIFICATION HISTORY
March 1997 Jongchul Chae
[Previous]
[Next]
NAME : SUMER_DISTORT_COR
gives the destretched image of a SUMER spectrum
based on a bilinear interpolation scheme
CALIING SEQUENCE:
REsult=SUMER_DISTORT_COR( Data, Refw, Refy,
Refw_n, Ref_n,Detector=Detector)
INPUTS:
Data : a spectrum image
(2 D :n_spectral x n_spatial)
(3 D :n_spectral x n_spatial x n_step)
(4 D :n_spectral x n_spatial x n_step x n_line)
Refw : the column position of the lower
left corner of the spectrum on the detector plane.
0:shorter wavelength side ege,
1023 :longer wavength side edge
(Scalars) : in case of 1 line
(1 D : n_line) : in case of lines more than 1
Refy : the row position of the lower
left corner of the spectrum on the detector plane.
OUTPUTS:
Xoff_new, Yoff_new : the position of
the new corrected sprectrum on the detector
plane
OUPUTS:
DATA : distortion corrected data
with the same dimensions as the input data
KEYWORD
Detector : 'a' or 'b' ( case insensitive)
When one repeatedly calls this routine for
a set of data obtained using the same detector,
he may specify this keyword only in the first
call and omit it after the first call
since the common block DISTORT_BLOCK keeps the
distortion data for that detector.
This speeds up this routine by skipping
data reading.
CALLS: ***
BILINEAR, CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], FILE_EXIST [2]
READFITS [1], READFITS [2], READFITS [3], concat_dir [4], file_exist [1]
file_exist [3]
RESTRICTIONS :
The data files :del_x_at.fits, del_x_at.fits,
del_x_bt.fits, del_x_bt.fits
should exist in one of the directories in IDL path
HISTORY
December 1996, Jongchul CHAE
April 1997 J Chae change of routine name and arguments
[Previous]
[Next]
Name: sumer_ffdb
Purpose: create a SUMER flatfield database
Category: SUMER Data handling.
Calling Sequence: files=sumer_ffdb()
Inputs: None
Optional Inputs: None
Keywords : VERBOSE = set for messaging
SEARCH = set to reconstruct database
CALLED BY:
GET_SUMER_FLAT
Restrictions : None
CALLS: ***
BREAK_FILE [1], BREAK_FILE [2], BREAK_FILE [3], CHKLOG [1], CHKLOG [2]
CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], DATATYPE [1], DATATYPE [2]
DATATYPE [3], HAVE_PROC, LOC_FILE [1], LOC_FILE [2], LOC_FILE [3], STR_CHOP, STR_SEP
TEST_OPEN, TRIM, anytim2dd79, break_file [4], concat_dir [4], filename2time
fmt_tim [1], fmt_tim [2], rd_sumer [1], rd_sumer [2], sgt_detector
Side Effects : None
History : Written H. Warren (NRL)
Modified, 10-Jan-1999, Zarro (SMA/GSFC) -- renamed SUMER_FFDB
- added ability to search in SOHO-ARCHIVE and for compressed versions
- added ability to check for saved version off ffdb
Contact : dzarro@solar.stanford.edu
[Previous]
[Next]
NAME :
SUMER_FILE
PURPOSE :
Check and/or get SUMER data file and produce its full filename
CALLING SEQUENCE:
Result = SUMER_FILE(FILENAME)
INPUTS:
FILENAME SUMER file name (full or simple)
KEYWORDS:
STATUS is set to 1 (success) or 0 (failure)
DIRECTORY a directory or a string array of directories.
If specifed, those directories are searched.
COPY if set, the SUMER data file is copied into the
directory !sumer_config.data_dir either via FTP
or a direct copy.
REQUIRED_ROUTINES:
BREAK_FILE, SUMER_DIR
MODIFICATION HISTORY
March 1997 Jongchul Chae
April 1997 CHAE : function name chnge
November 1998 CHAE
1 December 1998, Zarro (SM&A) - added SOHO-ARCHIVE check
18 December 1998, Zarro (SM&A) -- added check for non-standard input
4 February 1999, Chae --- determine year and month in case of 'Copy'
CALLS:
CALLED BY
SUMER_PICK_FLAT, SUMER_SEARCH_PD_EVENT, SUMER_TOOL
[Previous]
[Next]
NAME :
SUMER_FITS
PURPOSE :
Read one binary table extension of a SUMER file
CALLING SEQUENCE:
data_str = SUMER_FITS(filename,exten=exten)
INPUTS:
FILENAME SUMER fits file name.
KEYWORDS :
EXTEN The exntension number of the binary table to be read
(optional input, default=1)
OUPUTS:
DATA_STR a data structure with the following fields:
FILE SUMER file name
H primary header
BH binary header
DATA an array of SUMER data
AMP count amplification factor
Note that DATA = RAW COUNT x AMP ; SUM_STATUS Image Status
DEL_TIME Relative Time of each image
EXPTIME Exposure time of each image
SOLAR_X Azimuth position of each image
SOLAR_Y Elevation position of each image
NEXT Number of binary extensions
EXTENSION The present extension number
DIM dimensions of DATA
dim(0) # of pixels along the spectral direction
dim(1) # of pixels along the slit direction
dim(2) # of repetition
sim(3) # of segments (lines)
NDATA Number of lines in DATA
DATA_NAMES specification of each line
DESCR Physicaldescription of each dimension in DATA
REFPIXELS Reference pixels
The reference pixels are the center pixels
of the spectrograms each position of which
is measured from the lower left corner of
the corresponding spectrogram, or explicitly,
refpixels(0, *) = dim(0)/2 - (dim(0) mod 2 eq 0)
refpixels(1, *) = dim(1)/2 - (dim(1) mod 2 eq 1)
Note the FITS keyword TRPIXi in the binary header of
the SUMER FITS files with the extension '.fits' are
irrelevant to these reference pixels and
the FITS keywors TRPIXi in the SUMER files with the
extension '.fts' are defined in a slightly different
way.
REFPOS Physical values at refernce pixels (from TRVALi)
The reference positions are the physical values
(wavelength and y-position) of the reference pixels.
DELTAS Physical Increments (from TDELTi)
SUMPIXELS SUMER reference co-pixels (from TSPIXi)
The SUMER reference co-pixels are the coordinates
of the reference pixels measured from the lower left
(solar North and short wavelength) corner of the
detector.
It is usually the same as the values
of the keyword TRPIXi in the binary header of
the SUMER FITS files with extension of '.fits'
and those of the keyword TRSPIXi in the binary header
of the SUMER files with extension '.fts'
However when the spectral dimension is 1024 (full
detector range), the TRPIXi in '.fits' files or
TRSPIX in '.fts' are different from SUMPIXELS.
In this case, REFPOS(0, *) should be corrected to
have
REFPOS(0,*) = REFPOS(0,*) + DELTAS(0,*)*(511. - SUMPIXELS(0,*) )
and then SUMPIXELS(*,0) should be set to 511.
Then the position of the lower left corner of each
spectrogram is given by
sumpixels(0, *)-refpixels(0,*) :spectral direction
sumpixels(1, *)-refpixels(1,*) :spatial direction
CALLS: ***
BREAK_FILE [1], BREAK_FILE [2], BREAK_FILE [3], FITS_INFO [1], FITS_INFO [2]
FXBCLOSE [1], FXBCLOSE [2], FXBFIND [1], FXBFIND [2], FXBOPEN [1], FXBOPEN [2]
FXBOPEN [3], FXBREAD [1], FXBREAD [2], FXBREAD [3], FXBTDIM [1], FXBTDIM [2]
FXPAR [1], FXPAR [2], HEADFITS [1], HEADFITS [2], HEADFITS [3], break_file [4]
CALLED BY:
SUMER_FLAT, SUMER_SERIAL, SUMER_TOOL
RESTRICTIONS:
This routine reads the primary header and only one binary
table extension of a SUMER file at a time.
REQUIRED ROUTINES:
FITS_INFO HEADFITS
FXBOPEN FXBCLOSE FXPAR FXBFIND FXBTDIM FXBREAD
MODIFICATION HISTORY
April 1997 Jongchul Chae
Sept 1998 Clarify the definition of data field: refpixels and
sumpixels
[Previous]
[Next]
NAME : SUMER_FLAT
PURPOSE : Applies flat field correction to SUMER data
CALLING SEQUENCE :
Result= SUMER_FLAT(Data, Refw, Refy, file=file, $
decorrect=decorrect)
INPUTS:
DATA : SUMER data array
Nspectral x Ny x Nstep x Nline
If DATA is a 2-d array, then Nstep=1 and Nline=1
If DATA is a 3-d array, then Nline=1
REFW : the pixel positions of the left edges
of sub spectral images measured across the
slit direction in the detector plane.
increases with wavelength
1-d array with Nline elements or a scalar
default value =0
REFY : the pixel positions of the lower edges
of sub spectral images measured along the
the slit direction in the detector plane.
increases in the S direction
(upward in the ditector).
1-d array with Nline elements or a scalar
default value=0
KEYWORD INPUTS:
FILE : SUMER flat field file name
If given, the flat image is read from this file.
Otherwise, the flat image in the common block is used.
DECORRECT If set , the data are subject the reverse
process (i.e. decorrected).
OUTPUT:
DATA : flat field (de) corrected data
HISTORY
April 1997 Jongchul Chae
CALLS:
[Previous]
[Next]
NAME :
SUMER_FULL_FILENAME
PURPOSE :
Check and make a full string of SUMER file name
CALLING SEQUENCE:
Result = SUMER_FULL_FILENAME(filename [,count=count])
INPUTS:
FILENAME SUMER file name usually without directory
KEYWORDS :
COUNT Number of existing files with the full file name
If no file exists, count=0
REQUIRED_ROUTINES:
BREAK_FILE
CALLS: ***
BREAK_FILE [1], BREAK_FILE [2], BREAK_FILE [3], break_file [4]
CALLED BY:
MK_SUMER_CAT, XRASTER [1], XRASTER [2], XSEL_PD_EVENT
RESTRICTIONS:
Works best in SUMER VMS machines.
Depends on the definition of VMS logical variables.
In other machines, this routine only checks the existence
of the file with the name FILENAME.
MODIFICATION HISTORY
March 1997 Jongchul Chae
[Previous]
[Next]
NAME :
SUMER_GIF_IMA
PURPOSE :
Make a gif version of SUMER raster images
CALIING SEQUENCE :
SUMER_GIF_IMA
INPUTS :
None
OUPUTS :
None
COMMON BLOCKS
SUMER_TOOL_BLOCK
XLOADCT_COM MONOCOLORS_BLOCK
IDL_vector_font_comm
KEYWORDS :
PS_SETUP
MODIFICATION HISTORY
March 1997 Jongchul Chae
November 1998 J. Chae
CALLS:
CALLED BY
SUMER_TOOL_PD_EVENT
[Previous]
[Next]
NAME :
SUMER_GIF_SPECTRUM
PURPOSE :
Make a GIF hardcopy of SUMER spectrograms
CALIING SEQUENCE :
SUMER_GIF_SPECTRUM
INPUTS :
None
OUPUTS :
None
CALLS: ***
CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], CONGRID [1], CONGRID [2]
CONGRID [3], IMAGE_COMPRESS, WRITE_GIF, XSELECT, XSTRUCT, concat_dir [4]
CALLED BY:
SUMER_TOOL_PD_EVENT
MODIFICATION HISTORY:
1998 Decemeber J. Chae created
[Previous]
[Next]
NAME :
SUMER_HARCOPY_SPECTRUM
PURPOSE :
Make a hardcopy of SUMER spectrograms
CALIING SEQUENCE :
SUMER_HARDCOPY_SPECTRUM
INPUTS :
None
OUPUTS :
None
COMMON BLOCKS
SUMER_TOOL_BLOCK
XLOADCT_COM MONOCOLORS_BLOCK
IDL_vector_font_comm
KEYWORDS :
PS_SETUP
MODIFICATION HISTORY
March 1997 Jongchul Chae
November 1998 J. Chae
CALLS:
[Previous]
[Next]
NAME :
SUMER_HARDCOPY_IMA
PURPOSE :
Make a hardcopy of SUMER raster images
CALIING SEQUENCE :
SUMER_HARDCOPY_IMA
INPUTS :
None
OUPUTS :
None
COMMON BLOCKS
SUMER_TOOL_BLOCK
XLOADCT_COM MONOCOLORS_BLOCK
IDL_vector_font_comm
KEYWORDS :
PS_SETUP
MODIFICATION HISTORY
March 1997 Jongchul Chae
November 1998 J. Chae
CALLS:
CALLED BY
SUMER_TOOL_PD_EVENT
[Previous]
[Next]
NAME : SUMER_PICK_FLAT
PURPOSE : Picks SUMER flat image file name
CALLING SEQUENCE :
Result = SUMER_PICK_FLAT(Filename)
INPUTS:
FILENAME SUMER fits filename
OUTPUTS:
RESULT SUMER FLAT Filename
HISTORY
Apr 97, J Chae
CALLS:
CALLED BY
SUMER_TOOL_PD_EVENT
[Previous]
[Next]
NAME :
SUMER_RASTER_SAVE
PURPOSE :
Save raster images of line parameters into a standard fits file
CALLING SEQUENCE:
SUMER
INPUTS:
None
OUPUTS:
None
CALLS: ***
FXADDPAR [1], FXADDPAR [2], FXBTDIM [1], FXBTDIM [2], FXHMAKE [1], FXHMAKE [2]
FXPAR [1], FXPAR [2], LINE_PAR_CONV, PICKFILE, WRITEFITS [1], WRITEFITS [2]
CALLED BY:
SUMER_TOOL_PD_EVENT
COMMON BLOCKS:
xraster_block
SIDE EFFECTS:
A new standard fits file is created.
REQUIRED SUBROUTINES:
fxaddpar fxhmake WRITEFITS
MODIFICATION HISTORY
May 1997 Jongchul Chae adapted from SAVE_RASTER
[Previous]
[Next]
NAME :
SUMER_REFORMAT
PURPOSE :
Reformat SUMER data for a Raster or
Temporal Sequence
CALLING SEQUENCE:
SUMER_REFORMAT, OldData, OldPos, OldNstep, $
NewDim, NewPos
INPUTS:
OldData an array of spectral images
OldNw x OldNy x OldNline
OldPOs an array of the detector coordinates of the lower left
corners of the lines
OldPos(0,*) : spectral coordinates
OldPOs(1,*) : spatial coordinates
OldNstep numer of steps for the original sequence
OUTPUTS:
NewDim a two element array of the spectrograms
NewPOs a new array of detector coordinates of the lower
left corners of the new line set
CALLED BY:
SUMER_SERIAL
HISTORY:
J. Chae 1998 Sept
[Previous]
[Next]
NAME :
SUMER_REFORMAT
PURPOSE :
Reformat SUMER data for a Raster or Temporal Sequence
CALLING SEQUENCE:
SUMER_REFORMAT, OldData, OldPos, $
NewDim, NewPos, Bin
INPUTS:
OldData an array of spectral images
OldNw x OldNy x OldNline
OldPOs an array of the detector coordinates of the lower left
corners of the lines
OldPos(0,*) : spectral coordinates
OldPOs(1,*) : spatial coordinates
OUTPUTS:
NewDim a two element array of the spectrograms
NewPOs a new array of detector coordinates of the lower
left corners of the new line set
Bin a factor for binning in the direction of repetition
(e.g.raster scan direction or temporal sequence direction)
CALLS: ***
BELONG, CW_BGROUP, CW_FIELD, SUMER_REFORMAT_EVENT, XLOADCT [1], XLOADCT [2]
XLOADCT [3], XMANAGER
CALLED BY:
SUMER_SERIAL
HISTORY:
J. Chae 1998 Sept
[Previous]
[Next]
NAME :
SUMER_SAT_COR
PURPOSE:
Apply correction for detector saturation
CALLING SEQUENCE :
data_str1 = SUMER_SAT_COR (data_str0)
INPUTS :
DATA_STR0 Input data structure (defined by SUMER_FITS)
OUTPUTS:
DATA_STR1 Output data structure
REQUIRED ROUTINES :
deadtime_cor, local_gain_cor
CALLS:
CALLED BY
SUMER_TOOL_PD_EVENT
[Previous]
[Next]
NAME: SUMER_SEARCH
PURPOSE:
Widget-based Search for SUMER fits files
CALLING SEQUENCE:
SUMER_SEARCH, filelist, catalog
INPUTS :
None
OPTIONAL OUTPUTS :
FILELIST : an array of file names
CATALOG : an array of strings for basic information
KEYWORDS :
None
COMMON BLOCKS
SUMER_SEARCH_BLOCK
REMARKS:
System variable !sumer_config should be difined.
To manipulate the variable, use the program sumer_config
REQUIRED SUNBROUTINES:
SUMER_SEARCH_MAIN_EVENT SUMER_SEARCH_PD_EVENT
MODIFICATION HISTORY
March 1997 Jongchul Chae version 1.5
November 1998 Jongchul Chae version 2.0
CALLS:
[Previous]
[Next]
This contains the common block used in the SUMER_SEARCH program.
common sumer_search_block, $
log_dir, $ ; directory of the log file
logfile, $ ; log file defined by John Mariska
sumer_dir, $ ; SUMER directory name
fits_kind, $ ; first part of SUMER file name( e.g., 'SUM_')
time1, time2, $ ; start and end times (e.g., '960101_000000' and '991231_240000')
xcen1, xcen2, $ ; east and west limits (e.g., -2000. and 2000.)
ycen1, ycen2, $ ; south and north limits (e.g., -2000. and 2000.0)
rcen1, rcen2, $ ; inner and outer limits (e.g., 0, 2000.)
wl1, wl2, $ ; 1st order wavelength limits (e.g., 600. and 1700.)
exposure1, $ ; explosure limits (e.g., 0 and 1.e5)
exposure2, $ ;
slit, $ ; slit (e.g., '1'). Optional
detector, $ ; detector (e.g., 'A' or 'B'). Optional
object, $ ; object of the observing program (e.g., 'filament'). Optional
pop, $ ; POP or UDP. optional
seq_type, $ ; Sequence Type (e.g., 'raster'). Optional
scientist, $ ; Scientist name. Optional
studyname, $ ; Study name. Optional
logs, $ ; a list of searched log structures. A working variable
files, $ ; a list of searched files. A working variable
select, $ ; a binary list of the files representing being chosen
file, $ ; One chosen file. A wortking variable
catalog, $ ; A list of basic information of the selected files
done, $ ; 0 or 1. A working variable
text_id, $ ; Text widget ID. A working varaible
list_id ; List widget ID. A working variable
[Previous]
[Next]
NAME:
SUMER_SEARCH_MAIN_EVENT
PURPOSE:
Responses to main events in SUMER_SEARCH
CALLING SEQUENCE:
SUMER_SEARCH_MAIN_EVENT, event
INPUTS:
EVENT = a structure variable for an event
OUTPUTS:
None
CALLS: ***
SUMER_SEARCH_PD_EVENT
COMMON BLOCKS:
SUMER_SEARCH_BLOCK
SIDE EFFECTS:
Change parameters defined in common blocks
REQUIRED SUBROUTINES:
None:
MODIFICATION HISTORY
March 1997 Jongchul Chae
[Previous]
[Next]
NAME:
SUMER_SEARCH_PD_EVENT
PURPOSE:
Responses to pull-down events in SUMER_SEARCH
CALLING SEQUENCE:
SUMER_SEARCH_PD_EVENT, event
INPUTS:
EVENT = a structure variable for an event
OUTPUTS:
None
CALLS: ***
BREAK_FILE [1], BREAK_FILE [2], BREAK_FILE [3], CONCAT_DIR [1], CONCAT_DIR [2]
CONCAT_DIR [3], FILE_EXIST [2], HEADFITS [1], HEADFITS [2], HEADFITS [3], JULDAY
SUMER_CONFIG, SUMER_CONFIG_DEF, SUMER_FILE, SUMER_SEARCH_DISPLAY_RESULT
SUMER_TOOL, XDISPLAYFILE [1], XDISPLAYFILE [2], break_file [4], concat_dir [4]
file_exist [1], file_exist [3], slog_rdlog [1], slog_rdlog [2]
CALLED BY:
SUMER_SEARCH_MAIN_EVENT
COMMON BLOCKS:
SUMER_SEARCH_BLOCK
SIDE EFFECTS:
Change parameters defined in common blocks
REQUIRED NON-STADNARD SUBROUTINES:
XRASTER MK_SUMER_CAT LOCATE_DIR
HEADFITS BREAK_PATH
SLOG_RDLOG SLOG_GET_DAY SLOG_GET_TIME
RESTRICTIONS :
SUMER log files should exist in the specified directory
MODIFICATION HISTORY
March 1997 Jongchul Chae
[Previous]
[Next]
NAME:
SUMER_SERIAL
PURPOSE:
Construct a single data structure from a set of SUMER files
CALLING SEQUENCE:
data_str = SUMER_SERIAL(files)
INPUTS :
FILES an array of file names
OUPUTS:
DATA_STR a data structure defined in the same as in SUMER_FITS
KEYWORDS:
REFORMAT if set, the detector plane setup ogf data
are reformatted.
CALLS: ***
FILE_EXIST [2], FXADDPAR [1], FXADDPAR [2], FXPAR [1], FXPAR [2], HEADFITS [1]
HEADFITS [2], HEADFITS [3], SUMER_FITS, SUMER_LL_POS, SUMER_REFORMAT [1]
SUMER_REFORMAT [2], SUMER_TIME, file_exist [1], file_exist [3]
CALLED BY:
SUMER_TOOL
HISTORY:
J. Chae 1998 September introduce FLAG, REFORMAT keyword
[Previous]
[Next]
NAME :
SUMER_SPECTROGRAM_SAVE
PURPOSE :
Save spectrograms into a standard fits file
CALLING SEQUENCE:
SUMER
INPUTS:
None
OUPUTS:
None
CALLS: ***
FXADDPAR [1], FXADDPAR [2], FXBTDIM [1], FXBTDIM [2], FXHMAKE [1], FXHMAKE [2]
FXPAR [1], FXPAR [2], PICKFILE, WRITEFITS [1], WRITEFITS [2], XSELECT
CALLED BY:
SUMER_TOOL_PD_EVENT
COMMON BLOCKS:
SIDE EFFECTS:
A new standard fits file is created.
REQUIRED SUBROUTINES:
fxaddpar fxhmake WRITEFITS
MODIFICATION HISTORY
May 1997 Jongchul Chae adapted from SAVE_RASTER
[Previous]
[Next]
NAME :
SUMER_TIME
PURPOSE :
Convert SUMER time string into the time of the day in seconds
CALLING SEQUENCE:
time = sumer_time(time_string, jday)
INPUTS:
TIME_STRING time string such as '1996-10-20T16:35:30.063'
OUTPUTS:
TIME time of the day in seconds
OPTIONAL OUTPUT:
JDAY Julian day
CALLS:
CALLED BY
SUMER_SERIAL
[Previous]
[Next]
NAME :
SUMER_TOOL
PURPOSE:
Widget-based display of SUMER fits data
CALLIING SEQUENCE:
SUMER_TOOL, files
INPUTS :
None
OPTIONAL INPUT:
FILES SUMER fits file names to be displayed
KEYWORDS :
EXTEN The extension nember of a FITS table in the file
to be read(optional input \ default=1).
GROUP Widge ID of group leader (optional input)
REFORMAT If set, the SUMER data are reformatted.
CALLS: ***
CW_FIELD, CW_PDMENU, FXPAR [1], FXPAR [2], GET_DFONT [1], GET_DFONT [2], LOADCT
PLOT_STYLE, SUMER_CONFIG_DEF, SUMER_DISPLAY_IMA, SUMER_DISPLAY_SPECTRUM
SUMER_DISPLAY_W, SUMER_FILE, SUMER_FITS, SUMER_GET_COLOR, SUMER_SERIAL, XMANAGER
CALLED BY:
SUMER_SEARCH_PD_EVENT
COMMON BLOCKS:
REQUIRED ROUTINES:
RDSUMEREXT XRAS_MAIN_EVENT SUMER_FULL_FILENAME
GET_COLOR DISPLAY_IMA
RESTRICTIONS :
Only one call is allowed at the same time.
MODIFICATION HISTORY
March 1997 Jongchul Chae
Novemebr 1998 JC Change Name
[Previous]
[Next]
NAME :
SUMER_TOOL_MAIN_EVENT
PURPOSE :
Responds to main events in XRASTER
CALLING SEQUENCE:
SUMER_TOOL_MAIN_EVENT, event [, group=group]
INPUTS:
EVENT an event structure variable (given by XRASTER)
OUTPUTS:
None
KEYWORDS:
GROUP widget ID of the group leader (optional input)
CALLS: ***
BELONG, LINE_PAR_CONV, MARK_ON_IMAGE, SUMER_DISPLAY_IMA, SUMER_DISPLAY_SPECTRUM
SUMER_DISPLAY_W, SUMER_TOOL_FIT_EVENT, SUMER_TOOL_PD_EVENT
COMMON BLOCKS:
XLOADCT_COM MONOCOLORS_BLOCK
SIDE EFFECTS:
Changes some variables in the common blocks
Controls various kinds of display
REQUIRED ROUTINES:
DISPLAY_IMA DISPLAY_X DISPLAY_Y DISPLAY_W
DISPLAY_SPECTRUM MARK_ON_IMAGE
MODIFICATION HISTORY
March 1997 Jongchul Chae
[Previous]
[Next]
NAME :
SUMER_TOOL_PD_EVENT
PURPOSE
Responds to pull-down events in SUMER_TOOL
CALLING SEQUENCE:
SUMER_TOOL_PD_EVENT, event [, group=group]
INPUTS:
EVENT an event structure variable (given by XRASTER)
OUTPUTS:
None
GROUP widget ID of the group leader (optional input)
CALLS: ***
CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], DELVARX [1], DELVARX [2]
DELVARX [3], DELVARX [4], FXBTDIM [1], FXBTDIM [2], FXPAR [1], FXPAR [2]
GAUSSFIT_INT, HAVE_PROC, IDL_VECTOR_FONT, IMAGE_COMPRESS, LINE_PAR_CONV
RDSUMEREXT, SUMER_CONFIG, SUMER_CONFIG_DEF, SUMER_DISPLAY_IMA
SUMER_DISPLAY_SPECTRUM, SUMER_DISPLAY_W, SUMER_DISPLAY_X, SUMER_DISTORT_DSTR
SUMER_FLAT_DSTR, SUMER_GET_COLOR, SUMER_GIF_IMA, SUMER_GIF_SPECTRUM
SUMER_HARDCOPY_IMA, SUMER_HARDCOPY_SPECTRUM, SUMER_PICK_FLAT
SUMER_RASTER_SAVE, SUMER_SAT_COR, SUMER_SPECTROGRAM_SAVE, XDEFROI
XDISPLAYFILE [1], XDISPLAYFILE [2], XFONT, XINPUT, XLOADCT [1], XLOADCT [2]
XLOADCT [3], XRASTER_HELP, XSELECT, XSTRUCT, XYINDEX, concat_dir [4], delvarx [5]
CALLED BY:
SUMER_TOOL_MAIN_EVENT
COMMON BLOCKS:
SUMER_TOOL_BLOCK
SIDE EFFECTS:
Changes some variables in the common blocks
Controls data manipulations
Controls various kinds of display
REQUIRED ROUTINES:
GET_COLOR SAVE_RASTER FLAT_FIELDING
SUM_COMPRESS1 SUM_DECOMPRESS1 IDL_VECTOR_FONT
XRASTER_HELP
DISPLAY_IMA DISPLAY_X DISPLAY_Y
DISPLAY_W
DISPLAY_SPECTRUM MARK_ON_IMAGE
MODIFICATION HISTORY
March 1997 Jongchul Chae
Feb 1999 Zarro, NASA/GSFC (added call to GET_SUMER_FLAT)
[Previous]
[Next]
NAME:
SUMMARY_PLOT
PURPOSE:
This procedure writes gif files of up to 25 browse images per file
from the list of images
CATEGORY:
UTIL
CALLING SEQUENCE:
SUMMARY_PLOT,List
INPUTS:
List: A string array of the filenames to be used
KEYWORD PARAMETERS
OUTDIR: If set, specifies the output directory to write the images to.
If not set, writes to the users' home directory
OUTPUTS:
A series of files are written.
CALLS: ***
CONGRID [1], CONGRID [2], CONGRID [3], LASCO_READFITS [1], LASCO_READFITS [2]
LOADCT, STDEV, SXPAR [1], SXPAR [2], SXPAR [3], WRITE_GIF
SIDE EFFECTS:
RESTRICTIONS:
At this time, the page size, the number of images/page, and
the image annotation is coded into the routine.
It is easy to add a branch point for different number of images
per page, i.e., 25, 36, etc. It is not clear how to change
the annotation.
PROCEDURE:
Make gifs that are 650 by 900. Portrait mode
EXAMPLE:
MODIFICATION HISTORY:
Written by: M.D. Andrews, 18 Aug 1997
Modifications:
19 Oct 1998 RAH use lasco_readfits, test for bad image
%W% %H% LASCO IDL LIBRARY
[Previous]
[Next]
NAME:
SUMROW
PURPOSE:
Some along rows of a matrix
CALLING SEQUENCE:
Vector = SUMROW(A)
CALLED BY
HXT_LOW_SUM, font_size [1], font_size [2], lcwda, sat_obs_loc, text_size
[Previous]
[Next]
NAME:
SUN
PURPOSE:
Computes geocentric physical ephemeris of the sun.
CATEGORY:
CALLING SEQUENCE:
sun, y, m, d, et
INPUTS:
y = year. in
m = month number. in
d = monthday number. in
et = ephemeris time in hours. in
Delta T = ET - UT which is not completely
predictable but is about 1 minute now.
This difference is noticable slightly.
KEYWORD PARAMETERS:
Keywords:
/LIST displays values on screen.
DIST = distance in AU.
SD = semidiameter of disk in arc seconds.
TRUE_LONG = true longitude (deg).
TRUE_LAT = 0 always.
APP_LONG = apparent longitude (deg).
APP_LAT = 0 always.
TRUE_RA = true RA (hours).
TRUE_DEC = true Dec (deg).
APP_RA = apparent RA (hours).
APP_DEC = apparent Dec (deg).
LAT0 = latitude at center of disk (deg).
LONG0 = longitude at center of disk (deg).
PA = position angle of rotation axis (deg).
CARRINGTON = Carrington rotation number.
OUTPUTS:
CALLS: ***
MONTHNAMES [1], MONTHNAMES [2], MONTHNAMES [3], RECPOL [1], RECPOL [2], RECPOL [3]
STRSEC [1], STRSEC [2], YMD2JD [1], YMD2JD [2], YMD2JD [3]
CALLED BY:
BURSTER_POSITION, STONY, ULYSSES_FEM, carr2btime [1], carr2btime [2]
get_helio_dist, hsi_sas, hsi_sas_radii_norm, plot_lat_cmd, rd_sfd_carr, ret_day
COMMON BLOCKS:
NOTES:
Notes: based on the book Astronomical Formulae
for Calculators, by Jean Meeus.
If no arguments given will prompt and list values.
MODIFICATION HISTORY:
R. Sterner, 19 Feb, 1991
24 July, 1991 --- added Carrington Rotation number
based on an equation from Howard Cohl, Sac Peak.
Copyright (C) 1991, 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.
[Previous]
[Next]
NAME:
sun2vax
PURPOSE:
Converts data written on a DEC machine to SUN format by swapping
bytes appropriately for the type of the input data.
CATEGORY:
Byte-swapping
CALLING SEQUENCE:
sun2vax,a
INPUTS:
a = input variable which is to have its bytes swapped
OPTIONAL INPUT PARAMETERS:
none
KEYWORD PARAMETERS
none
OUTPUTS:
a = reformatted variable is passed back in the original variable
CALLS: ***
ieee2vax [1], ieee2vax [2]
CALLED BY:
BFITS
COMMON BLOCKS:
None
SIDE EFFECTS:
None
RESTRICTIONS:
None.
PROCEDURE:
Determines the type of the variable and swaps the bytes depending
on the type. If the variable is a structure, the tags are
recursively searched so that the bytes are swapped throughout
the structure.
MODIFICATION HISTORY:
T. Metcalf 9/17/91 Version 1.0
Modified vax2sun.pro
[Previous]
[Next]
Project : SOHO - LASCO
Name : SUN_EPHEM()
Purpose : To calculate the solar ephemeris parameters: ecliptic
longitude, P, B0 angles and the semi-diameter.
Category : Util, Coords
Explanation : Allows for planetary and lunar perturbations in the
calculation of solar longitude and various other solar
positional parameters at date/time requested.
Uses semi-rigorous formulae to calculate the solar P (position
angle of pole) and B0 (latitude of point at disk centre) angles
and also the semi-diameter of the solar disk at the date/time
requested.
Syntax : IDL> ang = pb0r(date_time)
Examples :
Inputs : date_time - the date/time specified in any CDS format
Opt. Inputs : None
Outputs : Function returns a 6-element array with
ang(0) = nu_c (degrees)
ang(1) = nu_p (degrees)
ang(2) = P (degrees)
ang(3) = B0 (degrees)
ang(4) = R semi-diameter (arcmin)
ang(5) = Apparent longitude of
Sun (degrees).
Opt. Outputs: None
Keywords : None
CALLS: ***
ANYTIM2UTC [1], ANYTIM2UTC [2], CDS2JD, SUN_POS
Common : None
;
Side effects: None
History : Based on Fortran programs by Hohenkerk and Emerson (RGO)
16-May-94,CDS/IDL version PB0R.PRO, C D Pike, RAL,Written
Update semi-diameter calculation, CDP, 20-May-94
Version 3, William Thompson, GSFC, 14 November 1994
Modified .DAY to .MJD
Simon Plunkett, UofB, Adapted from CDS routine PB0R to
include solar longitude in output parameters, 10 May 1995.
Version 3, 14 November 1994
Contact :
[Previous]
[Next]
NAME:
sun_today
PURPOSE:
create sun_today image for showpix (guts from first_light)
read the existing genx file version by default (speed)
Calling Sequence:
sun_today, suntoday, r, g, b,/generate ; create new image (slow)
sun_today, suntoday, r, g, b ; read existing showpix copy (faster)
Input Parameters:
none
Output Parameters:
suntoday - collage of SXT and groundbase images [bytarr(850,850)]
CATEGORY:
CALLS: ***
CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], DIST, FILE_EXIST [2], HALP, LOADCT
ROT, SIGMA_FILTER, WDEF [1], WDEF [2], concat_dir [4], data_chk [1], data_chk [2]
file_exist [1], file_exist [3], fl_annotate [1], fl_annotate [2]
fl_suntoday [1], fl_suntoday [2], fl_suntoday [3], fmt_tim [1], fmt_tim [2]
get1gbo, get_info [1], get_info [2], get_info [3], get_info [4], get_logenv [1]
get_logenv [2], get_newsoon, get_rb0p [1], get_rb0p [2], gntcleen, histscale [1]
histscale [2], lastsfd [1], lastsfd [2], mk_pix [1], mk_pix [2], restgen [1]
restgen [2], rm_darklimb, savegen [1], savegen [2], scale_gbo, sxt_cen [1]
sxt_cen [2], wc_where [1], wc_where [2]
MODIFICATION HISTORY:
------- edited modification history for first_light -------
HSH, written July 1993
da 30-Apr-94, Produces collage of SXT + 4 GBO images
BNH 6-Jul-94, Changed display stuff for collage to
(hopefully) better deal with varying
background in gki, gkm images
SLF - 10-Jul-1994 Broke out collage, wrote to Z-buffer
return the collage and color table vectors
SLF - 12-Jul-1994 Scale character size (Z ne X), allow read of existing
SLF - 6-Sep-1994 Eliminate offpoint check
SLF - 15-Sep-1994 Only reposition GBO for non-offpoint images
incorporate fl_annotate (specialized)
SLF - 8-oct-1994 Call GAL's <halp.pro> to clean big bear
SLF - 9-oct-1994 Fill out ~256 pixels for better resolution
make white light temporary file.
SLF - 10-oct-1994 took out rotation of white light (FITS arrows flipped??)
SLF - 19-oct-1994 use get1gbo instead of lastgbo
SLF - 16-jan-1995 protect against no recent gbw case
SLF - 3-mar-1995 expand window (temporary fix)
SLF - 21-jun-1995 He 10830 scaling per J.Gurman/H.Jones
SLF - 5-jul-1995 verify GNT image integrity or go back in time...
SLF - 10-jul-1995 use SOON instead of BBSO (format problem)
SLF - 24-sep-1995 adjusted scaling for soon/gbh/gkm
Call histscale.pro for gbh, gkm
[Previous]
[Next]
NAME:
SUNDIST
PURPOSE:
This procedure generates two arrays whose elements are the distance
from the center of the sun and the position angle from solar north.
CATEGORY:
UTIL
CALLING SEQUENCE:
SUNDIST,Coord,Dist,Angle
INPUTS:
Coord = 4 word array containing the solar coordinates,
column center of sun,
row center of sun,
roll angle of solar north,
number of pixels per radius
KEYWORD PARAMETERS:
XSIZE = Number of columns in image, default is 1024
YSIZE = Number of rows in image, default is square matrix
OUTPUTS:
Dist = array whose elements are solar radii
OPTIONAL OUTPUTS:
Angle = array whose elements are position angle
CALLED BY:
BK, CALC_CME_MASS, IMG_COMP_DIST
MODIFICATION HISTORY:
Written by: R.A. Howard, NRL, 27 October 1995
@(#)sundist.pro 1.1 09/19/96 LASCO IDL LIBRARY
[Previous]
[Next]
NAME:
SUNGRID
PURPOSE:
To plot an overlay on coronal images with
coordinate grids on the disk and in the
corona.
CATEGORY:
PICO
CALLING SEQUENCE:
SUNGRID, P, B0, L0
INPUTS:
P: Position angle of the solar axis
B0: Latitude of the sub-terrestrial point
L0: Longitude of the sub-terrestrial point
OPTIONAL INPUT PARAMETERS:
None
KEYWORD PARAMETERS:
CENTER: gives the [x,y] coorinates of the center of
the solar disk (on which the coordinate grid
should be centered) in the image. Default is
[512,512]
NOSUN: If set, no grid will be drawn on the sun
SUNRADIUS: Factor to multiply the radius of the sun.
Default is SUNRADIUS=1. Then the sun has a
diameter of 489 pixels (corresponding to PICO)
COLOR: Color index for both grids; if COLOR is set
SUNCOLOR and CORONACOLOR are ignored.
CHARSIZE: giving the charsize of the labelling. By
default the charsize is chosen automatically.
HEADER: If an imageheader (PICO-Format!!) is given,
the P, B0 and L0
as well as the apparent solar diameter
will be automatically calculated taking the
data of header.time_obs and header.date_obs
and the EPHEMERIS procedure. The center of
the grid will be either centered on header.hole
or, if present and not [0,0,0,0] on header.sun.
GRID: If a named and not undefined variable is spe-
cified with this keyword, the existing screen
is not overplotted but the grid is returned in
this variable (by passing to the 'Z' device).
SIZE: The size of the image in pixels. Default is
[1024,1024]. If size is scalar, the image is
assumed to be quadratic.
LABEL: If set, coordinate sytems will be labeled
LATLAB: An array indicating the latitudes to be labelled.
By default: latlab=[-60,-30,0,30,60].
LABEL must be set
LONLAB: Same as for latlab. Default: intervals of 30 deg.
LABEL must be set
LATITUDES: An array indicating which latitude circles
shall be drawn. By default: each 15 degrees.
LONGITUDES: Same as for latitudes. Default: 15 degree
spaces.
OUTPUTS:
None. If grid is not set, the image displayed on the
screen will be overplotted.
OPTIONAL OUTPUT PARAMETERS:
None
CALLED BY:
LAYOUT
EXAMPLE:
grid=0
SUNGRID,26,3,155,GRID=grid,CENTER=[256,256],SIZE=512, $
PIXELDIAMETER=370
The named variable grid contains a (512,512) byte array
with the solar grid, centered on [256,256]. The solar disk
has a diameter of 370 Pixels.
CALLS: ***
EPHEMERIS [1], EPHEMERIS [2]
COMMON BLOCKS:
None
SIDE EFFECTS:
A displayed image will be overplotted
RESTRICTIONS:
Up to now, the procedure only works for non-scalable
devices (X, WIN, Z etc.) and not yet for the PS-device.
However Parts of the solar disk can be drawn! The entire
grid has not to be drawn anymore.
PROCEDURE:
Straightforward using the map drawing facilities
MAP_SET and MAP_GRID of IDL. The procedure is highly
adapted to PICO instrumental parameters.
V2.0 Does not use the MAP functions anymore in order
to be able to draw the equator instead of the central
latitude circle on the disk
MODIFICATION HISTORY:
Written V1.0 16-OCT-1994 Pic Du Midi
V2.0 Completely self written without IDL-functions MAP_GRID
and MAP_SET: 10-APR-1996 Alexander Epple, MPAE Lindau
[Previous]
[Next]
Project : SOHO - CDS
Name : SUNSIZE_DEMO
Purpose : Demonstrate apparent size/position of sun each day.
Explanation : Demonstrates the estimated size of the sun based on an analysis
of the daily SYNOP_F scans. Two plots are made: the first is
the ratio of the size of the sun relative to the expected size,
and the second is the offset of the calculated sun center from
the assumed sun center. The dates when the pointing
calibration was changed in the database are marked as vertical
dashed lines. The sun center positions from before April 16
are too high because the spacecraft pointing was different
then.
Use : IDL> sunsize_demo
Inputs : None
Opt. Inputs : None
Outputs : None
Opt. Outputs: None
Keywords : None
Calls : None
Common : None
Restrictions: None
Side effects: None
Category : Calibration, pointing
Prev. Hist. : None
Written : William Thompson, GSFC, 21 August 1996
Modified : Version 1, William Thompson, GSFC, 21 August 1996
Version 2, CDP, Use CDS_UTPLOT. 9-Jan-97
Version 3, Use standard UTPLOT, increase character size. CDP,
12-Sep-97
Version : Version 3, 12 September 1997
[Previous]
[Next]
Project : SOHO - CDS
Name : SUNVIEW
Purpose : Switch to SunView mode.
Explanation : SETPLOT is called to save and set the system variables.
Use : SUNVIEW
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. : William Thompson
Written : William Thompson, GSFC.
Modified : Version 1, William Thompson, GSFC, 27 April 1993.
Incorporated into CDS library.
Version 2, William Thompson, GSFC, 21 October 1993.
Renamed to SUNVIEW.
Version : Version 2, 21 October 1993.
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
SUNY()
PURPOSE:
Return Sun Coordinate Y
CATEGORY:
EXPLANATION:
SYNTAX:
Result = suny()
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)
[Previous]
[Next]
PROJECT:
SOHO - SUMER
NAME:
SUNZ()
PURPOSE:
Return Sun Coordinate Z
CATEGORY:
EXPLANATION:
SYNTAX:
Result = sunz()
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)
[Previous]
[Next]
Name: sw2tree
Purpose: distribute files in path into Yohkoh SW tree.
original purpose is for atest
Input Parameters:
path - input pathname (default=/ys/atest/soft)
Keyword Parameters
olderthan - age of files to afect - only files older than this
interactive - if set, user can specify action for files not on line
testing - if set, no commands are actually spawned
History: slf, 4-Feb-1993
slf, 7-Feb-1993 ; delete, user input options
slf, 13-may-1993 ; asthetic details
slf, 26-oct-1993 ; clean up not online file
CALLS: ***
ATEST2TREE, BREAK_FILE [1], BREAK_FILE [2], BREAK_FILE [3], CONCAT_DIR [1]
CONCAT_DIR [2], CONCAT_DIR [3], FILE_EXIST [2], SPLIT_FILES, break_file [4]
concat_dir [4], file_append [1], file_append [2], file_exist [1], file_exist [3]
mk_mapfile [1], mk_mapfile [2], path_sw [1], path_sw [2], prstr [1], prstr [2]
wmenu_sel [1], wmenu_sel [2]
Restrictions: unix only, user generally requires root priviledge
[Previous]
[Next]
NAME:
SW_NE
PURPOSE:
This function returns the electron density in the solar wind for
the input solar radii values
CATEGORY:
DATA ANALYSIS
CALLING SEQUENCE:
Result = NE_SW(RSUN, NE1AU)
INPUTS:
RSUN: the radial distance (in solar radii) to compute the electron
density
OPTIONAL INPUTS:
NE1AU: the electron density at 1 AU. If not specified, a value of
7.2/cm3 is used
KEYWORD PARAMETERS:
None
OUTPUTS:
This function returns the electron density in particles/cm3
OPTIONAL OUTPUTS:
None
CALLS: ***
NE_SW
COMMON BLOCKS:
None
SIDE EFFECTS:
None
RESTRICTIONS:
None
PROCEDURE:
Uses the results from Leblanc, Dulk, Bougeret (Solar Physics, v183,
pp165-180 (1998) who give the functional form of the electron
density as a function of solar radius. The result is scaled to
a value of 7.2 particles per cubic centimeter at 1 AU. The function
was determined by radio Type III bursts.
EXAMPLE:
neprofile = NE_SW (Rsun,10)
Rsun is an array of solar radii
10 is the electron density at 1 AU
MODIFICATION HISTORY:
Written by: R.A. Howard, NRL 10 June 2004.
%W% %H% LASCO IDL LIBRARY
[Previous]
[Next]
SWABI returns byte-swapped values for INTEGER and LONG data types.
Usage: Result=swabi(num) where num may be a scalar or array
-EMH 15-DEC-1988
modified Jul. 1992 by IZ
CALLED BY
FITSRD
[Previous]
[Next]
NAME:
SWAP
PURPOSE:
Procedure to swap bytes
CALLING SEQUENCE:
SWAP,X
INPUT:
X - variable to be byte swapped. Can be BYTE, INTEGER*2 or INTEGER*4.
The order of the bytes will be reversed. For a byte array,
the number of bytes should be even and every other byte will be
swapped.
REVISION HISTORY:
Written D. Lindler 1986
Converted to version 2 IDL B. Pfarr, STX, 1/90 added code to
swap bytes in byte array
19-May-93 (MDM) - Made the INDGEN statement a LINDGEN to handle
large arrays.
CALLED BY
EDITFRAME, PTEST, XEDITFRAME
[Previous]
[Next]
NAME:
SXADDHIST
PURPOSE:
Procedure to add history line(s) to FITS header
CALLING SEQUENCE
sxaddhist, history, header
INPUTS:
history - string or string array containing history line(s)
to add to the header
header - string array containing the FITS header
OUTPUTS:
header - unpdated header
CALLED BY:
FITS_CD_FIX, FTKEEPROW, FTSORT, GETPSF, GSSS_STDAST, HASTROM, HCONGRID, HEULER, HEXTRACT
HPRECESS, HROTATE, PUTAST, TABLE_CALC, T_APER, T_FIND, T_GETPSF, T_GROUP, T_NSTAR
WFPC2_READ
EXAMPLES:
sxaddhist, 'I DID THIS', header
hist = strarr(3)
hist(0) = 'history line number 1'
hist(1) = 'the next history line'
hist(2) = 'the last history line'
sxaddhist, hist, header
HISTORY:
D. Lindler Feb. 87
April 90 Converted to new idl D. Lindler
Put only a single space after HISTORY W. Landsman November 1992
[Previous]
[Next]
NAME:
SXADDPAR
PURPOSE:
Add or modify a parameter in a FITS header array.
CALLING SEQUENCE:
sxaddpar, Header, Name, Value, Comment, [ Location,
BEFORE =, AFTER = , FORMAT= ]
INPUTS:
Header = String array containing FITS header. Max string length must be
equal to 80. If not defined, then SXADDPAR will create an
empty FITS header array.
Name = Name of parameter. If Name is already in the header the value
and possibly comment fields are modified. Otherwise a new
record is added to the header. If name = 'HISTORY' then the
value will be added to the record without replacement. In
this case the comment parameter is ignored.
Value = Value for parameter. The value expression must be of the
correct type, e.g. integer, floating or string. String values
of 'T' or 'F' are considered logical values.
OPTIONAL INPUT PARAMETERS:
Comment = String field. The '/' is added by this routine. Added
starting in position 31. If not supplied, or set equal to
'', then the previous comment field is retained (when found)
Location = Keyword string name. The parameter will be placed before the
location of this keyword. This parameter is identical to
the BEFORE keyword and is kept only for consistency with
earlier versions of SXADDPAR.
OPTIONAL INPUT KEYWORD PARAMETERS:
BEFORE = Keyword string name. The parameter will be placed before the
location of this keyword. For example, if BEFORE='HISTORY'
then the parameter will be placed before the first history
location. This applies only when adding a new keyword;
keywords already in the header are kept in the same position.
AFTER = Same as BEFORE, but the parameter will be placed after the
location of this keyword. This keyword takes precedence over
BEFORE.
FORMAT = Specifies FORTRAN-like format for parameter, e.g. "F7.3". A
scalar string should be used. For complex numbers the format
should be defined so that it can be applied separately to the
real and imaginary parts.
OUTPUTS:
Header = updated FITS header array.
CALLED BY:
ATV, CREATE_NRH_CFILE, CREATE_NRH_PFILE, DISPLOI_MON5K, EXTGRP, FITS_ADD_CHECKSUM
FITS_CD_FIX, FITS_READ, FITS_WRITE, FTADDCOL, FTCREATE, FTDELCOL, FTDELROW, FTHMOD
FTKEEPROW, FTPUT, GETPSF, GSSS_STDAST, HASTROM, HBOXAVE, HCONGRID, HEXTRACT, HPRECESS
HREBIN, HREVERSE, HROT, HROTATE, INTGCOMP_NRH2, IRAFRD, MKHDR [1], MKHDR [2], MODFITS
PUTAST, RDPSF, READFITS [1], READFITS [2], READFITS [3], READFITSL, RFITS2 [1]
RFITS2 [2], RH_GET_HEADER, RH_RDIMCUBE, SUM_XINPUT, SXHMAKE, SXHWRITE, SXMAKE
TAB_READ, TBDELCOL, TBDELROW, T_APER, T_FIND, T_GETPSF, T_GROUP, T_NSTAR, WFPC2_READ
WRITEFITS [1], WRITEFITS [2], WRITE_FLUXNRH, WRITE_POSINRH, WRITE_SUMMARIES [2]
ZDEGR, ZGETPLUME, ZMKHDR, ZPICK, cal_pol, imcalc, las_auto_exp, mk_limb_pixmap
mk_mdi_fits, mk_minim, mk_stdim, mk_stdim_hdr, mk_stdim_list, poly_diffim
raw_list2pixmap, read_mdi, scan4limb, sda2fits, zd4, zoverlay [1], zoverlay [2]
zreadfits, zregister_eit, zstructify, zwritefits
RESTRICTIONS:
Warning -- Parameters and names are not checked
against valid FITS parameter names, values and types.
MODIFICATION HISTORY:
DMS, RSI, July, 1983.
D. Lindler Oct. 86 Added longer string value capability
Converted to NEWIDL D. Lindler April 90
Added Format keyword, J. Isensee, July, 1990
Added keywords BEFORE and AFTER. K. Venkatakrishna, May '92
[Previous]
[Next]
NAME:
SXDELPAR
PURPOSE:
Procedure to delete a keyword parameter(s) from a FITS header
CALLING SEQUENCE:
sxdelpar, h, parname
INPUTS:
h - FITS header, string array
parname - string or string array of keyword name(s) to delete
OUTPUTS:
h - updated header
CALLED BY:
CDS_SIMPLE_FITS, CHECK_FITS [1], CHECK_FITS [2], FITS_CD_FIX, FITS_OPEN, FITS_READ
FITS_WRITE, FXHCLEAN [1], FXHCLEAN [2], GSSS_STDAST, HCONGRID, HREBIN, INTGCOMP_NRH2
NRH_HSI_FITS, PUTAST, RH_GET_HEADER, SXIG12_PREP, T_FIND, WCS_HCLEAN, WRITEFITS [1]
WRITEFITS [2], WRITE_FLUXNRH, WRITE_POSINRH, WRITE_SUMMARIES [2], ZPICK
mk_stdim_hdr, zstructify
EXAMPLE:
Delete the astrometry keywords CDn_n from a FITS header, h
IDL> sxdelpar, h, ['CD1_1','CD1_2','CD2_1','CD2_2']
NOTES:
(1) No message is returned if the keyword to be deleted is not found (
(2) All appearances of a keyword in the header will be deleted
HISTORY:
version 1 D. Lindler Feb. 1987
Converted to new IDL April 1990 by D. Lindler
[Previous]
[Next]
NAME:
SXPAR
PURPOSE:
Obtain the value of a parameter in a FITS header
CALLING SEQUENCE:
result = SXPAR( hdr, name,[ abort, COUNT= ])
INPUTS:
Hdr = FITS header array, (e.g. as returned by SXOPEN or READFITS)
string array, each element should have a length of 80
characters
Name = String name of the parameter to return. If Name is of
the form 'keyword*' then an array is returned containing
values of keywordN where N is an integer. The value
of keywordN will be placed in RESULT(N-1). The data type
of RESULT will be the type of the first valid match of keywordN
found.
OPTIONAL INPUTS:
ABORT - string specifying that SXPAR should do a RETALL
if a parameter is not found. ABORT should contain
a string to be printed if the keyword parameter is not found.
If not supplied SXPAR will return with a negative
!err if a keyword is not found.
OPTIONAL KEYWORD OUTPUT:
COUNT - Optional keyword to return a value equal to the number of
parameters found by sxpar, integer scalar
OUTPUTS:
Function value = value of parameter in header.
If parameter is double precision, floating, long or string,
the result is of that type. Apostrophes are stripped
from strings. If the parameter is logical, 1 is
returned for T, and 0 is returned for F.
If Name was of form 'keyword*' then a vector of values
are returned.
CALLS: ***
STRNUMBER [1], STRNUMBER [2], STRNUMBER [3], STRNUMBER [4]
CALLED BY:
ABSCAL, ADXY, ARCBAR, ATV, CDSHEADFITS, COORD [1], CURVAL, ELLIPSE_MAILLE, EXTGRP
FITS CLASS DEFINITION, FITS_ADD_CHECKSUM, FITS_CD_FIX, FITS_INFO [1]
FITS_INFO [2], FITS_OPEN, FITS_READ, FITS_TEST_CHECKSUM [1]
FITS_TEST_CHECKSUM [2], FITS_WRITE, FTAB_HELP, FTDELROW, FTHELP, FTINFO, FTKEEPROW
FTSIZE, FXMOVE [1], FXMOVE [2], GET_EQUINOX, GET_LIST, GSSSEXTAST, GSSS_STDAST
HASTROM, HBOXAVE, HCONGRID, HEADFITS [3], HEXTRACT, HREBIN, IMCONTOUR, IMDBASE, IRAFRD
MKDI_C1, MKMOVIE_kpd, MKQUERY, MODFITS, MOVIE_MAKER, NSTAR, OVSA2MAP, Open Packet File
Open Score File, PB_INVERTER, POINTING3, PUTAST, RDPSF, READFITS [1], READFITS [2]
READFITS [3], READFITSL, READ_COMPRESSED, REDUCE_IMG_HDR2
Radio Astronomy Group Fits Read, ST_DISKREAD, ST_DISK_DATA, ST_DISK_GEIS
ST_DISK_TABLE, SUBSTAR, SUMMARY_PLOT, SXGINFO, SXGPAR, SXI_021_HDR [1], TAB_WRITE
TBDELROW, TBHELP, TBINFO, TBSIZE, TVLASER, T_APER, T_FIND, T_GETPSF, T_NSTAR, VALIDCDSHEAD
WFLIMB, WFPC2_METRIC, WFPC2_READ, WRITEFITS [1], WRITEFITS [2], WSAVE_PS [2], ZDEGR
ZGETPLUME, ZPICK, ZPRINTSUN, cal_fig_mich, cal_fig_pol, check_dumps [1]
disp_sci160k [1], disp_sci160k [2], disp_sci5k, display_ovsamap, dpc_img_summary
edac_summary, exp_scale min_exp max_exp [1], fits_disp_month [1]
fits_disp_month [2], fp_iwcw, fpc1_phot, get_linearity sig e_min e_max
getl05hdrparam, imagr [1], ipcom, is_fits [1], is_fits [2], las_auto_exp
las_exp_norm, ltc, mask_out, mdi_comp_eff, mdipict, mk_ascii_list, mk_dpc_image
mk_mdi_fits, mk_minim, mk_stdim, mk_stdim_hdr, mk_stdim_list, mon_health [1]
mon_health [2], monitor_center [1], new_disp_sci5k [1], new_disp_sci5k [2]
new_edac_summary, new_mon_health [1], new_mon_health [2], od_bright
polariz_display, poly_diffim, read_ltc file, read_mdi, sxpar2 [1], sxpar2 [2]
wrt_sci160k_img, wsave1, wsave2, xdisp_tfr, zd4, zoverlay [1], zoverlay [2], zprfits
zreadfits, zregister_eit, zstructify, zwritefits
SIDE EFFECTS:
Keyword COUNT returns the number of parameters found.
!err is set to -1 if parameter not found, 0 for a scalar
value returned. If a vector is returned it is set to the
number of keyword matches found.
If a keyword occurs more than once in a header, a warning is given,
and the first occurence is used.
EXAMPLES:
Given a FITS header, h, return the values of all the NAXISi values
into a vector. Then place the history records into a string vector.
IDL> naxisi = sxpar( h ,'NAXIS*') ; Extract NAXISi value
IDL> history = sxpar( h, 'HISTORY' ) ; Extract HISTORY records
PROCEDURE:
The first 8 chacters of each element of Hdr are searched for a
match to Name. The value from the last 20 characters is returned.
An error occurs if there is no parameter with the given name.
If a numeric value has no decimal point it is returned as type
LONG. If it contains more than 8 numerals, or contains the
character 'D', then it is returned as type DOUBLE. Otherwise
it is returned as type FLOAT
MODIFICATION HISTORY:
DMS, May, 1983, Written.
D. Lindler Jan 90 added ABORT input parameter
J. Isensee Jul,90 added COUNT keyword
W. Thompson, Feb. 1992, added support for FITS complex values.
W. Thompson, May 1992, corrected problem with HISTORY/COMMENT/blank
keywords, and complex value error correction.
[Previous]
[Next]
NAME:
sxpar2
PURPOSE:
Allow a 2-D array to have the keyword extracted
SAMPLE CALLING SEQUENCE:
out = sxpar2(h, 'REFTIME')
CALLS: ***
SXPAR [1], SXPAR [2], SXPAR [3], data_type [1], data_type [2]
CALLED BY:
mon_health [1], mon_health [2], new_mon_health [1], new_mon_health [2]
HISTORY:
Written 23-May-96 by M.Morrison
[Previous]
[Next]
Name: sxt2eit
Purpose: align SXT image to EIT
Calling Sequence:
sxtaligned=sxt2eit(sxtfits, eitfits)
History: proto-version, 23-jan-1996
CALLS: ***
CONGRID [1], CONGRID [2], CONGRID [3], EIT_PIXSIZE, FILE_EXIST [2], FXPAR [1]
FXPAR [2], READFITS [1], READFITS [2], READFITS [3], ROT, coal_image, data_chk [1]
data_chk [2], eit_getlimb, file_exist [1], file_exist [3], fmt_tim [1]
fmt_tim [2], gt_pix_size
Restrictions:
only full sun EIT and SXT , simple FITS for now
[Previous]
[Next]
Name:
SXTKaySea
Purpose:
Find and return the indics of data-vector "idx" which
satisfy keyed search.
CALLING SEQUENCE:
idxList = SXTKaySea( idx, item, op, val, [op2=op2,
val2=val2, op3=op3, val3=val3])
INPUT:
idx Structured data-vector to be searched
item string which is associated with a field name
of the input data-vectors (sxtp, sxtf, etc).
op operator for search
val search value
op2&3 2nd and third operators if present
val2&3 2nd and third values if present.
RETURNED:
a success list of indices from idx
CALLS: ***
MskExpLev, MskImg, MskPer, ReqExpVal, ReqImgVal, ReqPerVal [1], ReqPerVal [2]
CALLED BY:
KeySea [1], KeySea [2], KeySearch
History:
Alpha ver. 1.0a written 24-Apr-1991 by GAL to--
test some ideas for keyed searches of SXT data-base
records (e.g. roadmap and sxt observing log).
15-May-91, updated for use with KeySearch routine.
1-Aug-91, added ObsRegion key.
5-Aug-91, ver 2.0a, changed order of formal parameters
and added op/vals 2&3 to allow for additional
search keys (e.g. shape_cmd, FOV_center).
7-Oct-91, updated search tag check list.
16-Oct-91, updated tests for valid items
17-Oct-91, added ImgParam search keys
17-Jan-92, update FOV.
[Previous]
[Next]
Project : SOHO - CDS
Name : SYNOP_STAB_DEMO
Purpose : Demonstrate further temperature/wavecal effects.
Explanation : The mean centroid of the OV 630A line is plotted for a
number of synoptic rasters. It is shown that the line
changes during the series of rasters and that the start
position is dependent upon the thermal history of the CDS
in the few hours prior to the start of the synoptic
observations. By the end of the synoptic series, the CDS
has stabilised and the centroid is reproduced with a sigma
of about 0.01 pixels.
Use : IDL> synop_stab_demo
Inputs : None
Opt. Inputs : None
Outputs : None
Opt. Outputs: None
Keywords : None
Calls : ***
AVERAGE, CIRCLE_SYM, STDEV
Common : None
Restrictions: None
Side effects: None
Category : Calibration
Prev. Hist. : None
Written : C D Pike, RAL, 13-Nov-96
Modified :
Version : Version 1, 13-Nov-96
[Previous]
[Next]
Project : SOHO - CDS
Name : SYNOPTIC_STATS
Purpose : Demonstrates statistics from daily synoptic scans.
Explanation :
Use : IDL> synoptic_stats
Inputs : None
Opt. Inputs : None
Outputs : None
Opt. Outputs: None
Keywords : CALIB - use calibrated data instead of raw.
WINDOW - specify which wavelength window (default all)
RASTER - specify which raster (default all nine)
OVER
YR
Calls : ***
CIRCLE_SYM, CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], OUTPLOT [1]
OUTPLOT [2], OUTPLOT [3], STR2UTC [1], STR2UTC [2], STR2UTC [3], TRIM, UTPLOT [1]
UTPLOT [2], UTPLOT [3], UTPLOT [4], UTPLOT [5], UTPLOT [6], YES_NO, concat_dir [4]
Common : None
Restrictions: None
Side effects: None
Category : Engineering
Prev. Hist. : None
Written : C D Pike, RAL, 25-Jul-96
Modified : Change utplot name. CDP, 2-Oct-96
Cut out bias level plot - done elsewhere. CDP, 13-Nov-96
Version : Version 3, 13-Nov-96
[Previous]
[Next]
NAME:
SYNSCAN
PURPOSE:
This routine scans an image file and creates a
constant radius scan for synoptic maps.
CATEGORY:
REDUCTION
CALLING SEQUENCE:
SYNSCAN,Filename
INPUTS:
Filename: Ascii string of the name of the
FITS file
OPTIONAL INPUTS:
None
KEYWORD PARAMETERS:
None
OUTPUTS:
None
OPTIONAL OUTPUTS:
None
CALLS: ***
FXADDPAR [1], FXADDPAR [2], FXPAR [1], FXPAR [2], GET_UTC, OCCLTR_CNTR, READFITS [1]
READFITS [2], READFITS [3], SUBTENSE, WRITEFITS [1], WRITEFITS [2]
check_imgdir [1], check_imgdir [2]
COMMON BLOCKS:
None
SIDE EFFECTS:
Creates a FITS file of the constant radius
scans in the current directory
RESTRICTIONS:
The directory containing the FITS file should
be the local directory or !imgdir should be set
to point to the directory
PROCEDURE:
EXAMPLE:
MODIFICATION HISTORY:
Written by: RA Howard, NRL, 26 Nov 1995.
Version 1 26 Nov 95 Initial Release
Version 2 13 Apr 96 Modified for keywords
@(#)synscan.pro 1.2 01/19/00 LASCO IDL LIBRARY
[Previous]
[Next]
Name: sysprint
Purpose: test use of ys system variables for printer control
Input Paramters:
filename - file to print (substitute for FILENAME in print command)
Keyword Parameters
pers - if set, personal print command is selected
site - if set, site specific print command is selected
font - if set, substitute for FONT in print command
History:
slf - 4-feb-1993
CALLS: ***
sprint, str_replace [1], str_replace [2]
Restrictions:
system varialbes must be defined first (via ys_defsysv.pro)
[Previous]
[Next]
Name: syst2ex
Purpose: return current time in yohkoh db terms
slf, 6-mar-92 from existing routines
CALLS:
CALLED BY
adsdirs [1], adsdirs [2], ccd_sunc [1], ccd_sunc [2], check_process [1]
check_process [2], cnvtimstr, diskbench, goes_gaps, goes_plot [1], goes_plot [2]
goes_plot [3], goes_plot [4], goes_plot [5], goes_summary, last_lc, launch [1]
launch [2], mk_ydbtape [1], mk_ydbtape [2], rdtbl
[Previous]
[Next]
Name:
systime2
Purpose:
Returns the current system time
Calling sequence:
string_var = systime2()
Method:
This is a unix specific routine.
Spawns unix date command with a format list. This routine
gets around the problem of IDL returning the wrong time even if the
kernal as not been built correctly.
CALLED BY:
SUMM_CALS, WOBS_PLOT, WR_FULL_LOAD, plot_ssw_fov
Modification History:
Written, 10-dec-91, J. R. Lemen