A mathematica package for calculating DC-SQUID curves from parameters