Files
BTA_lib/slalib/amp.f