57 static long double primary(long double);
92 			return (primary(x)-log1pl(x))-logl(x);  in __k_lgammal()
94 		return (primary(x-y)-logl(x));  in __k_lgammal()
96 		return (primary(x-y));  in __k_lgammal()
98 		return (primary(x-y)+logl(x-c1));  in __k_lgammal()
100 		return (primary(x-y)+logl((x-c1)*(x-c2)));  in __k_lgammal()
102 		return (primary(x-y)+logl((x-c1)*(x-c2)*(x-c3)));  in __k_lgammal()
104 		return (primary(x-y)+logl((x-c1)*(x-c2)*(x-c3)*(x-c4)));  in __k_lgammal()
106 		return (primary(x-y)+logl((x-c1)*(x-c2)*(x-c3)*(x-c4)*(x-c5)));  in __k_lgammal()
108 		return primary(x-y)+  in __k_lgammal()
305 primary(long double s) {	/* assume |s|<=0.5 */  in primary()  function