relativistic factor, intermediate symbols
		K0	=	+	3/2*β^2			*Q(PART)*Rocs(POIo)^3*Rpcs(POIo(t),t=0)^(-5)*sin(Aθpc(POIo(t),t=0))^2
		K2 =	-	λ(Vons(PART))	*Q(PART)					*Rpcs(POIo(t),t=0)^(-2)
		K_1st =  K1 + K2 
		K_2nd 
		f_sphereCapSurf{x} = β*Rocs(POIo)^2*∫[∂(Aθpc),0 to Aθpc(POIo(t),t=0): 1/c/Rocs(POIo)*sin(Aθpc(POIo(t),t=0))*∂[∂(t): x] ]
/*+-----+