double dcos1(double);