Changeset 651 in Sophya for trunk/Poubelle/archediab.old/archeops.h

Timestamp:

Nov 25, 1999, 3:05:04 PM (26 years ago)

Author:

ansari

Message:

archediab 29

File:

• trunk/Poubelle/archediab.old/archeops.h (modified) (2 diffs)

trunk/Poubelle/archediab.old/archeops.h

@@ -390 +390 @@
 /*  ---------   structures N° 2 :  reglage_bolo , regul etc..   --------        */
 /*  ------------------------------------------------------------------------------------------  */
-#define bol_micro_volt(val,gain)        ((1e7*(double)val)/(65536.*gain))
-/*  avec  gain = (double)parametr.bolo[bolo].bolo_gain*gain_ampli(reglage.bolo[bolo])                           */
-                
-
-/* gains 0 .. 15 pour MLPA  ///   gain 16..19  pour BEBO   ///   gain 20..22  pour BEDIF        */              
-#define def_gains       double gains_reels[32]={1,2,4,8,10,20,40,80,100,200,400,800,1000,2000,4000,8000,0.5,2.5,10,50,0.93,3.777,18.974};
-                /*                      gain bediff    10->9.3    40->37.77     200->189.74             */
 
 
 /*  les definitions suivantes s'appliquent a une variable de type    reglage.bolo[bol]          */
 #define         gainbrut(aa)    ((char)(((aa).mot1&0x1f)))              
-#define         gain_ampli(aa)  gains_reels[gainbrut(aa)]               
 #define         phase(aa)       ((char)(((aa).mot1&0x60)>>5))           
 #define         comm(aa)        ((char)(((aa).mot1&0x80)>>7))           
@@ -585 +577 @@
 
 
-/*      signification des bit lus dans switch_dil       */
-#define switch_EVF              0x00000080      /*      contact fin de course vanne fermee      */
-#define switch_EVO              0x00000040      /*      contact fin de course vanne ouverte     */
-
-/* les bit suivants sont envoyés par telecommande et relus dans switch_dil      */
-#define switch_helium           0x00200000      /*  13: commande sond niveau helium     */
-#define switch_pile_par_5       0x00100000      /*  12: mise en parallele des piles pour le 5V  */
-#define switch_pile_par_15      0x00080000      /*  11: mise en parallele des piles pour le 15V */
-#define vanne_EVB               0x00008000      /*  7: commande vanne brooks    */
-#define vanne_EVO               0x00010000      /*  8: commande vanne EVO       */
-#define vanne_EVV               0x00020000      /*  9: commande vanne EVV       */
-#define vanne_EVF               0x00040000      /*  10: commande vanne EVF      */
-#define chauffage1              0x00004000      /*  6: chauffage 1      */
-#define chauffage2              0x00002000      /*  5: chauffage 1      */
-#define chauffage3              0x00001000      /*  4: chauffage 1      */
-#define chauffage4              0x00000800      /*  3: chauffage 1      */
-#define chauffage5              0x00000400      /*  2: chauffage 1      */
-#define chauffage6              0x00000200      /*  1: chauffage 1      */
-#define chauffage7              0x00000100      /*  0: chauffage 7      */
-
-enum{nbit_chauffage7,nbit_chauffage6,nbit_chauffage5,nbit_chauffage4,nbit_chauffage3
-        ,nbit_chauffage2,nbit_chauffage1,nbit_vanne_EVB,nbit_vanne_EVO
-        ,nbit_vanne_EVV,nbit_vanne_EVF,nbit_switch_pile_par_15,nbit_switch_pile_par_5,nbit_switch_helium};
-
-/*  position des mesures sur les multiplexeurs          */
-/* J10A  ->  temperatures basses t_b1 t_b2,t_b3 t_b4 36 37 41 35        */ 
-/* J10B  ->  temperatures basses t_a1 t_a2,t_a3 t_a4 38 11 34 28        */ 
-/* J1??  ->  temperatures hautes t_h1 t_h2,t_h3 t_h4    */ 
-
-enum{
-/* multiplex11..18:*/   t_a2    ,mul12_ ,p_haut ,p_memb ,t_h1   ,t_h4   ,t_h3   ,t_h2   
-/* multiplex21..28:*/,  mul21_  ,mul22  ,p_charb,p_R4   ,mul25_ ,p_C3   ,p_R3   ,t_a4   
-/* multiplex31..38:*/,  mul31_  ,p_C4   ,p_air  ,t_a3   ,t_b4   ,t_b1   ,t_b2   ,t_a1   
-/* multiplex41..48:*/,  t_b3    ,d_4He  ,RP_He  ,t_pile ,d_3He  ,j_he3  ,j_he7  ,j_he4  
-/* multiplex51..58:*/,  j_he5   ,j_he1  ,j_he8  ,j_he2  ,j_he6  ,pirani ,mul57  ,mul58  
-/* multiplex61..68:*/,  p_m18B  ,p_10B  ,p_m18D ,mul64  ,p_p18B ,p_10T  ,p_Ch   ,p_p18D         
-        };
-/* reste libres :  mul   12 - 21 - 22 - 25 -  31 - 44 - 57 - 58 - 64    */
-/* T_A1 EST AUSSI LE DRIVER DU MOTEUR DE PIVOT   */
-
-#define  val_multiplex(qq)      (0.0003052*(double)((qq)-0x8000))       
-#define  val_temperature(qq)    ((val_multiplex(qq)<0.2)?-99:((1146.3/(val_multiplex(qq)-0.1)) - 245.13))
-
-
 /*  ---------------------   structures N° 4 :     gps           ------------------------------- */
 /*  ------------------------------------------------------------------------------------------- */