-
Notifications
You must be signed in to change notification settings - Fork 1
/
phiphi.m
35 lines (34 loc) · 1.96 KB
/
phiphi.m
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
% phiphi(varargin) : mimics the dipimage phiphi function. See its documentation.
% first argument can be a size vector (or [256 256] is assumed) and second argument one of
% 'left','right','true','corner','freq','radfreq','math',
% 'mleft','mright','mtrue','mcorner','mfreq','mradfreq'
%
% the global variable use_xyz_cuda decides whether to generate a dip_image or a cuda dip_image.
%************************** CudaMat ****************************************
% Copyright (C) 2008-2009 by Rainer Heintzmann *
% *
% This program is free software; you can redistribute it and/or modify *
% it under the terms of the GNU General Public License as published by *
% the Free Software Foundation; Version 2 of the License. *
% *
% This program is distributed in the hope that it will be useful, *
% but WITHOUT ANY WARRANTY; without even the implied warranty of *
% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
% GNU General Public License for more details. *
% *
% You should have received a copy of the GNU General Public License *
% along with this program; if not, write to the *
% Free Software Foundation, Inc., *
% 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *
%**************************************************************************
%
function res=phiphi(varargin)
global use_xyz_cuda;
global diphandle_phiphi;
if (use_xyz_cuda)
tmp=cuda(1.0);
res= phiphi_cuda2(tmp,varargin{:});
else
res=feval(diphandle_phiphi,varargin{:}); % call the standart matlab zeros function
end