--- Downloads/enu2uvw.m 2019-09-11 09:11:11.000000000 +0000 +++ /Volumes/64/enu2uvw.m 2019-09-11 09:10:10.000000000 +0000 @@ -75,6 +75,11 @@ endfunction %!test +%! [u,v,w]=enu2uvw(186.277521, 286.84222, 939.69262, 42, -82,'d'); +%! assert([u,v,w],[254.940936348589,-475.5397947444, 841.942404132992], 10e-6) +%! [u,v,w]=enu2uvw(186.277521, 286.84222, 939.69262, ... +%! 0.733038285837618, -1.43116998663535,'r'); +%! assert([u,v,w],[254.940936348589,-475.5397947444, 841.942404132992], 10e-6) %!error enu2uvw("s", 25, 1e3, 0, 0)