Changeset 4526


Ignore:
Timestamp:
07/12/10 11:13:40 (15 years ago)
Author:
Mathieu Morlighem
Message:

do not call ' in mexCallMatlab, use transpose instead (more clear), same for \ -> mldivide + cosmetics

Location:
issm/trunk/src
Files:
10 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk/src/c/io/WriteData.cpp

    r4166 r4526  
    7474
    7575                //transpose
    76                 mexCallMATLAB(1,&dataref,1,&tdataref, "'");
     76                mexCallMATLAB(1,&dataref,1,&tdataref, "transpose");
    7777        }
    7878        else{
  • issm/trunk/src/c/modules/ConfigureObjectsx/ConfigureObjectsx.cpp

    r4410 r4526  
    2323        parameters->FindParam(&analysis_type,AnalysisTypeEnum);
    2424       
    25         _printf_("      Configuring elements...\n");
     25        //_printf_("      Configuring elements...\n");
    2626        for (i=0;i<elements->Size();i++){
    2727                element=(Element*)elements->GetObjectByOffset(i);
    2828                element->Configure(elements,loads,nodes,materials,parameters);
    2929        }
    30         _printf_("      Configuring loads...\n");
     30        //_printf_("      Configuring loads...\n");
    3131        for (i=0;i<loads->Size();i++){
    3232                load=(Load*)loads->GetObjectByOffset(i);
     
    3535                }
    3636        }
    37         _printf_("      Configuring nodes...\n");
     37        //_printf_("      Configuring nodes...\n");
    3838        for (i=0;i<nodes->Size();i++){
    3939                node=(Node*)nodes->GetObjectByOffset(i);
  • issm/trunk/src/c/objects/ExternalResults/DoubleMatExternalResult.cpp

    r4321 r4526  
    240240       
    241241        /*transpose the matrix, from c to matlab format */
    242         mexCallMATLAB(1,&pfield2, 1, &pfield, "'");
     242        mexCallMATLAB(1,&pfield2, 1, &pfield, "transpose");
    243243
    244244        /*set tranpose matrix inside the dataref structure: */
  • issm/trunk/src/c/objects/Params/DoubleMatParam.cpp

    r4352 r4526  
    192192       
    193193        //transpose the matrix, written directly to matlab! from C to matlab.
    194         mexCallMATLAB(1,&pfield2, 1, &pfield, "'");
     194        mexCallMATLAB(1,&pfield2, 1, &pfield, "transpose");
    195195        mxSetField( dataref, 0, name,pfield2);
    196196}
  • issm/trunk/src/c/toolkits/petsc/patches/PetscMatrixToMatlabMatrix.cpp

    r3595 r4526  
    135135
    136136        /*Transpose matrcol_indes: */
    137         mexCallMATLAB(1,&tdataref,1,&dataref, "'");
     137        mexCallMATLAB(1,&tdataref,1,&dataref, "transpose");
    138138
    139139
  • issm/trunk/src/mex/Solver/Solver.cpp

    r4525 r4526  
    4848                array[0]=KFF;
    4949                array[1]=PF;
    50                 mexCallMATLAB(1,UF,2,array,"\\");
     50                mexCallMATLAB(1,UF,2,array,"mldivide");
    5151        }
    5252
  • issm/trunk/src/mex/TriMesh/TriMesh.cpp

    r4453 r4526  
    275275        mxSetN(pmxa_array,out.numberoftriangles);
    276276        mxSetPr(pmxa_array,index);
    277         mexCallMATLAB( 1, &plhs[0], 1, &pmxa_array, "'");
     277        mexCallMATLAB( 1, &plhs[0], 1, &pmxa_array, "transpose");
    278278
    279279        pmxa_array= mxCreateDoubleMatrix(0,0,mxREAL);
     
    281281        mxSetN(pmxa_array,out.numberofpoints);
    282282        mxSetPr(pmxa_array,x);
    283         mexCallMATLAB( 1, &plhs[1], 1, &pmxa_array, "'");
     283        mexCallMATLAB( 1, &plhs[1], 1, &pmxa_array, "transpose");
    284284
    285285        pmxa_array= mxCreateDoubleMatrix(0,0,mxREAL);
     
    287287        mxSetN(pmxa_array,out.numberofpoints);
    288288        mxSetPr(pmxa_array,y);
    289         mexCallMATLAB( 1, &plhs[2], 1, &pmxa_array, "'");
     289        mexCallMATLAB( 1, &plhs[2], 1, &pmxa_array, "transpose");
    290290
    291291        pmxa_array= mxCreateDoubleMatrix(0,0,mxREAL);
     
    293293        mxSetN(pmxa_array,out.numberofsegments);
    294294        mxSetPr(pmxa_array,segments);
    295         mexCallMATLAB( 1, &plhs[3], 1, &pmxa_array, "'");
     295        mexCallMATLAB( 1, &plhs[3], 1, &pmxa_array, "transpose");
    296296
    297297        pmxa_array= mxCreateDoubleMatrix(0,0,mxREAL);
     
    299299        mxSetN(pmxa_array,out.numberofsegments);
    300300        mxSetPr(pmxa_array,segmentmarkerlist);
    301         mexCallMATLAB( 1, &plhs[4], 1, &pmxa_array, "'");
     301        mexCallMATLAB( 1, &plhs[4], 1, &pmxa_array, "transpose");
    302302       
    303303        return;
  • issm/trunk/src/mex/TriMeshNoDensity/TriMeshNoDensity.cpp

    r4453 r4526  
    264264        mxSetN(pmxa_array,out.numberoftriangles);
    265265        mxSetPr(pmxa_array,index);
    266         mexCallMATLAB( 1, &plhs[0], 1, &pmxa_array, "'");
     266        mexCallMATLAB( 1, &plhs[0], 1, &pmxa_array, "transpose");
    267267
    268268        pmxa_array= mxCreateDoubleMatrix(0,0,mxREAL);
     
    270270        mxSetN(pmxa_array,out.numberofpoints);
    271271        mxSetPr(pmxa_array,x);
    272         mexCallMATLAB( 1, &plhs[1], 1, &pmxa_array, "'");
     272        mexCallMATLAB( 1, &plhs[1], 1, &pmxa_array, "transpose");
    273273
    274274        pmxa_array= mxCreateDoubleMatrix(0,0,mxREAL);
     
    276276        mxSetN(pmxa_array,out.numberofpoints);
    277277        mxSetPr(pmxa_array,y);
    278         mexCallMATLAB( 1, &plhs[2], 1, &pmxa_array, "'");
     278        mexCallMATLAB( 1, &plhs[2], 1, &pmxa_array, "transpose");
    279279
    280280        pmxa_array= mxCreateDoubleMatrix(0,0,mxREAL);
     
    282282        mxSetN(pmxa_array,out.numberofsegments);
    283283        mxSetPr(pmxa_array,segments);
    284         mexCallMATLAB( 1, &plhs[3], 1, &pmxa_array, "'");
     284        mexCallMATLAB( 1, &plhs[3], 1, &pmxa_array, "transpose");
    285285
    286286        pmxa_array= mxCreateDoubleMatrix(0,0,mxREAL);
     
    288288        mxSetN(pmxa_array,out.numberofsegments);
    289289        mxSetPr(pmxa_array,segmentmarkerlist);
    290         mexCallMATLAB( 1, &plhs[4], 1, &pmxa_array, "'");
     290        mexCallMATLAB( 1, &plhs[4], 1, &pmxa_array, "transpose");
    291291       
    292292        return;
  • issm/trunk/src/mex/TriMeshProcessRifts/TriMeshProcessRifts.cpp

    r4453 r4526  
    198198        mxSetN(pmxa_array,nel);
    199199        mxSetPr(pmxa_array,index_in);
    200         mexCallMATLAB( 1, &plhs[0], 1, &pmxa_array, "'");
     200        mexCallMATLAB( 1, &plhs[0], 1, &pmxa_array, "transpose");
    201201
    202202        pmxa_array= mxCreateDoubleMatrix(0,0,mxREAL);
     
    204204        mxSetN(pmxa_array,nods);
    205205        mxSetPr(pmxa_array,x_in);
    206         mexCallMATLAB( 1, &plhs[1], 1, &pmxa_array, "'");
     206        mexCallMATLAB( 1, &plhs[1], 1, &pmxa_array, "transpose");
    207207
    208208        pmxa_array= mxCreateDoubleMatrix(0,0,mxREAL);
     
    210210        mxSetN(pmxa_array,nods);
    211211        mxSetPr(pmxa_array,y_in);
    212         mexCallMATLAB( 1, &plhs[2], 1, &pmxa_array, "'");
     212        mexCallMATLAB( 1, &plhs[2], 1, &pmxa_array, "transpose");
    213213
    214214       
     
    217217        mxSetN(pmxa_array,num_seg);
    218218        mxSetPr(pmxa_array,segments_in);
    219         mexCallMATLAB( 1, &plhs[3], 1, &pmxa_array, "'");
     219        mexCallMATLAB( 1, &plhs[3], 1, &pmxa_array, "transpose");
    220220       
    221221
     
    224224        mxSetN(pmxa_array,num_seg);
    225225        mxSetPr(pmxa_array,segmentmarkers_in);
    226         mexCallMATLAB( 1, &plhs[4], 1, &pmxa_array, "'");
     226        mexCallMATLAB( 1, &plhs[4], 1, &pmxa_array, "transpose");
    227227
    228228        if(riftflag){
     
    249249                        mxSetN(pmxa_array2,out_riftsnumsegments[i]);
    250250                        mxSetPr(pmxa_array2,out_riftssegments[i]);
    251                         mexCallMATLAB( 1, &pmxa_array3, 1, &pmxa_array2, "'");
     251                        mexCallMATLAB( 1, &pmxa_array3, 1, &pmxa_array2, "transpose");
    252252                       
    253253                        mxSetField(pmxa_array,i,"segments",pmxa_array3);
     
    259259                        mxSetN(pmxa_array2,out_riftsnumpairs[i]);
    260260                        mxSetPr(pmxa_array2,out_riftspairs[i]);
    261                         mexCallMATLAB( 1, &pmxa_array3, 1, &pmxa_array2, "'");
     261                        mexCallMATLAB( 1, &pmxa_array3, 1, &pmxa_array2, "transpose");
    262262                       
    263263                        mxSetField(pmxa_array,i,"pairs",pmxa_array3);
     
    278278                        mxSetN(pmxa_array2,out_riftsnumpenaltypairs[i]);
    279279                        mxSetPr(pmxa_array2,out_riftspenaltypairs[i]);
    280                         mexCallMATLAB( 1, &pmxa_array3, 1, &pmxa_array2, "'");
     280                        mexCallMATLAB( 1, &pmxa_array3, 1, &pmxa_array2, "transpose");
    281281                       
    282282                        mxSetField(pmxa_array,i,"penaltypairs",pmxa_array3);
  • issm/trunk/src/mex/TriMeshRefine/TriMeshRefine.cpp

    r4453 r4526  
    285285        mxSetN(pmxa_array,out.numberoftriangles);
    286286        mxSetPr(pmxa_array,index);
    287         mexCallMATLAB( 1, &plhs[0], 1, &pmxa_array, "'");
     287        mexCallMATLAB( 1, &plhs[0], 1, &pmxa_array, "transpose");
    288288
    289289        pmxa_array= mxCreateDoubleMatrix(0,0,mxREAL);
     
    291291        mxSetN(pmxa_array,out.numberofpoints);
    292292        mxSetPr(pmxa_array,x);
    293         mexCallMATLAB( 1, &plhs[1], 1, &pmxa_array, "'");
     293        mexCallMATLAB( 1, &plhs[1], 1, &pmxa_array, "transpose");
    294294
    295295        pmxa_array= mxCreateDoubleMatrix(0,0,mxREAL);
     
    297297        mxSetN(pmxa_array,out.numberofpoints);
    298298        mxSetPr(pmxa_array,y);
    299         mexCallMATLAB( 1, &plhs[2], 1, &pmxa_array, "'");
     299        mexCallMATLAB( 1, &plhs[2], 1, &pmxa_array, "transpose");
    300300
    301301        pmxa_array= mxCreateDoubleMatrix(0,0,mxREAL);
     
    303303        mxSetN(pmxa_array,out.numberofsegments);
    304304        mxSetPr(pmxa_array,segments);
    305         mexCallMATLAB( 1, &plhs[3], 1, &pmxa_array, "'");
     305        mexCallMATLAB( 1, &plhs[3], 1, &pmxa_array, "transpose");
    306306
    307307        pmxa_array= mxCreateDoubleMatrix(0,0,mxREAL);
     
    309309        mxSetN(pmxa_array,out.numberofsegments);
    310310        mxSetPr(pmxa_array,segmentmarkerlist);
    311         mexCallMATLAB( 1, &plhs[4], 1, &pmxa_array, "'");
     311        mexCallMATLAB( 1, &plhs[4], 1, &pmxa_array, "transpose");
    312312
    313313        return;
Note: See TracChangeset for help on using the changeset viewer.