function [d3, d2, d1]=cinv_cartesiano(x0,y0,z0)
d3=x0; d2=y0; d1=z0;
end