blob: 44bde517afc579ce11f93026c55ca7df2dea5254 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
// 08.10.26
function Out=Viewfrom(varargin)
global THETA PHI
Nargs=length(varargin);
Nvec=varargin(1);
GL=varargin(2);
Flg=1;
if Nargs>=3
Flg=varargin(3);
end;
Theta=THETA; Phi=PHI;
Tmp=Rotate3data(GL,Nvec,[-1,0,0]);
THETA=%pi/2; PHI=0;
Out=Projpara(Tmp);
if Flg==1
Windisp(Out);
end;
THETA=Theta; PHI=Phi;
endfunction;
|