Describe PACS/CUSPVscripts/SPEC spu setup here.= SPEC_spu_setup =

// Purpose       : Condition SPU for SPECtroscopy observations
//
// CUS author    : Diego Cesarsky
//
// Description   : Sets values for compression mode,
//                 threshold values (glitch, chopper, grating), raw
//                 channel transmission, sub-ramp and detector
//                 constants, load DPU time and restart SPU. Script
//                 sets its own delays [sec] and returns the total
//                 duration in milliseconds. This version addresses
//                 BLU and RED; could make a BLU only and RED only version
//
// Comments      : Based on V1.3 of TM's tm_spu_setup.tcl. Both
//                 SPUS and SPUL are initialized to same set of parameters
//
// Version         1.0
// History       : 0.1 13-Aug-2004 First creation
// 0.2  8-Oct-2004 Added separate variables for SPUL and
//                                 SPUS. Return duration.
//                                 Editorial changes (DAC)
// 0.3 12-Oct-2004 Reviewed after simplification of
//                                 SPEC_spu_reset. Remove
//                                 redundant/useless TCs. Removed "delay"
//                                 statements
// 0.4 13-Oct-2004 Error in Pacs_SPUx_RAW_CHAN_TRAN_MODE:
//                                 second parameter should be spuX_nraw.
//                                 Added boolean START to be able to use
//                                 this procedure in SPEC_orbit_prologue
//                                 which DOES NOT start the SPU
// 0.5 21-Oct-2004 Moved xx_RAW_CHAN_TRAN_MODE below
//                                 WRT_DET_CST_SPEC to follow HF's setup script
// 0.6 18-Mar-2005 Redone to follow line by line TM's script,
//                                 Added several comments
// 0.7 10-Apr-2006 Parameter set has been changed for
//                 Pacs_SPUL_WRT_DET_CST_SPEC and      (RV)
//                 Pacs_SPUS_WRT_DET_CST_SPEC commands (comply w/SPU HLSW v12.1)
//                 "spu_par" has been changed, new parameters have been added:
//                  - "reor", Reordering algorithm
//                  - "llcs", Lossless compression algorith
//                  - "ords", Range for the PACS codec
//                 Changes based on SetupSpectroscopyWEplusFPUsim.tcl v2.8
// 0.8  3-jul-2006 Remove duration references
// 0.9  9-aug-2006 update of WRT_DET_CST_SPEC
// 0.91  29-aug-2006 TM: update of WRT_DET_CST_SPEC (SPU OBSW V12.8), new default values
// 0.92  06-dec-2006 TM: update of WRT_DET_CST_SPEC (SPU OBSW V12.8.1), new default values
// 1.0   28-mar-2007 DAC Update for SPU V13.x
//

Input variable(s):

procedure SPEC_spu_setup {
    int comp_mode_blu = 16;       // Compression mode blue channel
    int comp_mode_red = 16;       // Compression mode red channel
    int nb_samp_subramp_blu = 16; // Nb of blue samples per sub-ramp
    int nb_samp_subramp_red = 16; // Nb of red samples per sub-ramp
    int nb_raw_spu_blu = 3;       // Nb of raw channels transmitted by SPUS
    int nb_raw_spu_red = 3;       // Nb of raw channels transmitted by SPUL
    int glitch_det = 1;           // Glitch detection; 0=on; 1=off
    int ramp_fit_alg = 1;         // Ramp fit algorithm [0=LstSq;1=mean value]
    bool startSPU = true;         // Start SPU or not [true,false]
}{