!--------------------------------------------------------------------  
! for Science format, 20 bytes per minor frame for 16 minor frames   
!   Selectable telemetry byte and Phase angle values ,               
!   Format ID byte and Colletion format byte from every   
!   minor frame will also be accumulated                             
! Total for science Format, 320 bytes + 16 bytes + 32 bytes          
!   +16 bytes +16 bytes = 400    
! for ADC format, 320 bytes + 51 "extra" bytes + 2 byte Sun Pulse    
!   phase angle + 22 bytes Sun Sensor data + 17 bytes spare +        
!   16 bytes Selectable telemetry byte + 32 bytes Phase angle        
!   +16 Format ID +16 Colletion format   
! Total for ADC Format, 320 + 51 + 2 + 22 + 17 + 16 + 32 = 492 bytes   
! in ADC mode   
! Only the first Selectable telemtry byte, and the first Phase angle   
! will be reported, the rest 15 Selectable telemtry bytes and Phase   
! angle values will be zeroed                                         
! Same for Format ID and Colletion format bytes   
! The values LastSPTT8, SunPulPhaAng{0/8}, will be zeroed for ADC format   
! LastSPTT0 will be the sun pulse time tag value in ADC format   
! Both formats will have the value of the S/C clock reported as well.   
!--------------------------------------------------------------------  

      structure /SCHskpData/

      integer*4  sc_clk  

!--- following 20 bytes hskp items appear in mn_frm 0 in sci_fmt ---  

      integer*1 TankA1Temp        ! Propellant Tank A1 Temperature   
      integer*1 TankA2Temp        ! Propellant Tank A2 Temperature   
      integer*1 TankB1Temp        ! Propellant Tank B1 Temperature   
      integer*1 TankB2Temp        ! Propellant Tank B2 Temperature   
      integer*1 LinesATemp        ! Internal Lines A Temperature     
      integer*1 LinesBTemp        ! Internal Lines B Temperature     
      integer*1 LinesPosXTemp     ! External Lines +X Temperature    
      integer*1 LinesNegXTemp     ! External Lines -X Temperature    
      integer*1 StarTrkTemp       ! Star Tracker Temperature         
      integer*1 InstDeckTemp1     ! Instrument Deck Temperature #1   
      integer*1 InstDeckTemp2     ! Instrument Deck Temperature #2   
      integer*1 InstDeckTemp3     ! Instrument Deck Temperature #3   
      integer*1 InstDeckTemp4     ! Instrument Deck Temperature #4   
      integer*1 InstDeckTemp5     ! Instrument Deck Temperature #5   
      integer*1 InstDeckTemp6     ! Instrument Deck Temperature #6   
      integer*1 InstDeckTemp7     ! Instrument Deck Temperature #7   
      integer*1 InstDeckTemp8     ! Instrument Deck Temperature #8   
      integer*1 LastSPTT0(3)      ! 24 bits, Last SP TT=4 Mnr Frm, ...   

!--- following 20 bytes hskp items appear in mn_frm 1 in sci_fmt ---  

      integer*1 ScIFHeaterCur     ! Spacecraft Specific I/F Heater Current   
      integer*1 SunSnsrTemp       ! Sun Sensor (-X/-Y Side) Temperature   
      integer*1 PosXSAPTemp       ! +X Solar Array Panel Temperature   
      integer*1 PosXSAPHTemp      ! +X Solar Array Panel Hinge Temperature   
      integer*1 NegXSAPTemp       ! -X Solar Array Panel Temperature   
      integer*1 NegXSAPHTemp      ! -X Solar Array Panel Hinge Temperature   
      integer*1 MagInTemp         ! Magnetometer Inboard Temperature   
      integer*1 MagOutTemp        ! Magnetometer Outboard Temperature   
      integer*1 MagInHtrPwrLvl    ! Mag Inboard Heater Power Level   
      integer*1 MagOutHtrPwrLvl   ! Mag Outboard Heater Power Level   
      integer*1 S3DPUPwrCvtVolt   ! S3 DPU Power Conveter Voltage   
      integer*1 PwrSubProACur     ! Power Subsystem Processor A Current   
      integer*1 PwrSubProBCur     ! Power Subsystem Processor B Current   
      integer*1 AxialThrstCur     ! Axial Thruster Current   
      integer*1 Channel25         ! 0-50mV Channel #25   
      integer*1 Channel26         ! 0-50mV Channel #26   
      integer*1 Channel20         ! 0-5V Channel #20   
      integer*1 Channel30         ! AD590 Channel #30   
      integer*1 DigTellLog0       ! Digital Telltale logic byte 0   
      integer*1 DigTellLog1       ! Digital Telltale logic byte 1   

! --- next 20 bytes from min frame 2 --   

      integer*1 data_2_1(16) 		  ! first 16 bytes of min frm 2 hskp   
      integer*1 MagSenIntTempPosY         ! Mag +Y Sensor interface temp   
      integer*1 MagSenIntTempNegY         ! Mag -Y Sensor interface temp   
      integer*1 data_2_2(2) 		  ! last 2 bytes of min frm 2 hskp   

! --- next 20 bytes from min frame 3 --   

      integer*1 data_3_1(10) 		    ! 10 bytes of min frm 3 hskp   
      integer*1 MainBusCur                  ! Main bus curent   
      integer*1 MainBusVolt                 ! Main bus voltage   
      integer*1 data_3_2(8) 		    ! last 8 bytes of min frm 3 hskp   

! --- next 20 bytes from min frame 4 --   

      integer*1 data_4_1(20) 		    ! 20 bytes of min frm 4 hskp   

! --- next 20 bytes from min frame 5 --   

      integer*1 data_5_1(20) 		    ! 20 bytes of min frm 5 hskp   

! --- next 20 bytes from min frame 6 --   

      integer*1 data_6_1(20) 		    ! 20 bytes of min frm 6 hskp   

! --- next 20 bytes from min frame 7 --   

      integer*1 data_7_1(20) 		    ! 20 bytes of min frm 7 hskp   

! --- next 20 bytes from min frame 8 --   

      integer*1 data_8_1(17)   ! 17 bytes of min frm 8 hskp   
      integer*1 LastSPTT8(3)   ! 24 bits, Last SP TT=4 Mnr Frm, ...   

! --- next 20 bytes from min frame 9 --   

      integer*1 SwepamE_8VPSMon   ! SWEPAME +8 V Power Supply monitor   
      integer*1 SwepamE_HVMon1    ! SWEPAME HVMON1-subcommed over 8 mj frames   
      integer*1 SwepamE_HVMon2    ! SWEPAME HVMON2-subcommed over 8 mj frames   
      integer*1 SwepamI_8VPSMon   ! SWEPAMI +8 V Power Supply monitor   
      integer*1 SwepamI_HVMon1    ! SWEPAMI HVMON1-subcommed over 8 mj frames   
      integer*1 SwepamI_HVMon2    ! SWEPAMI HVMON2-subcommed over 8 mj frames   
      integer*1 Epam_A1           ! EPAM Analog A1, Int/Ext Cal Readout   
      integer*1 Epam_A2       ! EPAM Analog A2, subcommed over 8 mj frames   
      integer*1 Epam_A3       ! EPAM Analog A3, subcommed over 8 mj frames   
      integer*1 Epam_A4           ! EPAM Analog A4, Input Current Monitor   
      integer*1 Epam_LAN1         ! EPAM LAN 1, Electronics temp thermistor   
      integer*1 Epam_LAN2A        ! EPAM LAN 2A, Electronics temp thermistor   
      integer*1 Epam_LAN2B        ! EPAM LAN 2A, Sensor temp thermistor   
      integer*1 Uleis_LVPSVolt    ! ULEIS LVPS Voltage   
      integer*1 Cris_IntTemp1     ! CRIS Internal Temp #1   
      integer*1 Cris_IntTemp2     ! CRIS Internal Temp #2   
      integer*1 Sis_IntTemp1      ! SIS Internal Temp #1   
      integer*1 Sis_IntTemp2      ! SIS Internal Temp #2   
      integer*2 SunPulPhaAng0  ! Phase angle latched with Sun Pulse in mn frm 0

! --- next 20 bytes from min frame 10 --   

      integer*1 data_10_1(2)  
      integer*1 data_10_2       
      integer*1 Cris_Cur        ! CRIS current including detector bias   
      integer*1 Sis_Cur         ! SIS current including detector bias   
      integer*1 Epam_Cur        ! EPAM current   
      integer*1 Epam_HtrCur     ! EPAM heater current   
      integer*1 Uleis_Cur       ! ULEIS current   
      integer*1 Uleis_AnaEleLVPSCur   ! ULEIS current, Analog Electronics LVPS
      integer*1 DCM1_Chan21     ! DCM1 0-50mV channel 21   
      integer*1 Uleis_HtrCur    ! ULEIS Heater current   
      integer*1 SwepamE_Cur     ! SWEPAM electron current   
      integer*1 SwepamI_Cur     ! SWEPAM ion current   
      integer*1 Swims_Cur       ! SWIMS current   
      integer*1 Swics_Cur       ! SWICS current   
      integer*1 Sepica_Cur      ! SEPICA current   
      integer*1 Mag_Cur         ! MAG current (DPU A, DPU B, Heater)   
      integer*1 S3DPU_Cur       ! S3DPU current    
      integer*1 data_10_3(2)  

! --- next 20 bytes from min frame 11 --   

      integer*1 PowSwiOrdBit(14)   ! Power switching and ordinance bits - may   
			           ! decide to do all 112 items individually 
                                   ! later   
      integer*1 data_11_1(4)  
      integer*1 S3DPU_ConSecCur  ! S3DPU Converter Secondary Current   
      integer*1 PreTraCur        ! Pressure Transducer Current   

! --- next 20 bytes from min frame 12 --   

      integer*1 Swims_IntTemp    ! SWIMS Internal Temp   
      integer*1 Swics_IntTemp    ! SWICS Internal Temp   
      integer*1 Uleis_TelTemp    ! ULEIS Telescope Temp   
      integer*1 Uleis_AnaEleTemp ! ULEIS Analog Electronics Temp   
      integer*1 Uleis_DPUTemp    ! ULEIS DPU Temp   
      integer*1 Sepica_IsoTanTemp  ! SEPICA Isobutane Tank temp   
      integer*1 S3DPU_PowSupATemp  ! S^3 DPU Power supply A temp   
      integer*1 SwepamE_IntTemp    ! SWEPAM Electron Internal Temp   
      integer*1 SwepamI_IntTemp    ! SWEPAM Ion Internal Temp   
      integer*1 StarScan(8)        ! Star Scanner data   
      integer*1 TermBoardFuse1Temp    
      integer*1 data_12_1  
      integer*1 S3DPU_PowSupBTemp  ! S^3 DPU Power supply B temp   

! --- next 48 bytes from min frame 13 14 & 15--   

      integer*1 CDH_HKdat(48)  

! --- next 12 bytes from min frame 15--   

      integer*1 data_15_1(10)  
      integer*2 SunPulPhaAng8   ! Phase angle latched with Sun Pulse 
                                ! in mn frm 8   

! these total 80 bytes are Selectable Telemtry Byte, Format ID,   
! Collection format and Science format phase angle data.   
! ADC format will have only the first values, others are zeroed   

      integer*1  SelTelByt(16)   ! Selectable Telemtry Byte   
      integer*2 SCIPhaAng(16)    ! Science Format phase angle data   
      integer*1  FormatID(16)    ! FormatID:4, SunSenTop:1,SunSenSide:1,
                                 ! C&DH ID:2  
      integer*1  CollForm(16)    ! CollFormat:1, mjfrm:3,mnfrm:4   

! Found in ADC format only   

      integer*2 ADCPhaAng        ! ADC format phase angle value   
      integer*2 SunSensor(11)    ! 11 sun sensor values   
      integer*1 ADCXtrDat(51)    ! 51 bytes of data found only in ADC format   
      integer*1 spare(17)        ! 17 bytes of unallocated data in ADC format   

      end structure