	FUNCTION OBLI(T)
C	
C	SOUS PROGRAMME DE CALCUL DE L'OBLIQUITE MOYENNE DE
C	L'ECLIPTIQUE OBLI A LA DATE T EN ANNEE TROPIQUE
C	OBLI SORT EN SECONDES D'ARC VALABLE AVANT 1984
C
	T0=1900.
	TG=(T-T0)/100.
	TG2=TG*TG
	TG3=TG2*TG
	OBLI=84428.26-46.844*TG-0.006*TG2+0.00183*TG3
	RETURN
	END

