checktilt.m
author A.M. Thurnherr <athurnherr@yahoo.com>
Tue, 18 Jun 2013 11:34:41 +0000
changeset 3 720b082fe33e
parent 0 0a450563f904
permissions -rw-r--r--
before trying to fix plotraw bug reported by Dan Torres *** Added tag IX_9 for changeset 20dc0dc52ad5 *** Version IX_9 *** after revert

function r=checktilt(rot,angle)
%
%  angle = [ rol1 ; pit1 ; rol2 ; pit2]
% rotate pit2,rol2 by rot and then compare results

[rol21,pit21]=uvrot(angle(3,:),angle(4,:),rot);

dr=rol21-angle(1,:);
dp=pit21-angle(2,:);

r=(dr-mean(dr)).^2 + (dp-mean(dp)).^2;
r=sum(r);