Description: The CIO locator s, given X,Y, quantity s, IAU 2000A,.
The source code for the Fortran routine S00 is available: