C+
C NAME:
C	mapangles
C PROCEDURE:
C	Statement functions for converting between modified Carrington variables
C	and latitudes(deg) to array indices.
C	nLng, nLat will usually be provided as arguments to the subroutine using
C	this include file.
C	Note that nLng1=nLng-1 and nLat1=nLat-1 must be defined.
C	Currently included in mapcoordinates.h
C-
	XCindx(X) = 1+(1-mod(mod(X,1.0)+1.0,1.0))*nLng1	! Carrington variable -> index [1,nLng]
	XCfrac(I) = 1.0*(nLng-I)/nLng1			! Index [1,nLng] -> fraction of rotation
	XCfracX(X) = (nLng-X)/nLng1			! Index [1,nLng] -> fraction of rotation

	XCvar(X) = 1+(XCend-X)/(XCend-XCbeg)*nLng1	! Carrington variable -> index [1,nLng]
	XCfull(I) = XCbeg + XCfrac(I)*(XCend-XCbeg)	! Index [1,nLng] -> fraction of rotation
	XCfullX(X) = XCbeg + XCfracX(X)*(XCend-XCbeg)	! Index [1,nLng] -> fraction of rotation

	XLindx(X) = 1+((X+90.0)/180.0)*nLat1		! Latitude (deg) -> index in [1,nLat]
	XLdeg(J)  = 90.0*(-1.0+2.0*(J-1)/nLat1)		! Index in [1,nLat] -> latitude (deg)