FUNCTION sunearthdis(jday, aus)
long jday; float *aus;
Julian day.
Distance between the sun and the earth in astronomical units.
The distance between the sun and the earth is computed for a given julian day.
sunearthdis() has no return value.