877	 Complete Elliptic Integral of the First Kind Algorithm
