%da sferiche a cartesiane
%phi e langolo che parte dallasse z

function [x,y,z]=sfer_2_cart(psi,phi)

x=sin(phi).*cos(psi);
y=sin(phi).*sin(psi);
z=cos(phi);