Searched refs:R1sum (Results 1 – 1 of 1) sorted by relevance
701 double R0sum=0, R1sum=0, R2sum=0, R3sum=0, R4sum=0; in computeAstroDay() local753 R1sum += R1[i][0] * cos(R1[i][1] + R1[i][2] * JM); in computeAstroDay()760 R = (R0sum + (R1sum * JM) + (R2sum * JM2) in computeAstroDay()