FUNCTION define_L3TOGC
; Definition des parametres non directionnels
Nu_par = 99  ;  Nombre
N = 0
U_par = replicate({parametre},Nu_par) ; Definition of Un directional products
;U_par[ N] = {parametre,'D1 Numb. Obs.',1,17,'no unit',1.   ,0.  ,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'D1 Tau.      ',2,18,'no unit',2.E-3,0.  ,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'D1 Fine OptTh',2,20,'no unit',2.E-3,0.  ,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'D1 Angstrom  ',2,22,'no unit',0.01 ,-0.5,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'D1 Fine Angst',2,24,'no unit',0.01 ,-0.5,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'D1 Aer.Index ',2,26,'no unit',2.E-3,0.  ,  0,0,0} & N=N+1
;
;U_par[ N] = {parametre,'D2 Numb. Obs.',1,28,'no unit',1.   ,0.  ,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'D2 Tau.      ',2,29,'no unit',2.E-3,0.  ,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'D2 Fine OptTh',2,31,'no unit',2.E-3,0.  ,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'D2 Angstrom  ',2,33,'no unit',0.01 ,-0.5,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'D2 Fine Angst',2,35,'no unit',0.01 ,-0.5,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'D2 Aer.Index ',2,37,'no unit',2.E-3,0.  ,  0,0,0} & N=N+1
;
;U_par[ N] = {parametre,'D3 Numb. Obs.',1,39,'no unit',1.   ,0.  ,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'D3 Tau.      ',2,40,'no unit',2.E-3,0.  ,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'D3 Fine OptTh',2,42,'no unit',2.E-3,0.  ,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'D3 Angstrom  ',2,44,'no unit',0.01 ,-0.5,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'D3 Fine Angst',2,46,'no unit',0.01 ,-0.5,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'D3 Aer.Index ',2,48,'no unit',2.E-3,0.  ,  0,0,0} & N=N+1

U_par[ N] = {parametre,'MM Numb. Obs.',1,50,'no unit',1.   ,0.  ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM Nb.Obs.opt',1,51,'no unit',1.   ,0.  ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM Opt. Thick',2,52,'no unit',2.E-3,0.  ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM Fine OptTh',2,54,'no unit',2.E-3,0.  ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM Angstrom  ',2,56,'no unit',0.01 ,-0.5,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM Fine Angst',2,58,'no unit',0.01 ,-0.5,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM Aer.Index ',2,60,'no unit',2.E-3,0.  ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM Tau.app865',2,62,'no unit',2.E-3,0.  ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM Tau.ags865',2,64,'no unit',2.E-3,0.  ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM Tauagns865',2,66,'no unit',2.E-3,0.  ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM Tau.agc865',2,68,'no unit',2.E-3,0.  ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM ID.       ',1,70,'no unit',4.E-3,0.  ,  0,0,0} & N=N+1

U_par[ N] = {parametre,'MM Tau_min'   ,2,71,'no unit',2.E-3 ,0. ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM Tau_1st_q' ,2,73,'no unit',2.E-3 ,0. ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM Tau_median',2,75,'no unit',2.E-3 ,0. ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM Tau_3rd_q' ,2,77,'no unit',2.E-3 ,0. ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM Tau_max'   ,2,79,'no unit',2.E-3 ,0. ,  0,0,0} & N=N+1

U_par[ N] = {parametre,'MM FTau_min' ,2,81,'no unit',2.E-3 ,0. ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM FTau_1st_q',2,83,'no unit',2.E-3 ,0. ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM FTau_median',2,85,'no unit',2.E-3 ,0. ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM FTau_3rd_q',2,87,'no unit',2.E-3 ,0. ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM FTau_max'  ,2,89,'no unit',2.E-3 ,0. ,  0,0,0} & N=N+1

U_par[ N] = {parametre,'MM Ang_1.Norm',1,91,'no unit',0.01      ,0. ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM Ang_2.Norm',1,92,'no unit',0.01      ,0. ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM Ang_3.Norm',1,93,'no unit',0.01      ,0. ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM Ang_4.Norm',1,94,'no unit',0.01      ,0. ,  0,0,0} & N=N+1

U_par[ N] = {parametre,'MM Ang_1pNorm',1,95,'no unit',0.01      ,0. ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM Ang_2pNorm',1,96,'no unit',0.01      ,0. ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM Ang_3pNorm',1,97,'no unit',0.01      ,0. ,  0,0,0} & N=N+1
U_par[ N] = {parametre,'MM Ang_4pNorm',1,98,'no unit',0.01      ,0. ,  0,0,0} & N=N+1

;U_par[ N] = {parametre,'MM mp.s1.Norm',1,99,'no unit',0.01      ,0. ,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'MM mp.s2.Norm',1,100,'no unit',0.01       ,0. ,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'MM mp.s3.Norm',1,101,'no unit',0.01       ,0. ,  0,0,0} & N=N+1
;
;U_par[ N] = {parametre,'MM mg.s1.Norm',1,102,'no unit',0.01       ,0. ,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'MM mg.s2.Norm',1,103,'no unit',0.01       ,0. ,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'MM mg.s3.Norm',1,104,'no unit',0.01       ,0. ,  0,0,0} & N=N+1
;
;U_par[ N] = {parametre,'MM Ae.beam.m1',1,105,'no unit',0.01       ,0. ,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'MM Ae.beam.m2',1,106,'no unit',0.01       ,0. ,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'MM Ae.beam.m3',1,107,'no unit',0.01       ,0. ,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'MM Ae.beam.m4',1,108,'no unit',0.01       ,0. ,  0,0,0} & N=N+1
;
;U_par[ N] = {parametre,'MM Ae.beam.m1p',1,109,'no unit',0.01      ,0. ,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'MM Ae.beam.m2p',1,110,'no unit',0.01      ,0. ,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'MM Ae.beam.m3p',1,111,'no unit',0.01      ,0. ,  0,0,0} & N=N+1
;U_par[ N] = {parametre,'MM Ae.beam.m4p',1,112,'no unit',0.01      ,0. ,  0,0,0} & N=N+1

U_par = U_par[0:N-1] & Nu_par=N
;--------------------------------------------------------------------------------
; Dòfinition des parametres directionnels
Nd_par = 0   ;  Number of directional products
D_par = {parametre}
;--------------------------------------------------------------------------------
; Dòfinition des combinaisons non-directionnels
Nc_par = 0    ;  Number of Multi-parameter non directional
C_par = {combi}
;--------------------------------------------------------------------------------
; Dòfinition des combinaisons "directionnel"
Ncd_par = 0    ;  Number of Multi-parameter non directional
Cd_par = {combi}
;
product={type:'L3TOGC',resol:6,Nbyte_tot:113,Nbyte_nd:113,Nbyte_d:0,Nu_par:Nu_par,U_par:U_par,Nd_par:Nd_par,D_par:D_par,$
         Nc_par:Nc_par,C_par:C_par,Ncd_par:Ncd_par,Cd_par:Cd_par}
RETURN,product
END