isonormals.cpp

来自「实现VC与MATLAB的无缝对接」· C++ 代码 · 共 408 行 · 第 1/2 页

_       nout = n;
        #line 93 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
      }
      #line 94 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
    } else {
      
      #line 95 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_     nout = n;
      #line 96 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
    }
    
    #line 98 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
    //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
    #line 99 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
    //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
    #line 100 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
    //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
    
    call_stack_end;
    
    // nargin, nargout exit code
    nargin_val=old_nargin; nargout_val=old_nargout;
    
    // function exit code
    varargin.setname(NULL); 
    return nout;
    end_scope
  }
  
  
  Mm isonormals() {
    begin_scope
    double old_nargin=nargin_val; nargin_val=0.0; nargin_set=1;
    dMm(varargin); varargin=cell(0); 
    dMm(ret1a);
    ret1a=isonormals(varargin);
    nargin_val=old_nargin;
    return ret1a;
    end_scope
  }
  
  #include "isonormals.h"
  
  
  static Mm parseargs(Mm nin, Mm vargin, i_o_t, Mm& x__o, Mm& y__o, Mm& z__o, Mm& data__o, Mm& verts__o, Mm& negate__o) \
     {
    begin_scope
    nin.setname("nin"); vargin.setname("vargin"); 
    dMm(x); dMm(y); dMm(z); dMm(data); dMm(verts); dMm(negate); dMm(lastarg); 
    
    #line 101 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
    call_stack_begin;
    #line 101 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
    // nargin, nargout entry code
    double old_nargin=nargin_val; if (!nargin_set) nargin_val=2.0;
    nargin_set=0;
    double old_nargout=nargout_val; if (!nargout_set) nargout_val=6.0;
    nargout_set=0;
    
    // translated code
    
    
    #line 103 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_   x = nop_M;
    #line 104 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_   y = nop_M;
    #line 105 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_   z = nop_M;
    #line 106 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_   data = nop_M;
    #line 107 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_   verts = nop_M;
    #line 108 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_   negate = 0.0;
    
    #line 110 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_   if (istrue(nin>0.0)) {
      #line 111 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_     lastarg = vargin.br(nin);
      #line 112 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_     if (istrue(isstr(lastarg))) {
        #line 113 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_       if (istrue(lower(lastarg(1.0))==TM("n"))) {
          #line 113 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
          // negate
          #line 114 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_         negate = 1.0;
          #line 115 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
        }
        #line 116 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_       nin = nin-1.0;
        #line 117 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
      }
      #line 118 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
    }
    
    #line 120 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_   if (istrue(nin==2.0)) {
      #line 120 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
      // isonormals(v, verts)
      #line 121 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_     data = vargin.br(1.0);
      #line 122 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_     verts = vargin.br(2.0);
      #line 123 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
    } else
    #line 123 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
    if (istrue(nin==5.0)) {
      #line 123 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
      // isonormals(x,y,z,v, verts)
      #line 124 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_     x = vargin.br(1.0);
      #line 125 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_     y = vargin.br(2.0);
      #line 126 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_     z = vargin.br(3.0);
      #line 127 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_     data = vargin.br(4.0);
      #line 128 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_     verts = vargin.br(5.0);
      #line 129 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
    } else {
      
      #line 130 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
_     error(TM("Wrong number of input arguments."));
      
      #line 131 "g:/matlabr11/toolbox/matlab/specgraph/isonormals.m"
    }
    
    
    call_stack_end;
    
    // nargin, nargout exit code
    nargin_val=old_nargin; nargout_val=old_nargout;
    
    // function exit code
    nin.setname(NULL); vargin.setname(NULL); 
    x__o=x; y__o=y; z__o=z; data__o=data; verts__o=verts; negate__o=negate; 
    return x_M;
    end_scope
  }
  
  
  static Mm parseargs(Mm nin, Mm vargin) {
    begin_scope
    double old_nargin=nargin_val; nargin_val=2.0; nargin_set=1;
    double old_nargout=nargout_val; nargout_val=1.0; nargout_set=1;
    dMm(x__o); dMm(y__o); dMm(z__o); dMm(data__o); dMm(verts__o); dMm(negate__o); 
    parseargs(nin, vargin, i_o, x__o, y__o, z__o, data__o, verts__o, negate__o);
    nargout_val=old_nargout;
    nargin_val=old_nargin;
    return(x__o);
    end_scope
  }
  
  static Mm parseargs(Mm nin, Mm vargin, i_o_t, Mm& x__o, Mm& y__o) {
    begin_scope
    double old_nargin=nargin_val; nargin_val=2.0; nargin_set=1;
    double old_nargout=nargout_val; nargout_val=2.0; nargout_set=1;
    dMm(z__o); dMm(data__o); dMm(verts__o); dMm(negate__o); 
    parseargs(nin, vargin, i_o, x__o, y__o, z__o, data__o, verts__o, negate__o);
    nargout_val=old_nargout;
    nargin_val=old_nargin;
    return x_M;
    end_scope
  }
  
  static Mm parseargs(Mm nin, Mm vargin, i_o_t, Mm& x__o, Mm& y__o, Mm& z__o) {
    begin_scope
    double old_nargin=nargin_val; nargin_val=2.0; nargin_set=1;
    double old_nargout=nargout_val; nargout_val=3.0; nargout_set=1;
    dMm(data__o); dMm(verts__o); dMm(negate__o); 
    parseargs(nin, vargin, i_o, x__o, y__o, z__o, data__o, verts__o, negate__o);
    nargout_val=old_nargout;
    nargin_val=old_nargin;
    return x_M;
    end_scope
  }
  
  static Mm parseargs(Mm nin, Mm vargin, i_o_t, Mm& x__o, Mm& y__o, Mm& z__o, Mm& data__o) {
    begin_scope
    double old_nargin=nargin_val; nargin_val=2.0; nargin_set=1;
    double old_nargout=nargout_val; nargout_val=4.0; nargout_set=1;
    dMm(verts__o); dMm(negate__o); 
    parseargs(nin, vargin, i_o, x__o, y__o, z__o, data__o, verts__o, negate__o);
    nargout_val=old_nargout;
    nargin_val=old_nargin;
    return x_M;
    end_scope
  }
  
  static Mm parseargs(Mm nin, Mm vargin, i_o_t, Mm& x__o, Mm& y__o, Mm& z__o, Mm& data__o, Mm& verts__o) {
    begin_scope
    double old_nargin=nargin_val; nargin_val=2.0; nargin_set=1;
    double old_nargout=nargout_val; nargout_val=5.0; nargout_set=1;
    dMm(negate__o); 
    parseargs(nin, vargin, i_o, x__o, y__o, z__o, data__o, verts__o, negate__o);
    nargout_val=old_nargout;
    nargin_val=old_nargin;
    return x_M;
    end_scope
  }