FUNCTION CMAROT(DMJD,TRI,KPAR) 

****** ENGLISH ******

CORRECTION TO ADD TO UT1,DURATION OF THE DAY OR ANGULAR VELOCITY (VALUE OF KPAR : 1 2 3 ) 
TO FREE THEM OF THE EFFECT OF ZONAL TIDES THE PARAMETER TRI ALLOWS TO CHOOSE THE RETAINED 
WAVES SET TRI(I) = 1 TO RETAIN THE WAVE NUMBER I SET TRI(I) = 0 TO IGNORE IT 

****** FRANCAIS ****** 

CORRECTIONS A AJOUTER A UT1(KPAR=1) EN SECONDES DELTA(KPAR=2) EN SECONDES OMEGA(KPAR=3) 
EN 10**-14 RAD/S POUR LES LIBERER DE L EFFET DES MAREES TERRESTRES ZONALES A LA 
DATE DMJD (MJD), REAL*8 

SELON YODER ET AL. 1981,JGR 86,B2,881-891, TABLE1 

LE TABLEAU TRI PERMET DE CHOISIR LES TERMES A PRENDRE EN COMPTE : OUI SI TRI(I)=1 NON SI 
TRI(I)=0 ,I=1,62