Files
BTA_lib/slalib/eg50.f