Changeset 4752


Ignore:
Timestamp:
07/22/10 14:18:34 (15 years ago)
Author:
Eric.Larour
Message:

Finished reformatting of John's code to fit ISSM

File:
1 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk/src/mex/SparseToVector/SparseToVector.cpp

    r4751 r4752  
    1717        double   *prd=NULL;
    1818
    19         /* Check for proper number of arguments */
    20    
    21         if      (nrhs == 0 && nlhs == 0) {
    22                 SparseToVectorUsage();
    23                 return;
    24         }
    25         else if (nrhs <  1 || nlhs < 2 || nlhs > 6) {
    26                 SparseToVectorUsage();
    27                 mexErrMsgTxt(" ");
    28         }
     19        /*Boot module: */
     20        MODULEBOOT();
     21
     22        /*checks on arguments on the matlab side: */
     23        CheckNumMatlabArguments(nlhs,NLHS,nrhs,NRHS,__FUNCT__,&SparseToVectorUsage);
    2924
    3025        /* Create matrices for the return arguments */
    31 
    3226        if (!mxIsNumeric(A_IN) || !mxIsSparse(A_IN)) {
    3327                mexPrintf("%s -- Input matrix must be numeric and sparse.\n",__FUNCT__);
     
    8074                                  __FUNCT__,mxGetM(A_IN),mxGetN(A_IN),mxGetNzmax(A_IN));
    8175        }
     76       
     77        /*end module: */
     78        MODULEEND();
    8279}
    8380
Note: See TracChangeset for help on using the changeset viewer.