lineeq.cpp

《MATLAB实用指南》系列丛书源代码。

  #include "matlib.h"
  #pragma hdrstop
  
  #include "LineEq.h"
  
  
  Mm LineEq(Mm A, Mm B) {
    begin_scope
    A.setname("A"); B.setname("B"); 
    dMm(X); 
    
    #line 1 "d:/matlab_c/matcom/lineeq.m"
    call_stack_begin;
    #line 1 "d:/matlab_c/matcom/lineeq.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=1.0;
    nargout_set=0;
    
    // translated code
    
    #line 2 "d:/matlab_c/matcom/lineeq.m"
_   X = mldivide(A,B);
    
    call_stack_end;
    
    // nargin, nargout exit code
    nargin_val=old_nargin; nargout_val=old_nargout;
    
    // function exit code
    A.setname(NULL); B.setname(NULL); 
    return X;
    end_scope
  }