Function to calcuate arf using Siriwardena and Weinmann 1996