diff options
Diffstat (limited to '2.3-1/tests/unit_tests/test305_Moebius/XYgrid.sci')
-rw-r--r-- | 2.3-1/tests/unit_tests/test305_Moebius/XYgrid.sci | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/2.3-1/tests/unit_tests/test305_Moebius/XYgrid.sci b/2.3-1/tests/unit_tests/test305_Moebius/XYgrid.sci new file mode 100644 index 00000000..0957237d --- /dev/null +++ b/2.3-1/tests/unit_tests/test305_Moebius/XYgrid.sci @@ -0,0 +1,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 |