C+
C NAME:
C	TIMECOORD
C RESTRICTIONS:
C	Contains executable statements
C PROCEDURE:
C	This include file converts the time interval into evenly spaced time steps in Days
C-
	XCtfrac(I)= 1.*(I-1)/nT1
        XCtvar(X) = 1+(X-XCtbeg)/(XCtend-XCtbeg)*nT1	! CV -> time interval
	XCtfull(I)= XCtbeg + XCtfrac(I)*(XCtend-XCtbeg)

	Itvar(X) = max(1,min(nT,nint(X)))	! time interval -> longitude interval index 

	TC = 2.2756158e-4			! 1/Light travel speed in AU/CR
	TCD= 172.83441				! 1/Light travel speed in AU/Days

	nT1 = nT-1