相对定向—绝对定向解法8页.doc

相对定向绝对定向解法实验报告1、 实验代码1.1根据所给同名像点的像平面坐标进行相对定向，求解相对的相对定向元素function xP= xiangduidingxiang( Lxy,Rxy,f )%UNTITLED Summary of this function goes here% Detailed explanation goes here%设置相对定向元素是初始值u=0;v=0;w=0;q=0;k=0;bu=Rxy(1,1)-Lxy(1,1);while (1) %求解余弦元素 a1=cos(q)*cos(k)-sin(q)*sin(w)*sin(k); a2=-cos(q)*sin(k)-sin(q)*sin(w)*cos(k); a3=-sin(q)*cos(w); b1=cos(w)*sin(k); b2=cos(w)*cos(k); b3=-sin(w); c1=sin(q)*cos(k)+cos(q)*sin(w)*sin(k);