summaryrefslogtreecommitdiff
path: root/tests/unit_tests/test305_Moebius/XYgrid.sci
blob: 0957237db9fe9639a25e4dc73baf186bbc187241 (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
//SCI2C: NIN=          2
//SCI2C: NOUT=         2
//SCI2C: OUT(1).TP=    IN(1).TP
//SCI2C: OUT(1).SZ(1)= IN(2).SZ(2)
//SCI2C: OUT(1).SZ(2)= IN(1).SZ(2)
//SCI2C: OUT(2).TP=    IN(1).TP
//SCI2C: OUT(2).SZ(1)= IN(2).SZ(2)
//SCI2C: OUT(2).SZ(2)= IN(1).SZ(2)
//SCI2C: DEFAULT_PRECISION= DOUBLE

// ------------------------------------
// this script emulate the matlab meshgrid 
// only for bidimensional mesh.
// ------------------------------------

function [X,Y] = XYgrid(x,y)

n = length(x);
m = length(y);

X=zeros(m,n);
Y=zeros(m,n);

for k=1:m
   X(k,1:n)=x;
end

for h=1:n
   Y(1:m,h)=y';
end

endfunction