Description: Prepare for CIRS <-> observed, terrestrial, special.
The source code for the ANSI C routine Apio is available: