FUNCTION define_L3TLGC ; Dòfinition 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,'Altitude' ,-2,10,'meters' ,1. , 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'N. Obs. [Dec1]', 1,14,'no unit',1. , 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'Opt. Th.[Dec1]', 2,15,'no unit',0.002 , 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'Ang.Coef[Dec1]', 1,17,'no unit',0.014 , 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'Aer.Ind.[Dec1]', 2,18,'no unit',0.002 , 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'Opt.Th.Fix[D1]', 2,20,'no unit',0.002, 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'N. Obs. [Dec2]', 1,22,'no unit',1. , 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'Opt. Th.[Dec2]', 2,23,'no unit',0.002 , 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'Ang.Coef[Dec2]', 1,25,'no unit',0.014 , 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'Aer.Ind.[Dec2]', 2,26,'no unit',0.002 , 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'Opt.Th.Fix[D2]', 2,28,'no unit',0.002, 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'N. Obs. [Dec3]', 1,30,'no unit',1. , 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'Opt. Th.[Dec3]', 2,31,'no unit',0.002 , 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'Ang.Coef[Dec3]', 1,33,'no unit',0.014 , 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'Aer.Ind.[Dec3]', 2,34,'no unit',0.002 , 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'Opt.Th.Fix[D3]', 2,36,'no unit',0.002, 0. , 0,0,0} & N=N+1 U_par[ N] = {parametre,'MM Numb. Obs.' , 1,38,'no unit',1. , 0. , 0,0,0} & N=N+1 U_par[ N] = {parametre,'MM Fine OptThi', 2,39,'no unit',0.002 , 0. , 0,0,0} & N=N+1 U_par[ N] = {parametre,'MM Angstrom' , 1,41,'no unit',0.014 , 0. , 0,0,0} & N=N+1 U_par[ N] = {parametre,'MM Aer. Index' , 2,42,'no unit',0.002 , 0. , 0,0,0} & N=N+1 U_par[ N] = {parametre,'MM Opt.Th.Fix' , 2,44,'no unit',0.002 , 0. , 0,0,0} & N=N+1 U_par[ N] = {parametre,'Gen Mod OT Min', 2,46,'no unit',0.002 , 0. , 0,0,0} & N=N+1 U_par[ N] = {parametre,'Gen Mod OT 1st', 2,48,'no unit',0.002 , 0. , 0,0,0} & N=N+1 U_par[ N] = {parametre,'Gen Mod OT Med', 2,50,'no unit',0.002 , 0. , 0,0,0} & N=N+1 U_par[ N] = {parametre,'Gen Mod OT 3rd', 2,52,'no unit',0.002 , 0. , 0,0,0} & N=N+1 U_par[ N] = {parametre,'Gen Mod OT Max', 2,54,'no unit',0.002 , 0. , 0,0,0} & N=N+1 U_par[ N] = {parametre,'Aer Ind Min' , 2,56,'no unit',0.002 , 0. , 0,0,0} & N=N+1 U_par[ N] = {parametre,'Aer Ind 1st' , 2,58,'no unit',0.002 , 0. , 0,0,0} & N=N+1 U_par[ N] = {parametre,'Aer Ind Med' , 2,60,'no unit',0.002 , 0. , 0,0,0} & N=N+1 U_par[ N] = {parametre,'Aer Ind 3rd' , 2,62,'no unit',0.002 , 0. , 0,0,0} & N=N+1 U_par[ N] = {parametre,'Aer Ind Max' , 2,64,'no unit',0.002 , 0. , 0,0,0} & N=N+1 U_par[ N] = {parametre,'Fix Mod OT Min', 2,66,'no unit',0.002 , 0. , 0,0,0} & N=N+1 U_par[ N] = {parametre,'Fix Mod OT 1st', 2,68,'no unit',0.002 , 0. , 0,0,0} & N=N+1 U_par[ N] = {parametre,'Fix Mod OT Med', 2,70,'no unit',0.002 , 0. , 0,0,0} & N=N+1 U_par[ N] = {parametre,'Fix Mod OT 3rd', 2,72,'no unit',0.002 , 0. , 0,0,0} & N=N+1 U_par[ N] = {parametre,'Fix Mod OT Max', 2,74,'no unit',0.002 , 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'F.Ang.coef.cl1', 1,76,'no unit',0.01 , 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'F.Ang.coef.cl2', 1,77,'no unit',0.01 , 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'F.Ang.coef.cl3', 1,78,'no unit',0.01 , 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'F.Ang.coef.cl4', 1,79,'no unit',0.01 , 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'F.ref.ind.cl1' , 1,80,'no unit',0.01 , 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'F.ref.ind.cl2' , 1,81,'no unit',0.01 , 0. , 0,0,0} & N=N+1 ;U_par[ N] = {parametre,'F.ref.ind.cl3' , 1,82,'no unit',0.01 , 0. , 0,0,0} & N=N+1 Nu_par = N U_par = U_par[0:N-1] ;-------------------------------------------------------------------------------- ; 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:'L3TLGC',resol:6,Nbyte_tot:83,Nbyte_nd:83,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