diff options
Diffstat (limited to 'macros/ifftshift1.sci')
| -rw-r--r-- | macros/ifftshift1.sci | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/macros/ifftshift1.sci b/macros/ifftshift1.sci new file mode 100644 index 0000000..6c5ae8e --- /dev/null +++ b/macros/ifftshift1.sci @@ -0,0 +1,12 @@ +function y= ifftshift1(X,DIM) + rhs= argn(2); + if(rhs <1 | rhs >2) + error('Wrong number of Input arguments'); + end + select(rhs) + case 1 then + y=callOctave("ifftshift",X); + case 2 then + y=callOctave("ifftshift",X,DIM); + end +endfunction
\ No newline at end of file |