real function module_mp_thompson::delta_p	(	real, intent(in)	yy,
		real, intent(in)	y1,
		real, intent(in)	y2,
		real, intent(in)	aa,
		real, intent(in)	bb
	)