Function FindBeta, zprime, xnaught, xp
;This function uses 1-stage iteration to find the sensor rotation angle
;BETA, a rotation about the BH axis
beta1=(xnaught-xp)/zprime
beta=(xnaught-(xp*cos(beta1)))/zprime
return,beta
end
Function FindBeta, zprime, xnaught, xp
;This function uses 1-stage iteration to find the sensor rotation angle
;BETA, a rotation about the BH axis
beta1=(xnaught-xp)/zprime
beta=(xnaught-(xp*cos(beta1)))/zprime
return,beta
end