blob: 98d69544dcf6cb2b7e89ce7cf0e43949ba54cfee (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
|
// 08.08.15
// 15.04.12
function Out=Translate3data(varargin)
Nargs=length(varargin);
Pd3=varargin(1);
Pd3=Flattenlist(Pd3); // 15.04.12
Mv=varargin(2);
if type(Mv)==1 & length(Mv)==1
Mv=[varargin(2),varargin(3),varargin(4)];
end;
// if Mixtype(Pd3)==1 // 15.04.12 from
// Pd3=MixS(Pd3);
// elseif Mixtype(Pd3)==3
// Tmp=[];
// for I=1:Mixlength(Pd3)
// Tmp=Mixjoin(Tmp,Mixop(I,Pd3));
// end;
// Pd3=Tmp;
// end;
Out=[];
for I=1:length(Pd3)
PD=Op(I,Pd3);
Ans=[];
for J=1:size(PD,1)
P=PD(J,:);
Tmp=P+Mv;;
Ans=[Ans;Tmp];
end;
Out=Mixadd(Out,Ans);
end;
if length(Out)==1
Out=Op(1,Out);
end;
endfunction
|