A program in BASIC for calculation of cavity theory corrections - Christensen, Erling Bugge (RISO-M-2345, 1982)