www.pudn.com > vcmatlab20060426WaterMark.zip > contour3.cpp
//
// MATLAB Compiler: 2.2
// Date: Tue May 10 13:54:02 2005
// Arguments: "-B" "macro_default" "-O" "all" "-O" "fold_scalar_mxarrays:on" "-O" "fold_non_scalar_mxarrays:on" "-O" "optimize_integer_for_loops:on" "-O" "array_indexing:on" "-O" "optimize_conditionals:on" "-B" "sglcpp" "-p" "-W" "main" "-L" "Cpp" "-t" "-T" "link:exe" "-h" "libmmfile.mlib" "-W" "mainhg" "libmwsglm.mlib" "-A" "line:on" "-g" "-G" "-A" "debugline:on" "-O" "none" "-O" "fold_scalar_mxarrays:off" "-O" "fold_non_scalar_mxarrays:off" "-O" "optimize_integer_for_loops:off" "-O" "array_indexing:off" "-O" "optimize_conditionals:off" "libmmfile.mlib" "libmwsglm.mlib" "-v" "-h" "show"
//
#include "contour3.hpp"
#include "contours.hpp"
#include "libmatlbm.hpp"
#include "libmmfile.hpp"
static double _ieee_nan_ = mclGetNaN();
void InitializeModule_contour3() {
}
void TerminateModule_contour3() {
}
static mwArray Mcontour3(mwArray * h, mwArray * msg, int nargout_, mwArray varargin);
_mexLocalFunctionTable _local_function_table_contour3 = { 0, (mexFunctionTableEntry *)NULL };
//
// The function "Ncontour3" contains the nargout interface for the "contour3" M-function from file "D:\matlab\matlab\toolbox\matlab\specgraph\contour3.m" (lines 1-164). This interface is only produced if the M-function uses the special variable "nargout". The nargout interface allows the number of requested outputs to be specified via the nargout argument, as opposed to the normal interface which dynamically calculates the number of outputs based on the number of non-NULL inputs it receives. This function processes any input arguments and passes them to the implementation version of the function, appearing above.
//
mwArray Ncontour3(int nargout, mwArray * h, mwArray * msg, mwVarargin varargin) {
mwArray cout(mclGetUninitializedArray());
mwArray h__(mclGetUninitializedArray());
mwArray msg__(mclGetUninitializedArray());
cout = Mcontour3(&h__, &msg__, nargout, varargin.ToArray());
if (h != NULL) {
*h = h__;
}
if (msg != NULL) {
*msg = msg__;
}
return cout;
}
//
// The function "contour3" contains the normal interface for the "contour3" M-function from file "D:\matlab\matlab\toolbox\matlab\specgraph\contour3.m" (lines 1-164). This function processes any input arguments and passes them to the implementation version of the function, appearing above.
//
mwArray contour3(mwArray * h, mwArray * msg, mwVarargin varargin) {
int nargout(1);
mwArray cout(mclGetUninitializedArray());
mwArray h__(mclGetUninitializedArray());
mwArray msg__(mclGetUninitializedArray());
if (h != NULL) {
++nargout;
}
if (msg != NULL) {
++nargout;
}
cout = Mcontour3(&h__, &msg__, nargout, varargin.ToArray());
if (h != NULL) {
*h = h__;
}
if (msg != NULL) {
*msg = msg__;
}
return cout;
}
//
// The function "Vcontour3" contains the void interface for the "contour3" M-function from file "D:\matlab\matlab\toolbox\matlab\specgraph\contour3.m" (lines 1-164). The void interface is only produced if the M-function uses the special variable "nargout", and has at least one output. The void interface function specifies zero output arguments to the implementation version of the function, and in the event that the implementation version still returns an output (which, in MATLAB, would be assigned to the "ans" variable), it deallocates the output. This function processes any input arguments and passes them to the implementation version of the function, appearing above.
//
void Vcontour3(mwVarargin varargin) {
mwArray cout(mwArray::UNDEFINED);
mwArray h(mwArray::UNDEFINED);
mwArray msg(mwArray::UNDEFINED);
cout = Mcontour3(&h, &msg, 0, varargin.ToArray());
}
//
// The function "mlxContour3" contains the feval interface for the "contour3" M-function from file "D:\matlab\matlab\toolbox\matlab\specgraph\contour3.m" (lines 1-164). The feval function calls the implementation version of contour3 through this function. This function processes any input arguments and passes them to the implementation version of the function, appearing above.
//
void mlxContour3(int nlhs, mxArray * plhs[], int nrhs, mxArray * prhs[]) {
MW_BEGIN_MLX();
{
mwArray mprhs[1];
mwArray mplhs[3];
int i;
mclCppUninitializeArrays(3, mplhs);
if (nlhs > 3) {
error(mwArray("Run-time Error: File: contour3 Line: 1 Column: 1 The function \"contour3\" was called with more than the declared number of outputs (3)."));
}
mprhs[0] = mclCreateVararginCell(nrhs, prhs);
mplhs[0] = Mcontour3(&mplhs[1], &mplhs[2], nlhs, mprhs[0]);
plhs[0] = mplhs[0].FreezeData();
for (i = 1; i < 3 && i < nlhs; ++i) {
plhs[i] = mplhs[i].FreezeData();
}
}
MW_END_MLX();
}
//
// The function "Mcontour3" is the implementation version of the "contour3" M-function from file "D:\matlab\matlab\toolbox\matlab\specgraph\contour3.m" (lines 1-164). It contains the actual compiled code for that M-function. It is a static function and must only be called from one of the interface functions, appearing below.
//
//
// function [cout,h,msg] = contour3(varargin)
//
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
static mwArray Mcontour3(mwArray * h, mwArray * msg, int nargout_, mwArray varargin) {
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMlineEnterFunction("D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m", "contour3")
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwLocalFunctionTable save_local_function_table_(&_local_function_table_contour3);
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
int nargin_(nargin(-1, mwVarargin(varargin)));
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray cout(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray zl(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray j(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray index(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray one_cycle(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray remains(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray ncomp(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray ncon(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray ind(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray zlev(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray cu(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray zdata(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray ydata(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray xdata(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray nexti(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray npoints(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray z_level(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray color_h(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray limit(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray c(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray colortab(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray lims(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray nc(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray mc(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray mark(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray col(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray lin(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray nin(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray i(mclGetUninitializedArray());
#line 1 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray ans(mclGetUninitializedArray());
//
// %CONTOUR3 3-D contour plot.
// % CONTOUR3(...) is the same as CONTOUR(...) except that the contours
// % are drawn at their corresponding Z level.
// %
// % C = CONTOUR3(...) returns contour matrix C as described in CONTOURC
// % and used by CLABEL.
// %
// % [C,H] = CONTOUR3(...) returns a column vector H of handles to PATCH
// % objects. The UserData property of each object contains the height
// % value for each contour.
// %
// % Example:
// % contour3(peaks)
// %
// % See also CONTOUR, CONTOURF, CLABEL, COLORBAR.
//
// % Additional details:
// %
// % Unless a linestyle is specified, CONTOUR3 will draw PATCH objects
// % with edge color taken from the current colormap. When a linestyle
// % is specified, LINE objects are drawn. To produce the same results
// % as v4, use CONTOUR3(...,'-').
// %
// % The order of the handles h relative to the values in cout is used
// % in CLABEL to create rotated inline labels. If you change this
// % order, you may have to change CLABEL also.
//
// % Clay M. Thompson 3-20-91, 8-18-95
// % Modified 1-17-92, LS
// % Copyright 1984-2001 The MathWorks, Inc.
// % $Revision: 5.17 $ $Date: 2001/04/15 12:03:50 $
//
// error(nargchk(1,5,nargin));
//
#line 34 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(34);
#line 34 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
error(mwVe(nargchk(mwArray(1), mwArray(5), mwArray(nargin_))));
//
// msg = [];
//
#line 35 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(35);
#line 35 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
*msg = empty();
//
//
// % Check for empty arguments.
// for i = 1:nargin
//
#line 38 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(38);
#line 38 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
{
#line 38 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwForLoopIterator viter__;
#line 38 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
for (viter__.Start(1, nargin_, mwArray::DIN); viter__.Next(&i); ) {
//
// if isempty(varargin{i})
//
#line 39 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(39);
#line 39 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
if (tobool(mwVe(feval(mwValueVarargout(), mlxIsempty, mwVarargin(mwVe(mwVsa(varargin, "varargin").cell(mwVsv(i, "i")))))))) {
//
// error ('Invalid Argument - Input matrix is empty');
//
#line 40 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(40);
#line 40 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
error(mwArray("Invalid Argument - Input matrix is empty"));
//
// end
//
#line 41 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(41);
#line 41 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
// end
//
#line 42 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(42);
#line 42 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
#line 42 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
//
// % Trim off the last arg if it's a string (line_spec).
// nin = nargin;
//
#line 45 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(45);
#line 45 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
nin = nargin_;
//
// if isstr(varargin{end})
//
#line 46 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(46);
#line 46 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
if (tobool(mwVe(feval(mwValueVarargout(), mlxIsstr, mwVarargin(mwVe(mwVsa(varargin, "varargin").cell(end(mwVa(varargin, "varargin"), 1, 1)))))))) {
//
// [lin,col,mark,msg] = colstyle(varargin{end});
//
#line 47 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(47);
#line 47 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
feval(mwVarargout(lin, col, mark, *msg), mlxColstyle, mwVarargin(mwVe(mwVsa(varargin, "varargin").cell(end(mwVa(varargin, "varargin"), 1, 1)))));
//
// if ~isempty(msg), error(msg); end
//
#line 48 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(48);
#line 48 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
if (tobool(~ mwVe(isempty(mwVv(*msg, "msg"))))) {
#line 48 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
error(mwVv(*msg, "msg"));
#line 48 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
// nin = nin - 1;
//
#line 49 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(49);
#line 49 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
nin = mwVv(nin, "nin") - 1;
//
// else
//
#line 50 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(50);
#line 50 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
} else {
//
// lin = '';
//
#line 51 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(51);
#line 51 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
lin = "";
//
// col = '';
//
#line 52 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(52);
#line 52 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
col = "";
//
// end
//
#line 53 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(53);
#line 53 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
//
// if nin <= 2,
//
#line 55 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(55);
#line 55 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
if (tobool(mwVv(nin, "nin") <= 2)) {
//
// [mc,nc] = size(varargin{1});
//
#line 56 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(56);
#line 56 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
feval(mwVarargout(mc, nc), mlxSize, mwVarargin(mwVe(mwVsa(varargin, "varargin").cell(1))));
//
// lims = [1 nc 1 mc];
//
#line 57 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(57);
#line 57 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
lims = horzcat(mwVarargin(1, mwVv(nc, "nc"), 1, mwVv(mc, "mc")));
//
// else
//
#line 58 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(58);
#line 58 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
} else {
//
// lims = [min(varargin{1}(:)),max(varargin{1}(:)), ...
//
#line 59 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(59);
#line 59 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
lims = horzcat(mwVarargin(mwVe(feval(mwValueVarargout(), mlxMin, mwVarargin(mwVe(mwVsa(varargin, "varargin").cell(1)(colon()))))), mwVe(feval(mwValueVarargout(), mlxMax, mwVarargin(mwVe(mwVsa(varargin, "varargin").cell(1)(colon()))))), mwVe(feval(mwValueVarargout(), mlxMin, mwVarargin(mwVe(mwVsa(varargin, "varargin").cell(2)(colon()))))), mwVe(feval(mwValueVarargout(), mlxMax, mwVarargin(mwVe(mwVsa(varargin, "varargin").cell(2)(colon())))))));
//
// min(varargin{2}(:)),max(varargin{2}(:))];
// end
//
#line 61 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(61);
#line 61 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
//
// if isempty(col) % no color spec was given
//
#line 63 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(63);
#line 63 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
if (tobool(mwVe(isempty(mwVv(col, "col"))))) {
//
// colortab = get(newplot,'colororder');
//
#line 64 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(64);
#line 64 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
colortab = Nget(1, mwVarargin(mwVe(Nnewplot(1, mwArray::DIN)), "colororder"));
//
// [mc,nc] = size(colortab);
//
#line 65 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(65);
#line 65 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
size(mwVarargout(mc, nc), mwVv(colortab, "colortab"));
//
// end
//
#line 66 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(66);
#line 66 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
//
// % Check for level or number of levels N. If it's a scalar and a
// % non-zero integer, we assume that it must be N. Otherwise we
// % duplicate it so it's treated as a contour level.
// if nin == 2 | nin == 4,
//
#line 71 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(71);
#line 71 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
{
#line 71 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray a_(mwVv(nin, "nin") == 2);
#line 71 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
if (tobool(a_) || tobool(a_ | mwVv(nin, "nin") == 4)) {
//
// if prod(size(varargin{2})) == 1 % might be N or a contour level
//
#line 72 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(72);
#line 72 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
if (tobool(mwVe(prod(mwVe(feval(mwValueVarargout(), mlxSize, mwVarargin(mwVe(mwVsa(varargin, "varargin").cell(2))))))) == 1)) {
//
// if ~(varargin{2} == fix(varargin{2}) & varargin{2})
//
#line 73 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(73);
#line 73 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
if (tobool(~ feval(mwValueVarargout(), mlxAnd, mwVarargin(feval(mwValueVarargout(), mlxEq, mwVarargin(mwVe(mwVsa(varargin, "varargin").cell(2)), mwVe(feval(mwValueVarargout(), mlxFix, mwVarargin(mwVe(mwVsa(varargin, "varargin").cell(2))))))), mwVe(mwVsa(varargin, "varargin").cell(2)))))) {
//
// varargin{2} = [varargin{2},varargin{2}];
//
#line 74 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(74);
#line 74 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
varargin.cell(2) = horzcat(mwVarargin(mwVe(mwVsa(varargin, "varargin").cell(2)), mwVe(mwVsa(varargin, "varargin").cell(2))));
//
// end
//
#line 75 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(75);
#line 75 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
// end
//
#line 76 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(76);
#line 76 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
#line 76 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
} else {
#line 76 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
// end
//
#line 77 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(77);
#line 77 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
//
// % Use contours to get the contour levels.
// [c,msg] = contours(varargin{1:nin});
//
#line 80 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(80);
#line 80 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
c = contours(msg, mwVarargin(mwVe(mwVsa(varargin, "varargin").cell(colon(1, mwVv(nin, "nin"))))));
//
// if ~isempty(msg)
//
#line 81 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(81);
#line 81 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
if (tobool(~ mwVe(isempty(mwVv(*msg, "msg"))))) {
//
// if nargout==3,
//
#line 82 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(82);
#line 82 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
if (tobool(mwArray(nargout_) == mwArray(3))) {
//
// cout = []; h = [];
//
#line 83 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(83);
#line 83 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
cout = empty();
#line 83 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
*h = empty();
//
// return
//
#line 84 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(84);
#line 84 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
goto return_;
//
// else
//
#line 85 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
} else {
//
// error(msg);
//
#line 86 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(86);
#line 86 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
error(mwVv(*msg, "msg"));
//
// end
//
#line 87 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(87);
#line 87 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
// end
//
#line 88 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(88);
#line 88 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
//
// if isempty(c), h = []; if nargout>0, cout = c; end, return, end
//
#line 90 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(90);
#line 90 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
if (tobool(mwVe(isempty(mwVv(c, "c"))))) {
#line 90 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
*h = empty();
#line 90 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
if (tobool(mwArray(nargout_) > mwArray(0))) {
#line 90 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
cout = mwVsv(c, "c");
#line 90 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
#line 90 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
goto return_;
#line 90 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
//
// % Create the plot
// newplot;
//
#line 93 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(93);
#line 93 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
ans.EqAns(Nnewplot(0, mwArray::DIN));
//
// if ~ishold
//
#line 94 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(94);
#line 94 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
if (tobool(~ mwVe(ishold(mwArray::DIN)))) {
//
// view(3); grid on
//
#line 95 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(95);
#line 95 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
ans.EqAns(Nview(0, NULL, mwArray(3)));
#line 95 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
grid(mwArray("on"));
//
// set(gca,'xlim',lims(1:2),'ylim',lims(3:4))
//
#line 96 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(96);
#line 96 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
ans.EqPrintAns(Nset(0, mwVarargin(mwVe(gca(mwArray::DIN)), "xlim", mwVe(mwVsv(lims, "lims")(colon(1, 2))), "ylim", mwVe(mwVsv(lims, "lims")(colon(3, 4))))));
//
// end
//
#line 97 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(97);
#line 97 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
//
// limit = size(c,2);
//
#line 99 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(99);
#line 99 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
limit = size(mwValueVarargout(), mwVv(c, "c"), 2);
//
// i = 1;
//
#line 100 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(100);
#line 100 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
i = 1;
//
// h = [];
//
#line 101 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(101);
#line 101 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
*h = empty();
//
// color_h = [];
//
#line 102 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(102);
#line 102 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
color_h = empty();
//
// while(i < limit)
//
#line 103 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(103);
#line 103 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
while (tobool(mwVv(i, "i") < mwVv(limit, "limit"))) {
//
// z_level = c(1,i);
//
#line 104 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(104);
#line 104 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
z_level = mwVsv(c, "c")(1, mwVsv(i, "i"));
//
// npoints = c(2,i);
//
#line 105 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(105);
#line 105 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
npoints = mwVsv(c, "c")(2, mwVsv(i, "i"));
//
// nexti = i+npoints+1;
//
#line 106 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(106);
#line 106 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
nexti = mwVv(i, "i") + mwVv(npoints, "npoints") + 1;
//
//
// xdata = c(1,i+1:i+npoints);
//
#line 108 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(108);
#line 108 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
xdata = mwVsv(c, "c")(1, colon(mwVv(i, "i") + 1, mwVv(i, "i") + mwVv(npoints, "npoints")));
//
// ydata = c(2,i+1:i+npoints);
//
#line 109 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(109);
#line 109 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
ydata = mwVsv(c, "c")(2, colon(mwVv(i, "i") + 1, mwVv(i, "i") + mwVv(npoints, "npoints")));
//
// zdata = z_level + 0*xdata; % Make zdata the same size as xdata
//
#line 110 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(110);
#line 110 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
zdata = mwVv(z_level, "z_level") + 0 * mwVv(xdata, "xdata");
//
//
// % Create the patches or lines
// if isempty(col) & isempty(lin),
//
#line 113 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(113);
#line 113 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
{
#line 113 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray a_(mwVe(isempty(mwVv(col, "col"))));
#line 113 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
if (tobool(a_) && tobool(a_ & mwVe(isempty(mwVv(lin, "lin"))))) {
//
// cu = patch('XData',[xdata NaN],'YData',[ydata NaN], ...
//
#line 114 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(114);
#line 114 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
cu = Npatch(1, mwVarargin("XData", horzcat(mwVarargin(mwVv(xdata, "xdata"), _ieee_nan_)), "YData", horzcat(mwVarargin(mwVv(ydata, "ydata"), _ieee_nan_)), "ZData", horzcat(mwVarargin(mwVv(zdata, "zdata"), _ieee_nan_)), "CData", horzcat(mwVarargin(mwVv(zdata, "zdata"), _ieee_nan_)), "facecolor", "none", "edgecolor", "flat", "userdata", mwVv(z_level, "z_level")));
//
// 'ZData',[zdata NaN],'CData',[zdata NaN], ...
// 'facecolor','none','edgecolor','flat',...
// 'userdata',z_level);
// else
//
#line 118 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(118);
#line 118 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
} else {
//
// cu = line('XData',xdata,'YData',ydata,'ZData',zdata,'userdata',z_level);
//
#line 119 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(119);
#line 119 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
cu = Nline(1, mwVarargin("XData", mwVv(xdata, "xdata"), "YData", mwVv(ydata, "ydata"), "ZData", mwVv(zdata, "zdata"), "userdata", mwVv(z_level, "z_level")));
#line 119 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
// end
//
#line 120 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(120);
#line 120 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
// h = [h; cu(:)];
//
#line 121 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(121);
#line 121 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
*h = vertcat(mwVarargin(mwVv(*h, "h"), mwVe(mwVsv(cu, "cu")(colon()))));
//
// color_h = [color_h ; z_level];
//
#line 122 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(122);
#line 122 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
color_h = vertcat(mwVarargin(mwVv(color_h, "color_h"), mwVv(z_level, "z_level")));
//
// i = nexti;
//
#line 123 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(123);
#line 123 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
i = mwVsv(nexti, "nexti");
//
// end
//
#line 124 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(124);
#line 124 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
//
// if isempty(col) & ~isempty(lin)
//
#line 126 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(126);
#line 126 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
{
#line 126 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwArray a_(mwVe(isempty(mwVv(col, "col"))));
#line 126 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
if (tobool(a_) && tobool(a_ & ~ mwVe(isempty(mwVv(lin, "lin"))))) {
//
// % set linecolors - all LEVEL lines should be same color
// % first find number of unique contour levels
// [zlev, ind] = sort(color_h);
//
#line 129 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(129);
#line 129 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
zlev = sort(&ind, mwVv(color_h, "color_h"));
//
// h = h(ind); % handles are now sorted by level
//
#line 130 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(130);
#line 130 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
*h = mwVsv(*h, "h")(mwVsv(ind, "ind"));
//
// ncon = length(find(diff(zlev))) + 1; % number of unique levels
//
#line 131 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(131);
#line 131 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
ncon = mwVe(length(mwVe(find(mwVe(diff(mwVv(zlev, "zlev"))))))) + 1;
//
// if ncon > mc % more contour levels than colors, so cycle colors
//
#line 132 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(132);
#line 132 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
if (tobool(mwVv(ncon, "ncon") > mwVv(mc, "mc"))) {
//
// % build list of colors with cycling
// ncomp = round(ncon/mc); % number of complete cycles
//
#line 134 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(134);
#line 134 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
ncomp = round(mwVv(ncon, "ncon") / mwVv(mc, "mc"));
//
// remains = ncon - ncomp*mc;
//
#line 135 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(135);
#line 135 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
remains = mwVv(ncon, "ncon") - mwVv(ncomp, "ncomp") * mwVv(mc, "mc");
//
// one_cycle = (1:mc)';
//
#line 136 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(136);
#line 136 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
one_cycle = ctranspose(colon(1, mwVv(mc, "mc")));
//
// index = one_cycle(:,ones(1,ncomp));
//
#line 137 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(137);
#line 137 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
index = mwVsv(one_cycle, "one_cycle")(colon(), ones(mwVarargin(1, mwVv(ncomp, "ncomp"))));
//
// index = [index(:); (1:remains)'];
//
#line 138 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(138);
#line 138 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
index = vertcat(mwVarargin(mwVe(mwVsv(index, "index")(colon())), ctranspose(colon(1, mwVv(remains, "remains")))));
//
// colortab = colortab(index,:);
//
#line 139 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(139);
#line 139 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
colortab = mwVsv(colortab, "colortab")(mwVsv(index, "index"), colon());
//
// end
//
#line 140 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(140);
#line 140 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
// j = 1;
//
#line 141 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(141);
#line 141 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
j = 1;
//
// zl = min(zlev);
//
#line 142 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(142);
#line 142 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
zl = min(mwVv(zlev, "zlev"));
//
// for i = 1:length(h)
//
#line 143 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(143);
#line 143 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
{
#line 143 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwForLoopIterator viter__;
#line 143 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
for (viter__.Start(1, mwVe(length(mwVv(*h, "h"))), mwArray::DIN); viter__.Next(&i); ) {
//
// if zl < zlev(i)
//
#line 144 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(144);
#line 144 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
if (tobool(mwVv(zl, "zl") < mwVe(mwVsv(zlev, "zlev")(mwVsv(i, "i"))))) {
//
// j = j + 1;
//
#line 145 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(145);
#line 145 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
j = mwVv(j, "j") + 1;
//
// zl = zlev(i);
//
#line 146 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(146);
#line 146 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
zl = mwVsv(zlev, "zlev")(mwVsv(i, "i"));
//
// end
//
#line 147 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(147);
#line 147 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
// set(h(i),'linestyle',lin,'color',colortab(j,:));
//
#line 148 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(148);
#line 148 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
ans.EqAns(Nset(0, mwVarargin(mwVe(mwVsv(*h, "h")(mwVsv(i, "i"))), "linestyle", mwVv(lin, "lin"), "color", mwVe(mwVsv(colortab, "colortab")(mwVsv(j, "j"), colon())))));
//
// end
//
#line 149 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(149);
#line 149 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
#line 149 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
// else
//
#line 150 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(150);
#line 150 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
} else {
//
// if ~isempty(lin)
//
#line 151 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(151);
#line 151 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
if (tobool(~ mwVe(isempty(mwVv(lin, "lin"))))) {
//
// set(h,'linestyle',lin);
//
#line 152 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(152);
#line 152 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
ans.EqAns(Nset(0, mwVarargin(mwVv(*h, "h"), "linestyle", mwVv(lin, "lin"))));
//
// end
//
#line 153 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(153);
#line 153 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
// if ~isempty(col)
//
#line 154 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(154);
#line 154 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
if (tobool(~ mwVe(isempty(mwVv(col, "col"))))) {
//
// set(h,'color',col);
//
#line 155 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(155);
#line 155 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
ans.EqAns(Nset(0, mwVarargin(mwVv(*h, "h"), "color", mwVv(col, "col"))));
//
// end
//
#line 156 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(156);
#line 156 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
#line 156 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
// end
//
#line 157 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(157);
#line 157 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
//
//
// % If command was of the form 'c = contour(...)', return the results
// % of the contours command.
// if nargout > 0
//
#line 161 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(161);
#line 161 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
if (tobool(mwArray(nargout_) > mwArray(0))) {
//
// cout = c;
//
#line 162 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(162);
#line 162 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
cout = mwVsv(c, "c");
//
// end
//
#line 163 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMline(163);
#line 163 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}
#line 163 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
return_:
#line 163 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwValidateOutput(cout, 1, nargout_, "cout", "contour3");
#line 163 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwValidateOutput(*h, 2, nargout_, "h", "contour3");
#line 163 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mwValidateOutput(*msg, 3, nargout_, "msg", "contour3");
#line 163 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMlineFunctionReturn()
#line 163 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
return cout;
#line 163 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
mclMlineExitFunctionReturn();
#line 163 "D:\\matlab\\matlab\\toolbox\\matlab\\specgraph\\contour3.m"
}