----------------------- G2 Drag function file --------------------

R Retardation fps.s.
V Velocity fps.

R=A*V^m

G2 Ballistic Constants

     V(feet/sec)        A                          m

IF V2 > 1674 THEN A = .0079470052136733   : M = 1.36999902851493: RETURN
IF V2 > 1172 THEN A = 1.00419763721974D-03: M = 1.65392237010294: RETURN
IF V2 > 1060 THEN A = 7.15571228255369D-23: M = 7.91913562392361: RETURN
IF V2 >  949 THEN A = 1.39589807205091D-10: M = 3.81439537623717: RETURN
IF V2 >  670 THEN A = 2.34364342818625D-04: M = 1.71869536324748: RETURN
IF V2 >  335 THEN A = 1.77962438921838D-04: M = 1.76877550388679: RETURN
IF V2 >    0 THEN A = 5.18033561289704D-05: M = 1.98160270524632: RETURN