$ perl -e'use bignum;print atan2(1,0), " ", atan2(0,1),$/'
1.5707963267949 0
$