Add credit to rosetta code for haversine formula