source: issm/oecreview/Archive/12321-12677/ISSM-12510-12511.diff

Last change on this file was 12679, checked in by Mathieu Morlighem, 13 years ago

Added 12321-12677
File size: 106.8 KB

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/matlab/io/FetchMatlabData.cpp

     
    3535                }
    3636                else{
    3737                        if(!mxIsClass(dataref,"double") && !mxIsClass(dataref,"single")){
    38                                 printf("Warning: converting matlab data from '%s' to 'double'\n",mxGetClassName(dataref));
     38                                _printLine_("Warning: converting matlab data from '" << mxGetClassName(dataref) << "' to 'double'");
    3939                        }
    4040                        /*Convert matlab matrix to double* matrix: */
    4141                        MatlabMatrixToDoubleMatrix(&outmatrix,&outmatrix_rows,&outmatrix_cols,dataref);

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/matlab/io/PrintfFunction.cpp

     
    5050        }
    5151
    5252        /*Ok, if we are running in parallel, get node 0 to print*/
    53         if(my_rank==0)printf(buffer);
     53        if(my_rank==0)_printString_(buffer);
    5454
    5555        /*Clean up and return*/
    5656        xDelete<char>(buffer);

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/shared/Exceptions/Exceptions.cpp

     
    4343        extern int num_procs;
    4444
    4545        if (function_name=="" || file_line==0){ //WINDOWS
    46                 printf("%s%s","Error message: ",what());
     46                _printString_("" << "Error message: " << what());
    4747        }
    4848        else{
    4949                if(num_procs==1){
    50                         printf("\n??? Error using ==> %s:%i\n",file_name.c_str(),file_line);
    51                         printf("%s error message: %s\n\n",function_name.c_str(),what());
     50                        _printLine_("\n??? Error using ==> " << file_name.c_str() << ":" << file_line);
     51                        _printLine_("" << function_name.c_str() << " error message: " << what() << "\n");
    5252                }
    5353                else{
    54                         printf("\n[%i] ??? Error using ==> %s:%i\n",my_rank,file_name.c_str(),file_line);
    55                         printf("[%i] %s error message: %s\n\n",my_rank,function_name.c_str(),what());
     54                        _printLine_("\n[" << my_rank << "] ??? Error using ==> " << file_name.c_str() << ":" << file_line);
     55                        _printLine_("[" << my_rank << "] " << function_name.c_str() << " error message: " << what() << "\n");
    5656                }
    5757        }
    5858        return;

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/io/PrintfFunction.cpp

     
    4848        }
    4949
    5050        /*Ok, if we are running in parallel, get node 0 to print*/
    51         if(my_rank==0)printf(buffer);
     51        if(my_rank==0)_printString_(buffer);
    5252
    5353        /*Clean up and return*/
    5454        xDelete<char>(buffer);

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/modules/InterpFromMeshToMesh2dx/InterpFromMeshToMesh2dx.cpp

     
    5353        }
    5454
    5555        /*Initialize output*/
    56         if (verbose) printf("Initializing output vector\n");
     56        if (verbose) _printLine_("Initializing output vector");
    5757        data_interp=xNew<double>(nods_interp*data_cols);
    5858
    5959        // read background mesh
    60         if (verbose) printf("Reading mesh\n");
     60        if (verbose) _printLine_("Reading mesh");
    6161        Mesh Th(index_data,x_data,y_data,nods_data,nels_data);
    6262        Th.CreateSingleVertexToTriangleConnectivity();
    6363
    6464        //Loop over output nodes
    65         if (verbose) printf("Loop over the nodes\n");
     65        if (verbose) _printLine_("Loop over the nodes");
    6666        for(i=0;i<nods_interp;i++){
    6767               
    6868                /*reset skip_bamg: */
    … …  
    137137        }
    138138
    139139        /*Assign output pointers:*/
    140         if (verbose) printf("Assigning output\n");
     140        if (verbose) _printLine_("Assigning output");
    141141        *pdata_interp=data_interp;
    142142
    143143        /*No error return*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/modules/BamgConvertMeshx/BamgConvertMeshx.cpp

     
    2323        bamgopts=new BamgOpts();
    2424
    2525        // read mesh
    26         if(verbose) printf("Reading mesh\n");
     26        if(verbose) _printLine_("Reading mesh");
    2727        Mesh Th(index,x,y,nods,nels);
    2828
    2929        //write mesh and geometry
    30         if (verbose) printf("Write Geometry\n");
     30        if (verbose) _printLine_("Write Geometry");
    3131        Th.Gh.WriteGeometry(bamggeom,bamgopts);
    32         if (verbose) printf("Write Mesh\n");
     32        if (verbose) _printLine_("Write Mesh");
    3333        Th.WriteMesh(bamgmesh,bamgopts);
    3434
    3535        //clean up

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/modules/PositiveDegreeDayx/PositiveDegreeDayx.cpp

     
    5656  itm = (int)(2*siglim/DT + 1.5);
    5757 
    5858  if (itm >= NPDMAX){
    59     printf("increase NPDMAX in massBalance.cpp\n");
     59    _printLine_("increase NPDMAX in massBalance.cpp");
    6060    exit (1);
    6161      }
    6262  for (it = 0; it < itm; it++){ 
    … …  
    8282  siglimc = 2.5*signormc ;
    8383  itm = (int)((PDCUT+2.*siglimc)/DT + 1.5);
    8484  if (itm >= NPDCMAX){
    85     printf("'increase NPDCMAX in p35com'\n");
     85    _printLine_("'increase NPDCMAX in p35com'");
    8686    exit (1);
    8787      }
    8888  for (it = 0; it < itm; it++ ){

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/modules/Chacox/Chacox.cpp

     
    6565
    6666
    6767        if (DEBUG_TRACE > 0) {
    68                 printf("<Entering main>\n");
     68                _printLine_("<Entering main>");
    6969        }
    7070
    7171        if (PRINT_HEADERS) {
    72                 printf("\n                    Chaco 2.0\n");
    73                 printf("          Sandia National Laboratories\n\n");
     72                _printLine_("\n                    Chaco 2.0");
     73                _printLine_("          Sandia National Laboratories\n");
    7474        }
    7575
    7676        Using_Main = TRUE;
    … …  
    176176        for (i=0; i<start[nvtxs]; adjacency[i++]--);
    177177
    178178        if (DEBUG_MEMORY > 0) {
    179                 printf("\n");
     179                _printLine_("");
    180180                smalloc_stats();
    181181        }
    182182
    … …  
    184184                fclose(params_file);
    185185
    186186        if (DEBUG_TRACE > 1) {
    187                 printf("<Leaving main>\n");
     187                _printLine_("<Leaving main>");
    188188        }
    189189       
    190190        return(0);

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/modules/Chacox/input_parse.cpp

     
    3737        int       eigensolver;  /* which kind of eigensolver to use */
    3838
    3939        if (DEBUG_TRACE > 0) {
    40                 printf("<Entering input_parse>\n");
     40                _printLine_("<Entering input_parse>");
    4141        }
    4242
    4343        if (PROMPT) {
    44                 printf("Parallel machine architecture:\n");
    45                 printf("  (0) Hypercube\n");
    46                 printf("  (1) One-dimensional mesh\n");
    47                 printf("  (2) Two-dimensional mesh\n");
    48                 printf("  (3) Three-dimensional mesh\n");
     44                _printLine_("Parallel machine architecture:");
     45                _printLine_("  (0) Hypercube");
     46                _printLine_("  (1) One-dimensional mesh");
     47                _printLine_("  (2) Two-dimensional mesh");
     48                _printLine_("  (3) Three-dimensional mesh");
    4949        }
    5050        *architecture = (int)options[OPT_ARCH];
    5151        if (*architecture < 0 || *architecture > 3) {
    … …  
    5656
    5757        /* Name output assignment file. */
    5858        if (PROMPT)
    59                 printf("Assignment output file: ");
     59                _printString_("Assignment output file: ");
    6060        outassignname = NULL;
    6161
    6262        /* Name output results file. */
    6363        if (PROMPT)
    64                 printf("File name for saving run results: ");
     64                _printString_("File name for saving run results: ");
    6565        outfilename = NULL;
    6666
    6767        /* Initialize the method flags */
    … …  
    7474        }
    7575        else {
    7676                if (PROMPT) {
    77                         printf("Global partitioning method:\n");
    78                         printf("  (1) Multilevel-KL\n");
    79                         printf("  (2) Spectral\n");
    80                         printf("  (3) Inertial\n");
    81                         printf("  (4) Linear\n");
    82                         printf("  (5) Random\n");
    83                         printf("  (6) Scattered\n");
    84                         printf("  (7) Read-from-file\n");
     77                        _printLine_("Global partitioning method:");
     78                        _printLine_("  (1) Multilevel-KL");
     79                        _printLine_("  (2) Spectral");
     80                        _printLine_("  (3) Inertial");
     81                        _printLine_("  (4) Linear");
     82                        _printLine_("  (5) Random");
     83                        _printLine_("  (6) Scattered");
     84                        _printLine_("  (7) Read-from-file");
    8585                }
    8686                *global_method = (int)options[OPT_GLOBAL];
    8787                if (*global_method < 1 || *global_method > 7) {
    … …  
    9393
    9494        if (*global_method == 7) {      /* Name and open input assignment file. */
    9595                if (PROMPT)
    96                         printf("Assignment input file: ");
     96                        _printString_("Assignment input file: ");
    9797        }
    9898
    9999        else if (*global_method == 3) {
    100100                if (PROMPT)
    101                         printf("Geometry input file name: ");
     101                        _printString_("Geometry input file name: ");
    102102        }
    103103
    104104        else if (*global_method == 2) {
    105105                if (PROMPT) {
    106                         printf("Eigensolver:\n");
    107                         printf("  (1) Multilevel RQI/Symmlq\n");
    108                         printf("  (2) Lanczos\n");
     106                        _printLine_("Eigensolver:");
     107                        _printLine_("  (1) Multilevel RQI/Symmlq");
     108                        _printLine_("  (2) Lanczos");
    109109                }
    110110                eigensolver = (int)options[OPT_RQI];
    111111                if (eigensolver < 0 || eigensolver > 2) {
    … …  
    116116                if (eigensolver == 1) {
    117117                        if (MATCH_TYPE == 5) {  /* geometric matching */
    118118                                if (PROMPT)
    119                                         printf("Geometry input file name: ");
     119                                        _printString_("Geometry input file name: ");
    120120                        }
    121121                        *rqi_flag = 1;
    122122                        if (PROMPT)
    123                                 printf("Number of vertices to coarsen down to: ");
     123                                _printString_("Number of vertices to coarsen down to: ");
    124124                        *vmax = (int)options[OPT_VMAX];
    125125                        if (*vmax <= 0) {
    126126                                printf("%s -- Vmax %d must be greater then 0.\n",
    … …  
    136136        else if (*global_method == 1) {
    137137                if (MATCH_TYPE == 5) {          /* geometric matching */
    138138                        if (PROMPT)
    139                                 printf("Geometry input file name: ");
     139                                _printString_("Geometry input file name: ");
    140140                }
    141141                if (PROMPT)
    142                         printf("Number of vertices to coarsen down to: ");
     142                        _printString_("Number of vertices to coarsen down to: ");
    143143                *vmax = (int)options[OPT_VMAX];
    144144                if (*vmax <= 0) {
    145145                        printf("%s -- Vmax %d must be greater then 0.\n",
    … …  
    167167                *local_method = 1;
    168168        else {
    169169                if (PROMPT) {
    170                         printf("Local refinement method:\n");
    171                         printf("  (1) Kernighan-Lin\n");
    172                         printf("  (2) None\n");
     170                        _printLine_("Local refinement method:");
     171                        _printLine_("  (1) Kernighan-Lin");
     172                        _printLine_("  (2) None");
    173173                }
    174174                *local_method = (int)options[OPT_LOCAL];
    175175                if (*local_method < 1 || *local_method > 2) {
    … …  
    184184        /* Get total number of hypercube dimensions in which to partition. */
    185185                *ndims_tot = 0;
    186186                if (PROMPT)
    187                         printf("Total number of target hypercube dimensions: ");
     187                        _printString_("Total number of target hypercube dimensions: ");
    188188                *ndims_tot = nparts[0];
    189189                if (*ndims_tot < 1) {
    190                         printf(" Number of divisions must be at least 1\n");
     190                        _printLine_(" Number of divisions must be at least 1");
    191191                        printf("%s -- Number of divisions %d must be at least 1.\n",
    192192                                   __FUNCT__,nparts[0]);
    193193                        return(-1);
    … …  
    199199                mesh_dims[1] = mesh_dims[2] = 1;
    200200                if (*architecture == 2) {
    201201                        if (PROMPT)
    202                                 printf("X and Y extent of of 2-D mesh: ");
     202                                _printString_("X and Y extent of of 2-D mesh: ");
    203203                        mesh_dims[0] = nparts[0];
    204204                        mesh_dims[1] = nparts[1];
    205205                }
    206206                else if (*architecture == 3) {
    207207                        if (PROMPT)
    208                                 printf("X, Y and Z extent of 3-D mesh: ");
     208                                _printString_("X, Y and Z extent of 3-D mesh: ");
    209209                        mesh_dims[0] = nparts[0];
    210210                        mesh_dims[1] = nparts[1];
    211211                        mesh_dims[2] = nparts[2];
    212212                }
    213213                else {                  /* Anything else => 1-D mesh */
    214214                        if (PROMPT)
    215                                 printf("Size of 1-D mesh: ");
     215                                _printString_("Size of 1-D mesh: ");
    216216                        mesh_dims[0] = nparts[0];
    217217                        *architecture = 1;
    218218                }
    … …  
    226226        }
    227227        else if (*nprocs <= 7) {
    228228                if (PROMPT) {
    229                         printf("Partitioning dimension: \n");
    230                         printf("  (1) Bisection\n");
    231                         printf("  (2) Quadrisection\n");
     229                        _printLine_("Partitioning dimension: ");
     230                        _printLine_("  (1) Bisection");
     231                        _printLine_("  (2) Quadrisection");
    232232                }
    233233                *ndims = (int)options[OPT_NDIMS];
    234234                if (*ndims < 1 || *ndims > 2) {
    … …  
    239239        }
    240240        else {
    241241                if (PROMPT) {
    242                         printf("Partitioning dimension: \n");
    243                         printf("  (1) Bisection\n");
    244                         printf("  (2) Quadrisection\n");
    245                         printf("  (3) Octasection\n");
     242                        _printLine_("Partitioning dimension: ");
     243                        _printLine_("  (1) Bisection");
     244                        _printLine_("  (2) Quadrisection");
     245                        _printLine_("  (3) Octasection");
    246246                }
    247247                *ndims = (int)options[OPT_NDIMS];
    248248                if (*ndims < 1 || *ndims > 3) {

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/modules/Exp2Kmlx/Exp2Kmlx.cpp

     
    5757                _error2_("Error reading exp file.");
    5858        _printf_(true,"Exp2Kmlx -- Reading %d exp profiles from file \"%s\".\n",nprof,filexp);
    5959//      for (i=0; i<nprof; i++)
    60 //              printf("i=%d; nvert=%d, closed=%d\n",i,pnvert[i],closed[i]);
     60//              _printLine_("i=" << i << "; nvert=" << pnvert[i] << ", closed=" << closed[i]);
    6161
    6262/*  construct kml file  */
    6363

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/modules/HoleFillerx/HoleFillerx.cpp

     
    7575                                }
    7676                        }
    7777                }
    78                 printf( "\n" );
    79                 printf("Number of zeroes remaining: %d",lines*samps-counter);
     78                _printLine_( "" );
     79                _printString_("Number of zeroes remaining: " << lines*samps-counter);
    8080                fflush( stdout );
    8181        #endif
    8282
    … …  
    9494                        }
    9595                }
    9696                //        n u m b e r   o f   z e r o e s   r e m a i n i n g :   1 2 3 4 5 6 7 8 9 10       
    97                 printf( "\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b" );
    98                 printf("Number of zeroes remaining: %d",lines*samps-counter);
     97                _printString_( "\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b" );
     98                _printString_("Number of zeroes remaining: " << lines*samps-counter);
    9999                fflush( stdout );
    100100        #endif
    101101       
    … …  
    103103
    104104/***************** FIRST RUN *********************/
    105105/*
    106 fprintf ( stdout, "First  Application:  " ); time(&t2); printf( ctime(&t2) );
     106fprintf ( stdout, "First  Application:  " ); time(&t2); _printString_( ctime(&t2) );
    107107*/
    108108        for ( i = 0; i < lines; i++ ){
    109109                for ( j = 0; j < samps; j++ ){
    … …  
    276276                        //if ( temp <     0 ) temp =     0;
    277277                       
    278278                        #ifdef _DEBUG2_
    279                                 //printf("%g %g %g \n",temp,elev,range);
     279                                //_printLine_("" << temp << " " << elev << " " << range << " ");
    280280                        #endif
    281281
    282282                        *(image3+samps*i+j) = temp ;                   
    … …  
    353353        time(&t2);     
    354354       
    355355        #ifdef _DEBUG2_
    356                 printf( "\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b" );
    357                 printf("Number of zeroes remaining:          0\n\n");
     356                _printString_( "\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b" );
     357                _printLine_("Number of zeroes remaining:          0\n");
    358358                printf ( "\n");
    359359        #endif
    360360       

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/modules/Krigingx/Krigingx.cpp

     
    6565
    6666                observations->ObservationList(&x,&y,&data,&nobs);
    6767
    68                 printf("Generation Delaunay Triangulation\n");
     68                _printLine_("Generation Delaunay Triangulation");
    6969                BamgTriangulatex(&index,&nel,x,y,nobs);
    7070                indexd =xNewZeroInit<double>(nel*3);
    7171                for(int i=0;i<nel*3;i++) indexd[i]=(double)index[i];
    7272                xDelete<int>(index);
    7373
    74                 printf("Interpolating\n");
     74                _printLine_("Interpolating");
    7575                xDelete<double>(predictions);
    7676                InterpFromMeshToMesh2dx(&predictions,indexd,x,y,nobs,nel,data,nobs,1,x_interp,y_interp,n_interp,NULL,0,new DataSet());
    7777                xDelete<double>(x);

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/modules/InterpFromGridToMeshx/InterpFromGridToMeshx.cpp

     
    174174                                        data_value=nearestinterp(x1,x2,y1,y2, Q11,Q12,Q21,Q22,x_grid,y_grid);
    175175                                        break;
    176176                                default:
    177                                         printf("Interpolation %s not supported yet\n",EnumToStringx(interpenum));
     177                                        _printLine_("Interpolation " << EnumToStringx(interpenum) << " not supported yet");
    178178                                        return NULL; /*WARNING: no error because it would blow up the multithreading!*/
    179179                        }
    180180                        if(isnan(data_value)) data_value=default_value;

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/modules/DakotaResponsesx/DakotaResponsesx.cpp

     
    109109
    110110        /*Synthesize echo: {{{*/
    111111        if(my_rank==0){
    112                 printf("   responses: %i: ",d_numresponses);
    113                 for(i=0;i<d_numresponses-1;i++)printf("%g|",d_responses[i]);
    114                 printf("%g",d_responses[d_numresponses-1]);
    115                 printf("\n");
     112                _printString_("   responses: " << d_numresponses << ": ");
     113                for(i=0;i<d_numresponses-1;i++)_printString_("" << d_responses[i] << "|");
     114                _printString_("" << d_responses[d_numresponses-1]);
     115                _printLine_("");
    116116        }
    117117        /*}}}*/
    118118

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/modules/Bamgx/Bamgx.cpp

     
    4040                /*Mesh generation {{{*/
    4141
    4242                //Step1: generate geometry Gh
    43                 if (verbosity>0) printf("Construction of a mesh from a given geometry\n");
    44                 if (verbosity>1) printf("   Processing geometry...\n");
     43                if (verbosity>0) _printLine_("Construction of a mesh from a given geometry");
     44                if (verbosity>1) _printLine_("   Processing geometry...");
    4545                Geometry Gh(bamggeom_in,bamgopts);
    4646
    4747                //get hmin and hmax from geometry to generate the metric
    … …  
    4949                bamgopts->hmax = Min(bamgopts->hmax,Gh.MaximalHmax());
    5050
    5151                //build metric using geometry
    52                 if (verbosity>1) printf("   Generating Metric...\n");
     52                if (verbosity>1) _printLine_("   Generating Metric...");
    5353                for(i=0;i<Gh.nbv;i++){
    5454                        Metric M=Gh[i];
    5555                        EigenMetric Vp(M/coef);
    … …  
    5959                }
    6060
    6161                //generate mesh
    62                 if (verbosity>1) printf("   Generating Mesh...\n");
     62                if (verbosity>1) _printLine_("   Generating Mesh...");
    6363                Mesh Th(maxnbv,Gh,bamgopts);
    6464
    6565                //Split corners if requested
    … …  
    7272                if(bamgopts->Crack) Th.CrackMesh(bamgopts);
    7373
    7474                //Build output
    75                 if (verbosity>1) printf("   Write Mesh...\n");
     75                if (verbosity>1) _printLine_("   Write Mesh...");
    7676                Th.WriteMesh(bamgmesh_out,bamgopts);
    77                 if (verbosity>1) printf("   Write Geometry...\n");
     77                if (verbosity>1) _printLine_("   Write Geometry...");
    7878                Gh.WriteGeometry(bamggeom_out,bamgopts);
    7979
    8080                //clean up
    … …  
    8686                /*Anisotropic mesh adaptation {{{*/
    8787
    8888                // read background mesh
    89                 if (verbosity>0) printf("Anisotropic mesh adaptation\n");
    90                 if (verbosity>1) printf("   Processing initial mesh and geometry...\n");
     89                if (verbosity>0) _printLine_("Anisotropic mesh adaptation");
     90                if (verbosity>1) _printLine_("   Processing initial mesh and geometry...");
    9191                Mesh BTh(bamggeom_in,bamgmesh_in,bamgopts);
    9292
    9393                //Make Quadtree from background mesh
    … …  
    9999
    100100                //Generate initial metric
    101101                if (bamgopts->metric){
    102                         if (verbosity>1) printf("   Processing Metric...\n");
     102                        if (verbosity>1) _printLine_("   Processing Metric...");
    103103                        BTh.ReadMetric(bamgopts);
    104104                }
    105105                else {
    106                         if (verbosity>1) printf("   Generating initial Metric...\n");
     106                        if (verbosity>1) _printLine_("   Generating initial Metric...");
    107107                        Metric Mhmax(bamgopts->hmax);
    108108                        for (int iv=0;iv<BTh.nbv;iv++) BTh[iv].m = Mhmax;
    109109                }
    110110
    111111                //use present fields to generate metric if present
    112112                if (bamgopts->field){
    113                         if (verbosity>1) printf("   Merge metric with field provided...\n");
     113                        if (verbosity>1) _printLine_("   Merge metric with field provided...");
    114114                        BTh.AddMetric(bamgopts);
    115115                }
    116116
    117117                // change using hVertices if provided
    118118                if(bamgopts->hVertices && bamgopts->hVerticesSize[0]==BTh.nbv){
    119                         if (verbosity>1) printf("   Merging Metric with hVertices...\n");
     119                        if (verbosity>1) _printLine_("   Merging Metric with hVertices...");
    120120                        for (i=0;i<BTh.nbv;i++){
    121121                                if (!isnan(bamgopts->hVertices[i])){
    122122                                        BTh[i].m=Metric((float)bamgopts->hVertices[i]);
    … …  
    126126
    127127                // change using hminVertices if provided
    128128                if (bamgopts->hminVertices){
    129                         if (verbosity>1) printf("   Merging Metric with hminVertices...\n");
     129                        if (verbosity>1) _printLine_("   Merging Metric with hminVertices...");
    130130                        for (i=0;i<BTh.nbv;i++){
    131131                                if (!isnan(bamgopts->hminVertices[i])){
    132132                                        Metric M=BTh.vertices[i].m;
    … …  
    139139
    140140                // change using hmaxVertices if provided
    141141                if (bamgopts->hmaxVertices){
    142                         if (verbosity>1) printf("   Merging Metric with hmaxVertices...\n");
     142                        if (verbosity>1) _printLine_("   Merging Metric with hmaxVertices...");
    143143                        for (i=0;i<BTh.nbv;i++){
    144144                                if (!isnan(bamgopts->hmaxVertices[i])){
    145145                                        Metric M=BTh.vertices[i].m;
    … …  
    163163                BTh.BoundAnisotropy(bamgopts->anisomax,hminaniso);
    164164
    165165                //Build new mesh
    166                 if (verbosity>1) printf("   Generating Mesh...\n");
     166                if (verbosity>1) _printLine_("   Generating Mesh...");
    167167                Thr=&BTh,Thb=0;
    168168                Mesh & Th( *(0 ?  new Mesh(*Thr,&Thr->Gh,Thb,maxnbv) :  new Mesh(maxnbv,BTh,bamgopts,bamgopts->KeepVertices)));
    169169                if (Thr != &BTh) delete Thr;
    … …  
    184184                //display info
    185185                if(verbosity>0) {
    186186                        if (Th.nbt-Th.nbtout-Th.nbq*2){
    187                                 printf("   new number of triangles = %i\n",(Th.nbt-Th.nbtout-Th.nbq*2));
     187                                _printLine_("   new number of triangles = " << (Th.nbt-Th.nbtout-Th.nbq*2));
    188188                        }
    189189                        if (Th.nbq ){
    190                                 printf("   new number of quads = %i\n",Th.nbq);
     190                                _printLine_("   new number of quads = " << Th.nbq);
    191191                        }
    192192                }
    193193
    194194                //Build output
    195                 if (verbosity>1) printf("   Write Mesh...\n");
     195                if (verbosity>1) _printLine_("   Write Mesh...");
    196196                Th.WriteMesh(bamgmesh_out,bamgopts);
    197                 if (verbosity>1) printf("   Write Geometry...\n");
     197                if (verbosity>1) _printLine_("   Write Geometry...");
    198198                Th.Gh.WriteGeometry(bamggeom_out,bamgopts);
    199                 if (verbosity>1) printf("   Write Metric...\n");
     199                if (verbosity>1) _printLine_("   Write Metric...");
    200200                BTh.WriteMetric(bamgopts);
    201201
    202202                /*clean up*/
    … …  
    206206        }
    207207
    208208        /*No error return*/
    209         if (verbosity>1) printf("   Exiting Bamg.\n");
     209        if (verbosity>1) _printLine_("   Exiting Bamg.");
    210210        return noerr;
    211211
    212212}

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/toolkits/issm/SeqVec.cpp

     
    5858void SeqVec::Echo(void){
    5959
    6060        int i;
    61         printf("SeqVec size %i\n",this->M);
     61        _printLine_("SeqVec size " << this->M);
    6262        for(i=0;i<M;i++){
    63                 printf("%g\n ",vector[i]);
     63                _printString_("" << vector[i] << "\n ");
    6464        }
    6565}
    6666/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/toolkits/issm/SeqMat.cpp

     
    8282void SeqMat::Echo(void){
    8383
    8484        int i,j;
    85         printf("SeqMat size %i-%i\n",this->M,this->N);
     85        _printLine_("SeqMat size " << this->M << "-" << this->N);
    8686        for(i=0;i<M;i++){
    8787                for(j=0;j<N;j++){
    88                         printf("%g ",this->matrix[N*i+j]);
     88                        _printString_("" << this->matrix[N*i+j] << " ");
    8989                }
    90                 printf("\n");
     90                _printLine_("");
    9191        }
    9292}
    9393/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/DofIndexing.cpp

     
    152152
    153153        int i;
    154154
    155         printf("DofIndexing:\n");
    156         printf("   gsize: %i\n",gsize);
    157         printf("   clone: %i\n",clone);
     155        _printLine_("DofIndexing:");
     156        _printLine_("   gsize: " << gsize);
     157        _printLine_("   clone: " << clone);
    158158}
    159159/*}}}*/
    160160/*FUNCTION DofIndexing::DeepEcho{{{*/
    … …  
    162162
    163163        int i;
    164164
    165         printf("DofIndexing:\n");
    166         printf("   gsize: %i\n",gsize);
    167         printf("   fsize: %i\n",fsize);
    168         printf("   ssize: %i\n",ssize);
    169         printf("   clone: %i\n",clone);
     165        _printLine_("DofIndexing:");
     166        _printLine_("   gsize: " << gsize);
     167        _printLine_("   fsize: " << fsize);
     168        _printLine_("   ssize: " << ssize);
     169        _printLine_("   clone: " << clone);
    170170       
    171         printf("   set membership: f,s sets \n");
     171        _printLine_("   set membership: f,s sets ");
    172172        for(i=0;i<gsize;i++){
    173                 printf("      dof %i: %s %s\n",i,f_set[i]?"true":"false",s_set[i]?"true":"false");
     173                _printLine_("      dof " << i << ": " <<(f_set[i]?"true":"false")<< " " <<(s_set[i]?"true":"false"));
    174174        }
    175175
    176         printf("   svalues (%i): |",this->ssize);
     176        _printString_("   svalues (" << this->ssize << "): |");
    177177        for(i=0;i<this->gsize;i++){
    178                 if(this->s_set[i])printf(" %g |",svalues[i]);
     178                if(this->s_set[i])_printString_(" " << svalues[i] << " |");
    179179        }
    180         printf("\n");
     180        _printLine_("");
    181181
    182182        if(doftype){
    183                 printf("   doftype: |");
     183                _printString_("   doftype: |");
    184184                for(i=0;i<gsize;i++){
    185                         printf(" %i |",doftype[i]);
     185                        _printString_(" " << doftype[i] << " |");
    186186                }
    187                 printf("\n");
     187                _printLine_("");
    188188        }
    189         else printf("   doftype: NULL\n");
     189        else _printLine_("   doftype: NULL");
    190190
    191         printf("   g_doflist (%i): |",this->gsize);
     191        _printString_("   g_doflist (" << this->gsize << "): |");
    192192        for(i=0;i<this->gsize;i++){
    193                 printf(" %i |",gdoflist[i]);
     193                _printString_(" " << gdoflist[i] << " |");
    194194        }
    195         printf("\n");
     195        _printLine_("");
    196196
    197         printf("   f_doflist (%i): |",this->fsize);
     197        _printString_("   f_doflist (" << this->fsize << "): |");
    198198        for(i=0;i<this->fsize;i++){
    199                 printf(" %i |",fdoflist[i]);
     199                _printString_(" " << fdoflist[i] << " |");
    200200        }
    201         printf("\n");
     201        _printLine_("");
    202202
    203         printf("   s_doflist (%i): |",this->ssize);
     203        _printString_("   s_doflist (" << this->ssize << "): |");
    204204        for(i=0;i<this->ssize;i++){
    205                 printf(" %i |",sdoflist[i]);
     205                _printString_(" " << sdoflist[i] << " |");
    206206        }
    207         printf("\n");
     207        _printLine_("");
    208208}               
    209209/*}}}*/
    210210

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Materials/Matice.cpp

     
    5959/*FUNCTION Matice::Echo {{{*/
    6060void Matice::Echo(void){
    6161
    62         printf("Matice:\n");
    63         printf("   mid: %i\n",mid);
    64         printf("   inputs:\n");
     62        _printLine_("Matice:");
     63        _printLine_("   mid: " << mid);
     64        _printLine_("   inputs:");
    6565        inputs->Echo();
    66         printf("   element:\n");
     66        _printLine_("   element:");
    6767        helement->Echo();
    6868}
    6969/*}}}*/
    7070/*FUNCTION Matice::DeepEcho {{{*/
    7171void Matice::DeepEcho(void){
    7272
    73         printf("Matice:\n");
    74         printf("   mid: %i\n",mid);
    75         printf("   inputs:\n");
     73        _printLine_("Matice:");
     74        _printLine_("   mid: " << mid);
     75        _printLine_("   inputs:");
    7676        inputs->DeepEcho();
    77         printf("   element:\n");
     77        _printLine_("   element:");
    7878        helement->Echo();
    7979}               
    8080/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Materials/Matpar.cpp

     
    5656/*FUNCTION Matpar::Echo {{{*/
    5757void Matpar::Echo(void){
    5858
    59         printf("Matpar:\n");
    60         printf("   mid: %i\n",mid);
    61         printf("   rho_ice: %g\n",rho_ice);
    62         printf("   rho_water: %g\n",rho_water);
    63         printf("   rho_freshwater: %g\n",rho_freshwater);
    64         printf("   mu_water: %g\n",mu_water);
    65         printf("   heatcapacity: %g\n",heatcapacity);
    66         printf("   thermalconductivity: %g\n",thermalconductivity);
    67         printf("   latentheat: %g\n",latentheat);
    68         printf("   beta: %g\n",beta);
    69         printf("   meltingpoint: %g\n",meltingpoint);
    70         printf("   referencetemperature: %g\n",referencetemperature);
    71         printf("   mixed_layer_capacity: %g\n",mixed_layer_capacity);
    72         printf("   thermal_exchange_velocity: %g\n",thermal_exchange_velocity);
    73         printf("   g: %g\n",g);
     59        _printLine_("Matpar:");
     60        _printLine_("   mid: " << mid);
     61        _printLine_("   rho_ice: " << rho_ice);
     62        _printLine_("   rho_water: " << rho_water);
     63        _printLine_("   rho_freshwater: " << rho_freshwater);
     64        _printLine_("   mu_water: " << mu_water);
     65        _printLine_("   heatcapacity: " << heatcapacity);
     66        _printLine_("   thermalconductivity: " << thermalconductivity);
     67        _printLine_("   latentheat: " << latentheat);
     68        _printLine_("   beta: " << beta);
     69        _printLine_("   meltingpoint: " << meltingpoint);
     70        _printLine_("   referencetemperature: " << referencetemperature);
     71        _printLine_("   mixed_layer_capacity: " << mixed_layer_capacity);
     72        _printLine_("   thermal_exchange_velocity: " << thermal_exchange_velocity);
     73        _printLine_("   g: " << g);
    7474        return;
    7575}
    7676/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Gauss/GaussTria.cpp

     
    107107/*FUNCTION GaussTria::Echo{{{*/
    108108void GaussTria::Echo(void){
    109109
    110         printf("GaussTria:\n");
    111         printf("   numgauss: %i\n",numgauss);
     110        _printLine_("GaussTria:");
     111        _printLine_("   numgauss: " << numgauss);
    112112
    113113        if (weights){
    114          printf("   weights = [");
    115          for(int i=0;i<numgauss;i++) printf(" %g\n",weights[i]);
    116          printf("]\n");
     114         _printString_("   weights = [");
     115         for(int i=0;i<numgauss;i++) _printLine_(" " << weights[i]);
     116         _printLine_("]");
    117117        }
    118         else printf("weights = NULL\n");
     118        else _printLine_("weights = NULL");
    119119        if (coords1){
    120          printf("   coords1 = [");
    121          for(int i=0;i<numgauss;i++) printf(" %g\n",coords1[i]);
    122          printf("]\n");
     120         _printString_("   coords1 = [");
     121         for(int i=0;i<numgauss;i++) _printLine_(" " << coords1[i]);
     122         _printLine_("]");
    123123        }
    124         else printf("coords1 = NULL\n");
     124        else _printLine_("coords1 = NULL");
    125125        if (coords2){
    126          printf("   coords2 = [");
    127          for(int i=0;i<numgauss;i++) printf(" %g\n",coords2[i]);
    128          printf("]\n");
     126         _printString_("   coords2 = [");
     127         for(int i=0;i<numgauss;i++) _printLine_(" " << coords2[i]);
     128         _printLine_("]");
    129129        }
    130         else printf("coords2 = NULL\n");
     130        else _printLine_("coords2 = NULL");
    131131        if (coords3){
    132          printf("   coords3 = [");
    133          for(int i=0;i<numgauss;i++) printf(" %g\n",coords3[i]);
    134          printf("]\n");
     132         _printString_("   coords3 = [");
     133         for(int i=0;i<numgauss;i++) _printLine_(" " << coords3[i]);
     134         _printLine_("]");
    135135        }
    136         else printf("coords3 = NULL\n");
     136        else _printLine_("coords3 = NULL");
    137137
    138         printf("   weight = %g\n",weight);
    139         printf("   coord1 = %g\n",coord1);
    140         printf("   coord2 = %g\n",coord2);
    141         printf("   coord3 = %g\n",coord3);
     138        _printLine_("   weight = " << weight);
     139        _printLine_("   coord1 = " << coord1);
     140        _printLine_("   coord2 = " << coord2);
     141        _printLine_("   coord3 = " << coord3);
    142142
    143143}
    144144/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Gauss/GaussPenta.cpp

     
    246246/*FUNCTION GaussPenta::Echo{{{*/
    247247void GaussPenta::Echo(void){
    248248
    249         printf("GaussPenta:\n");
    250         printf("   numgauss: %i\n",numgauss);
     249        _printLine_("GaussPenta:");
     250        _printLine_("   numgauss: " << numgauss);
    251251
    252252        if (weights){
    253          printf("   weights = [");
    254          for(int i=0;i<numgauss;i++) printf(" %g\n",weights[i]);
    255          printf("]\n");
     253         _printString_("   weights = [");
     254         for(int i=0;i<numgauss;i++) _printLine_(" " << weights[i]);
     255         _printLine_("]");
    256256        }
    257         else printf("weights = NULL\n");
     257        else _printLine_("weights = NULL");
    258258        if (coords1){
    259          printf("   coords1 = [");
    260          for(int i=0;i<numgauss;i++) printf(" %g\n",coords1[i]);
    261          printf("]\n");
     259         _printString_("   coords1 = [");
     260         for(int i=0;i<numgauss;i++) _printLine_(" " << coords1[i]);
     261         _printLine_("]");
    262262        }
    263         else printf("coords1 = NULL\n");
     263        else _printLine_("coords1 = NULL");
    264264        if (coords2){
    265          printf("   coords2 = [");
    266          for(int i=0;i<numgauss;i++) printf(" %g\n",coords2[i]);
    267          printf("]\n");
     265         _printString_("   coords2 = [");
     266         for(int i=0;i<numgauss;i++) _printLine_(" " << coords2[i]);
     267         _printLine_("]");
    268268        }
    269         else printf("coords2 = NULL\n");
     269        else _printLine_("coords2 = NULL");
    270270        if (coords3){
    271          printf("   coords3 = [");
    272          for(int i=0;i<numgauss;i++) printf(" %g\n",coords3[i]);
    273          printf("]\n");
     271         _printString_("   coords3 = [");
     272         for(int i=0;i<numgauss;i++) _printLine_(" " << coords3[i]);
     273         _printLine_("]");
    274274        }
    275         else printf("coords3 = NULL\n");
     275        else _printLine_("coords3 = NULL");
    276276        if (coords4){
    277                 printf("   coords4 = [");
    278                 for(int i=0;i<numgauss;i++) printf(" %g\n",coords4[i]);
    279                 printf("]\n");
     277                _printString_("   coords4 = [");
     278                for(int i=0;i<numgauss;i++) _printLine_(" " << coords4[i]);
     279                _printLine_("]");
    280280        }
    281         else printf("coords4 = NULL\n");
     281        else _printLine_("coords4 = NULL");
    282282
    283         printf("   weight = %g\n",weight);
    284         printf("   coord1 = %g\n",coord1);
    285         printf("   coord2 = %g\n",coord2);
    286         printf("   coord3 = %g\n",coord3);
    287         printf("   coord4 = %g\n",coord4);
     283        _printLine_("   weight = " << weight);
     284        _printLine_("   coord1 = " << coord1);
     285        _printLine_("   coord2 = " << coord2);
     286        _printLine_("   coord3 = " << coord3);
     287        _printLine_("   coord4 = " << coord4);
    288288
    289289}
    290290/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Params/FileParam.cpp

     
    4747/*FUNCTION FileParam::DeepEcho{{{*/
    4848void FileParam::DeepEcho(void){
    4949
    50         printf("FileParam:\n");
    51         printf("   enum:  %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    52         printf("   value: %p\n",this->value);
     50        _printLine_("FileParam:");
     51        _printLine_("   enum:  " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     52        _printLine_("   value: " << this->value);
    5353}
    5454/*}}}*/
    5555/*FUNCTION FileParam::Id{{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Params/IntVecParam.cpp

     
    6262/*FUNCTION IntVecParam::Echo {{{*/
    6363void IntVecParam::Echo(void){
    6464
    65         printf("IntVecParam:\n");
    66         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    67         printf("   vector size: %i\n",this->M);
     65        _printLine_("IntVecParam:");
     66        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     67        _printLine_("   vector size: " << this->M);
    6868
    6969}
    7070/*}}}*/
    … …  
    7373
    7474        int i;
    7575       
    76         printf("IntVecParam:\n");
    77         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    78         printf("   vector size: %i\n",this->M);
     76        _printLine_("IntVecParam:");
     77        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     78        _printLine_("   vector size: " << this->M);
    7979        for(i=0;i<this->M;i++){
    80                 printf("%i %i\n",i,this->values[i]);
     80                _printLine_("" << i << " " << this->values[i]);
    8181        }
    8282}
    8383/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Params/IntParam.cpp

     
    4747/*FUNCTION IntParam::DeepEcho{{{*/
    4848void IntParam::DeepEcho(void){
    4949
    50         printf("IntParam:\n");
    51         printf("   enum:  %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    52         printf("   value: %i\n",this->value);
     50        _printLine_("IntParam:");
     51        _printLine_("   enum:  " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     52        _printLine_("   value: " << this->value);
    5353}
    5454/*}}}*/
    5555/*FUNCTION IntParam::Id{{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Params/BoolParam.cpp

     
    4747/*FUNCTION BoolParam::DeepEcho{{{*/
    4848void BoolParam::DeepEcho(void){
    4949
    50         printf("BoolParam:\n");
    51         printf("   enum:  %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    52         printf("   value: %s\n",this->value?"true":"false");
     50        _printLine_("BoolParam:");
     51        _printLine_("   enum:  " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     52        _printLine_("   value: " <<(this->value?"true":"false"));
    5353}
    5454/*}}}*/
    5555/*FUNCTION BoolParam::Id{{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Params/IntMatParam.cpp

     
    4747/*FUNCTION IntMatParam::Echo {{{*/
    4848void IntMatParam::Echo(void){
    4949
    50         printf("IntMatParam:\n");
    51         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    52         printf("   matrix size: %ix%i\n",this->M,this->N);
     50        _printLine_("IntMatParam:");
     51        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     52        _printLine_("   matrix size: " << this->M << "x" << this->N);
    5353
    5454}
    5555/*}}}*/
    … …  
    5858
    5959        int i,j;
    6060       
    61         printf("IntMatParam:\n");
    62         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    63         printf("   matrix size: %ix%i\n",this->M,this->N);
     61        _printLine_("IntMatParam:");
     62        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     63        _printLine_("   matrix size: " << this->M << "x" << this->N);
    6464        for(i=0;i<this->M;i++){
    6565                for(i=0;i<this->N;i++){
    66                         printf("(%i,%i) %i\n",i,j,*(this->value+N*i+j));
     66                        _printLine_("(" << i << "," << j << ") " << *(this->value+N*i+j));
    6767                }
    6868        }
    6969}

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Params/VectorParam.cpp

     
    4848/*FUNCTION VectorParam::Echo {{{*/
    4949void VectorParam::Echo(void){
    5050
    51         printf("VectorParam:\n");
    52         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
     51        _printLine_("VectorParam:");
     52        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
    5353
    5454}
    5555/*}}}*/
    … …  
    5757void VectorParam::DeepEcho(void){
    5858
    5959        int i;
    60         printf("VectorParam:\n");
    61         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
     60        _printLine_("VectorParam:");
     61        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
    6262        value->Echo();
    6363}
    6464/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Params/MatrixParam.cpp

     
    4646/*FUNCTION MatrixParam::Echo {{{*/
    4747void MatrixParam::Echo(void){
    4848
    49         printf("MatrixParam:\n");
    50         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
     49        _printLine_("MatrixParam:");
     50        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
    5151
    5252}
    5353/*}}}*/
    … …  
    5555void MatrixParam::DeepEcho(void){
    5656
    5757        int i;
    58         printf("MatrixParam:\n");
    59         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
     58        _printLine_("MatrixParam:");
     59        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
    6060        this->value->Echo();
    6161}
    6262/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Params/StringArrayParam.cpp

     
    7474        int i;
    7575        char* string=NULL;
    7676
    77         printf("StringArrayParam:\n");
    78         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
     77        _printLine_("StringArrayParam:");
     78        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
    7979        for(i=0;i<this->numstrings;i++){
    8080                string=this->value[i];
    81                 printf("   %i: %s\n",i,string);
     81                _printLine_("   " << i << ": " << string);
    8282        }
    8383}
    8484/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Params/StringParam.cpp

     
    4949/*}}}*/
    5050/*FUNCTION StringParam::DeepEcho{{{*/
    5151void StringParam::DeepEcho(void){
    52         printf("StringParam:\n");
    53         printf("   enum:  %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    54         printf("   value: %s\n",this->value);
     52        _printLine_("StringParam:");
     53        _printLine_("   enum:  " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     54        _printLine_("   value: " << this->value);
    5555}
    5656/*}}}*/
    5757/*FUNCTION StringParam::Id{{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Params/DoubleVecParam.cpp

     
    4646/*FUNCTION DoubleVecParam::Echo {{{*/
    4747void DoubleVecParam::Echo(void){
    4848
    49         printf("DoubleVecParam:\n");
    50         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    51         printf("   vector size: %i\n",this->M);
     49        _printLine_("DoubleVecParam:");
     50        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     51        _printLine_("   vector size: " << this->M);
    5252
    5353}
    5454/*}}}*/
    … …  
    5757
    5858        int i;
    5959       
    60         printf("DoubleVecParam:\n");
    61         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    62         printf("   vector size: %i\n",this->M);
     60        _printLine_("DoubleVecParam:");
     61        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     62        _printLine_("   vector size: " << this->M);
    6363        for(i=0;i<this->M;i++){
    64                 printf("%i %g\n",i,this->values[i]);
     64                _printLine_("" << i << " " << this->values[i]);
    6565        }
    6666}
    6767/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Params/DoubleParam.cpp

     
    4444/*FUNCTION DoubleParam::DeepEcho{{{*/
    4545void DoubleParam::DeepEcho(void){
    4646
    47         printf("DoubleParam:\n");
    48         printf("   enum:  %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    49         printf("   value: %g\n",this->value);
     47        _printLine_("DoubleParam:");
     48        _printLine_("   enum:  " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     49        _printLine_("   value: " << this->value);
    5050}
    5151/*}}}*/
    5252/*FUNCTION DoubleParam::Id{{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Params/DoubleMatArrayParam.cpp

     
    8686/*FUNCTION DoubleMatArrayParam::Echo {{{*/
    8787void DoubleMatArrayParam::Echo(void){
    8888
    89         printf("DoubleMatArrayParam:\n");
    90         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    91         printf("   array size: %i\n",this->M);
    92         printf("   array pointer: %p\n",this->array);
     89        _printLine_("DoubleMatArrayParam:");
     90        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     91        _printLine_("   array size: " << this->M);
     92        _printLine_("   array pointer: " << this->array);
    9393
    9494}
    9595/*}}}*/
    … …  
    100100        int m,n;
    101101        IssmDouble* matrix=NULL;
    102102       
    103         printf("DoubleMatArrayParam:\n");
    104         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    105         printf("   array size: %i\n",this->M);
     103        _printLine_("DoubleMatArrayParam:");
     104        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     105        _printLine_("   array size: " << this->M);
    106106        for(i=0;i<M;i++){
    107                 printf("   array %i (%ix%i):\n",i,mdim_array[i],ndim_array[i]);
     107                _printLine_("   array " << i << " (" << mdim_array[i] << "x" << ndim_array[i] << "):");
    108108                matrix=array[i];
    109109                m=mdim_array[i];
    110110                n=ndim_array[i];
    111111
    112112                for(j=0;j<m;j++){
    113                         printf("   ");
    114                         for(k=0;k<n;k++)printf("%g ",*(matrix+n*j+k));
    115                         printf("\n");
     113                        _printString_("   ");
     114                        for(k=0;k<n;k++)_printString_("" << *(matrix+n*j+k) << " ");
     115                        _printLine_("");
    116116                }
    117117        }
    118118}

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Params/DoubleMatParam.cpp

     
    4747/*FUNCTION DoubleMatParam::Echo {{{*/
    4848void DoubleMatParam::Echo(void){
    4949
    50         printf("DoubleMatParam:\n");
    51         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    52         printf("   matrix size: %ix%i\n",this->M,this->N);
     50        _printLine_("DoubleMatParam:");
     51        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     52        _printLine_("   matrix size: " << this->M << "x" << this->N);
    5353
    5454}
    5555/*}}}*/
    … …  
    5858
    5959        int i,j;
    6060       
    61         printf("DoubleMatParam:\n");
    62         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    63         printf("   matrix size: %ix%i\n",this->M,this->N);
     61        _printLine_("DoubleMatParam:");
     62        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     63        _printLine_("   matrix size: " << this->M << "x" << this->N);
    6464        for(i=0;i<this->M;i++){
    6565                for(i=0;i<this->N;i++){
    66                         printf("%i %i %g\n",i,j,*(this->value+N*i+j));
     66                        _printLine_("" << i << " " << j << " " << *(this->value+N*i+j));
    6767                }
    6868        }
    6969}

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Segment.cpp

     
    4848/*FUNCTION Segment::Echo{{{*/
    4949void Segment::Echo(void){
    5050
    51         printf("Segment:\n");
    52         printf("   eid: %i\n",eid);
    53         printf("   node 1: %g|%g\n",this->x1,this->y1);
    54         printf("   node 2: %g|%g\n",this->x2,this->y2);
     51        _printLine_("Segment:");
     52        _printLine_("   eid: " << eid);
     53        _printLine_("   node 1: " << this->x1 << "|" << this->y1);
     54        _printLine_("   node 2: " << this->x2 << "|" << this->y2);
    5555
    5656}
    5757/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Numerics/Matrix.cpp

     
    129129
    130130        #ifdef _HAVE_ADOLC_
    131131        /*Not sure about that one. Should we use the overloaded operator >>?*/
    132         printf("ADOLC Matrix equivalent:" );
     132        _printString_("ADOLC Matrix equivalent:" );
    133133        for(i=0;i<M;i++){
    134134                for(j=0;j<N;j++){
    135                         printf("%g ",*(amatrix+N*i+j));
     135                        _printString_("" << *(amatrix+N*i+j) << " ");
    136136                }
    137                 printf("\n");
     137                _printLine_("");
    138138        }
    139139        #endif
    140140}

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Vertex.cpp

     
    6363/*FUNCTION Vertex::Echo{{{*/
    6464void Vertex::Echo(void){
    6565
    66         printf("Vertex:\n");
    67         printf("   id: %i\n",id);
    68         printf("   sid: %i\n",sid);
    69         printf("   x: %g\n",x);
    70         printf("   y: %g\n",y);
    71         printf("   z: %g\n",z);
    72         printf("   sigma: %g\n",sigma);
    73         printf("   connectivity: %i\n",connectivity);
    74         printf("   dof: %i\n",dof);
    75         printf("   clone: %i\n",clone);
     66        _printLine_("Vertex:");
     67        _printLine_("   id: " << id);
     68        _printLine_("   sid: " << sid);
     69        _printLine_("   x: " << x);
     70        _printLine_("   y: " << y);
     71        _printLine_("   z: " << z);
     72        _printLine_("   sigma: " << sigma);
     73        _printLine_("   connectivity: " << connectivity);
     74        _printLine_("   dof: " << dof);
     75        _printLine_("   clone: " << clone);
    7676
    7777        return;
    7878}

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Loads/Numericalflux.cpp

     
    150150/*Object virtual functions definitions:*/
    151151/*FUNCTION Numericalflux::Echo {{{*/
    152152void Numericalflux::Echo(void){
    153         printf("Numericalflux:\n");
    154         printf("   id: %i\n",id);
    155         printf("   analysis_type: %s\n",EnumToStringx(analysis_type));
     153        _printLine_("Numericalflux:");
     154        _printLine_("   id: " << id);
     155        _printLine_("   analysis_type: " << EnumToStringx(analysis_type));
    156156        hnodes->Echo();
    157157        helement->Echo();
    158         printf("   parameters: %p\n",parameters);
    159         printf("   inputs: %p\n",inputs);
     158        _printLine_("   parameters: " << parameters);
     159        _printLine_("   inputs: " << inputs);
    160160}
    161161/*}}}*/
    162162/*FUNCTION Numericalflux::DeepEcho {{{*/
    163163void Numericalflux::DeepEcho(void){
    164164
    165         printf("Numericalflux:\n");
    166         printf("   id: %i\n",id);
    167         printf("   analysis_type: %s\n",EnumToStringx(analysis_type));
     165        _printLine_("Numericalflux:");
     166        _printLine_("   id: " << id);
     167        _printLine_("   analysis_type: " << EnumToStringx(analysis_type));
    168168        hnodes->DeepEcho();
    169169        helement->DeepEcho();
    170         printf("   parameters\n");
     170        _printLine_("   parameters");
    171171        if(parameters)
    172172         parameters->DeepEcho();
    173173        else
    174          printf("      NULL\n");
    175         printf("   inputs\n");
     174         _printLine_("      NULL");
     175        _printLine_("   inputs");
    176176        inputs->DeepEcho();
    177177       
    178178}               

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Loads/Penpair.cpp

     
    5656
    5757        int i;
    5858
    59         printf("Penpair:\n");
    60         printf("   id: %i\n",id);
    61         printf("   analysis_type: %s\n",EnumToStringx(analysis_type));
     59        _printLine_("Penpair:");
     60        _printLine_("   id: " << id);
     61        _printLine_("   analysis_type: " << EnumToStringx(analysis_type));
    6262        hnodes->Echo();
    6363       
    6464        return;
    … …  
    6767/*FUNCTION Penpair::DeepEcho {{{*/
    6868void Penpair::DeepEcho(void){
    6969
    70         printf("Penpair:\n");
    71         printf("   id: %i\n",id);
    72         printf("   analysis_type: %s\n",EnumToStringx(analysis_type));
     70        _printLine_("Penpair:");
     71        _printLine_("   id: " << id);
     72        _printLine_("   analysis_type: " << EnumToStringx(analysis_type));
    7373        hnodes->DeepEcho();
    7474
    7575        return;

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Loads/Pengrid.cpp

     
    108108/*FUNCTION Pengrid::DeepEcho{{{*/
    109109void Pengrid::DeepEcho(void){
    110110
    111         printf("Pengrid:\n");
    112         printf("   id: %i\n",id);
    113         printf("   analysis_type: %s\n",EnumToStringx(analysis_type));
     111        _printLine_("Pengrid:");
     112        _printLine_("   id: " << id);
     113        _printLine_("   analysis_type: " << EnumToStringx(analysis_type));
    114114        hnode->DeepEcho();
    115115        helement->DeepEcho();
    116116        hmatpar->DeepEcho();
    117         printf("   active %i\n",this->active);
    118         printf("   zigzag_counter %i\n",this->zigzag_counter);
    119         printf("   parameters\n");
     117        _printLine_("   active " << this->active);
     118        _printLine_("   zigzag_counter " << this->zigzag_counter);
     119        _printLine_("   parameters");
    120120        parameters->DeepEcho();
    121         printf("   inputs\n");
     121        _printLine_("   inputs");
    122122        inputs->DeepEcho();
    123123}
    124124/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Loads/Icefront.cpp

     
    126126/*Object virtual functions definitions:*/
    127127/*FUNCTION Icefront::Echo {{{*/
    128128void Icefront::Echo(void){
    129         printf("Icefront:\n");
    130         printf("   id: %i\n",id);
    131         printf("   analysis_type: %s\n",EnumToStringx(analysis_type));
     129        _printLine_("Icefront:");
     130        _printLine_("   id: " << id);
     131        _printLine_("   analysis_type: " << EnumToStringx(analysis_type));
    132132        hnodes->Echo();
    133133        helement->Echo();
    134134        hmatpar->Echo();
    135         printf("   parameters: %p\n",parameters);
     135        _printLine_("   parameters: " << parameters);
    136136        if(parameters)parameters->Echo();
    137         printf("   inputs: %p\n",inputs);
     137        _printLine_("   inputs: " << inputs);
    138138        if(inputs)inputs->Echo();
    139139}
    140140/*}}}*/
    141141/*FUNCTION Icefront::DeepEcho{{{*/
    142142void Icefront::DeepEcho(void){
    143143
    144         printf("Icefront:\n");
    145         printf("   id: %i\n",id);
    146         printf("   analysis_type: %s\n",EnumToStringx(analysis_type));
     144        _printLine_("Icefront:");
     145        _printLine_("   id: " << id);
     146        _printLine_("   analysis_type: " << EnumToStringx(analysis_type));
    147147        hnodes->DeepEcho();
    148148        helement->DeepEcho();
    149149        hmatpar->DeepEcho();
    150         printf("   parameters: %p\n",parameters);
     150        _printLine_("   parameters: " << parameters);
    151151        if(parameters)parameters->DeepEcho();
    152         printf("   inputs: %p\n",inputs);
     152        _printLine_("   inputs: " << inputs);
    153153        if(inputs)inputs->DeepEcho();
    154154}
    155155/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Loads/Friction.cpp

     
    4747/*methods: */
    4848/*FUNCTION Friction::Echo {{{*/
    4949void Friction::Echo(void){
    50         printf("Friction:\n");
    51         printf("   analysis_type: %s\n",EnumToStringx(analysis_type));
    52         printf("   element_type: %s\n",this->element_type);
     50        _printLine_("Friction:");
     51        _printLine_("   analysis_type: " << EnumToStringx(analysis_type));
     52        _printLine_("   element_type: " << this->element_type);
    5353        inputs->Echo();
    5454        matpar->Echo();
    5555}

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Loads/Riftfront.cpp

     
    142142        input=(Input*)this->inputs->GetInput(FrictionEnum); input->GetInputValue(&friction);
    143143        input=(Input*)this->inputs->GetInput(FractionIncrementEnum); input->GetInputValue(&fractionincrement);
    144144
    145         printf("Riftfront:\n");
    146         printf("   id: %i\n",id);
    147         printf("   analysis_type: %s\n",EnumToStringx(analysis_type));
    148         printf("   hnodes: %p\n",hnodes);
    149         printf("   helements: %p\n",helements);
    150         printf("   hmatpar: %p\n",hmatpar);
    151         printf("   parameters: %p\n",parameters);
    152         printf("   inputs: %p\n",inputs);
    153         printf("   internal parameters: \n");
    154         printf("   normal: %g|%g\n",normal[0],normal[1]);
    155         printf("   length: %g\n",length);
    156         printf("   penalty_lock: %i\n",penalty_lock);
    157         printf("   active: %s\n",active ? "true":"false");
    158         printf("   counter: %i\n",counter);
    159         printf("   prestable: %s\n",prestable ? "true":"false");
    160         printf("   material_converged: %s\n",material_converged ? "true":"false");
    161         printf("   fill: %i\n",fill);
    162         printf("   friction: %g\n",friction);
    163         printf("   fraction: %g\n",fraction);
    164         printf("   fractionincrement: %g\n",fractionincrement);
    165         printf("   state: %i\n",state);
    166         printf("   frozen: %s\n",frozen ? "true":"false");
     145        _printLine_("Riftfront:");
     146        _printLine_("   id: " << id);
     147        _printLine_("   analysis_type: " << EnumToStringx(analysis_type));
     148        _printLine_("   hnodes: " << hnodes);
     149        _printLine_("   helements: " << helements);
     150        _printLine_("   hmatpar: " << hmatpar);
     151        _printLine_("   parameters: " << parameters);
     152        _printLine_("   inputs: " << inputs);
     153        _printLine_("   internal parameters: ");
     154        _printLine_("   normal: " << normal[0] << "|" << normal[1]);
     155        _printLine_("   length: " << length);
     156        _printLine_("   penalty_lock: " << penalty_lock);
     157        _printLine_("   active: " <<(active ? "true":"false"));
     158        _printLine_("   counter: " << counter);
     159        _printLine_("   prestable: " << (prestable ? "true":"false"));
     160        _printLine_("   material_converged: " << (material_converged ? "true":"false"));
     161        _printLine_("   fill: " << fill);
     162        _printLine_("   friction: " << friction);
     163        _printLine_("   fraction: " << fraction);
     164        _printLine_("   fractionincrement: " << fractionincrement);
     165        _printLine_("   state: " << state);
     166        _printLine_("   frozen: " << (frozen ? "true":"false"));
    167167               
    168168}
    169169/*}}}*/
    170170/*FUNCTION Riftfront::DeepEcho{{{*/
    171171void Riftfront::DeepEcho(void){
    172172
    173         printf("Riftfront:\n");
    174         printf("   id: %i\n",id);
    175         printf("   analysis_type: %s\n",EnumToStringx(analysis_type));
     173        _printLine_("Riftfront:");
     174        _printLine_("   id: " << id);
     175        _printLine_("   analysis_type: " << EnumToStringx(analysis_type));
    176176        hnodes->DeepEcho();
    177177        helements->DeepEcho();
    178178        hmatpar->DeepEcho();
    179         printf("   parameters\n");
     179        _printLine_("   parameters");
    180180        if(parameters)parameters->DeepEcho();
    181         printf("   inputs\n");
     181        _printLine_("   inputs");
    182182        if(inputs)inputs->DeepEcho();
    183183}
    184184/*}}}*/
    … …  
    632632                /*increase melange fraction: */
    633633                this->fraction+=fractionincrement;
    634634                if (this->fraction>1)this->fraction=(IssmDouble)1.0;
    635                 //printf("riftfront %i fraction: %g\n",this->Id(),this->fraction);
     635                //_printLine_("riftfront " << this->Id() << " fraction: " << this->fraction);
    636636        }
    637637
    638638        //Figure out stability of this penalty
    … …  
    647647        //Set penalty flag
    648648        this->active=activate;
    649649
    650         //if ((penetration>0) && (this->active==1))printf("Riftfront %i wants to be released\n",Id());
     650        //if ((penetration>0) && (this->active==1))_printLine_("Riftfront " << Id() << " wants to be released");
    651651
    652652        /*assign output pointer: */
    653653        *punstable=unstable;

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/ExternalResults/DoubleMatExternalResult.cpp

     
    5656/*FUNCTION DoubleMatExternalResult::Echo {{{*/
    5757void DoubleMatExternalResult::Echo(void){
    5858
    59         printf("DoubleMatExternalResult:\n");
    60         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    61         printf("   step: %i\n",this->step);
    62         printf("   time: %g\n",this->time);
    63         printf("   matrix size: %i-%i\n",this->M,this->N);
     59        _printLine_("DoubleMatExternalResult:");
     60        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     61        _printLine_("   step: " << this->step);
     62        _printLine_("   time: " << this->time);
     63        _printLine_("   matrix size: " << this->M << "-" << this->N);
    6464
    6565}
    6666/*}}}*/
    … …  
    6969
    7070        int i,j;
    7171       
    72         printf("DoubleMatExternalResult:\n");
    73         printf("   id: %i\n",this->id);
    74         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    75         printf("   step: %i\n",this->step);
    76         printf("   time: %g\n",this->time);
    77         printf("   matrix size: %i-%i\n",this->M,this->N);
     72        _printLine_("DoubleMatExternalResult:");
     73        _printLine_("   id: " << this->id);
     74        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     75        _printLine_("   step: " << this->step);
     76        _printLine_("   time: " << this->time);
     77        _printLine_("   matrix size: " << this->M << "-" << this->N);
    7878        for (i=0;i<this->M;i++){ 
    7979                _printString_("   [ ");
    8080                for (j=0;j<this->N;j++){

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/ExternalResults/PetscVecExternalResult.cpp

     
    5353/*FUNCTION PetscVecExternalResult::Echo {{{*/
    5454void PetscVecExternalResult::Echo(void){
    5555
    56         printf("PetscVecExternalResult:\n");
    57         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
     56        _printLine_("PetscVecExternalResult:");
     57        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
    5858
    5959}
    6060/*}}}*/
    … …  
    6262void PetscVecExternalResult::DeepEcho(void){
    6363
    6464        int i;
    65         printf("PetscVecExternalResult:\n");
    66         printf("   id: %i\n",this->id);
    67         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    68         printf("   step: %i\n",this->step);
    69         printf("   time: %g\n",this->time);
     65        _printLine_("PetscVecExternalResult:");
     66        _printLine_("   id: " << this->id);
     67        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     68        _printLine_("   step: " << this->step);
     69        _printLine_("   time: " << this->time);
    7070        VecView(value,PETSC_VIEWER_STDOUT_WORLD);
    7171}
    7272/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/ExternalResults/StringExternalResult.cpp

     
    5252/*FUNCTION StringExternalResult::DeepEcho{{{*/
    5353void StringExternalResult::DeepEcho(void){
    5454
    55         printf("StringExternalResult:\n");
    56         printf("   id: %i\n",this->id);
    57         printf("   enum:  %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    58         printf("   value: %s\n",this->value);
    59         printf("   step: %i\n",this->step);
    60         printf("   time: %g\n",this->time);
     55        _printLine_("StringExternalResult:");
     56        _printLine_("   id: " << this->id);
     57        _printLine_("   enum:  " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     58        _printLine_("   value: " << this->value);
     59        _printLine_("   step: " << this->step);
     60        _printLine_("   time: " << this->time);
    6161}
    6262/*}}}*/
    6363/*FUNCTION StringExternalResult::Id{{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/ExternalResults/DoubleVecExternalResult.cpp

     
    5353/*FUNCTION DoubleVecExternalResult::Echo {{{*/
    5454void DoubleVecExternalResult::Echo(void){
    5555
    56         printf("DoubleVecExternalResult:\n");
    57         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    58         printf("   vector size: %i\n",this->M);
    59         printf("   step: %i\n",this->step);
    60         printf("   time: %g\n",this->time);
     56        _printLine_("DoubleVecExternalResult:");
     57        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     58        _printLine_("   vector size: " << this->M);
     59        _printLine_("   step: " << this->step);
     60        _printLine_("   time: " << this->time);
    6161
    6262}
    6363/*}}}*/
    … …  
    6666
    6767        int i;
    6868       
    69         printf("DoubleVecExternalResult:\n");
    70         printf("   id: %i\n",this->id);
    71         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    72         printf("   vector size: %i\n",this->M);
     69        _printLine_("DoubleVecExternalResult:");
     70        _printLine_("   id: " << this->id);
     71        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     72        _printLine_("   vector size: " << this->M);
    7373        for(i=0;i<this->M;i++){
    74                 printf("%i %g\n",i,this->values[i]);
     74                _printLine_("" << i << " " << this->values[i]);
    7575        }
    76         printf("   step: %i\n",this->step);
    77         printf("   time: %g\n",this->time);
     76        _printLine_("   step: " << this->step);
     77        _printLine_("   time: " << this->time);
    7878}
    7979/*}}}*/
    8080/*FUNCTION DoubleVecExternalResult::Id{{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/ExternalResults/DoubleExternalResult.cpp

     
    5050/*FUNCTION DoubleExternalResult::DeepEcho{{{*/
    5151void DoubleExternalResult::DeepEcho(void){
    5252
    53         printf("DoubleExternalResult:\n");
    54         printf("   id: %i\n",this->id);
    55         printf("   enum:  %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    56         printf("   value: %g\n",this->value);
    57         printf("   step: %i\n",this->step);
    58         printf("   time: %g\n",this->time);
     53        _printLine_("DoubleExternalResult:");
     54        _printLine_("   id: " << this->id);
     55        _printLine_("   enum:  " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     56        _printLine_("   value: " << this->value);
     57        _printLine_("   step: " << this->step);
     58        _printLine_("   time: " << this->time);
    5959}
    6060/*}}}*/
    6161/*FUNCTION DoubleExternalResult::Id{{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/ExternalResults/IntExternalResult.cpp

     
    5050/*FUNCTION IntExternalResult::DeepEcho{{{*/
    5151void IntExternalResult::DeepEcho(void){
    5252
    53         printf("IntExternalResult:\n");
    54         printf("   id: %i\n",this->id);
    55         printf("   enum:  %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    56         printf("   value: %i\n",this->value);
    57         printf("   step: %i\n",this->step);
    58         printf("   time: %g\n",this->time);
     53        _printLine_("IntExternalResult:");
     54        _printLine_("   id: " << this->id);
     55        _printLine_("   enum:  " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     56        _printLine_("   value: " << this->value);
     57        _printLine_("   step: " << this->step);
     58        _printLine_("   time: " << this->time);
    5959}
    6060/*}}}*/
    6161/*FUNCTION IntExternalResult::Id{{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/ExternalResults/BoolExternalResult.cpp

     
    5050/*FUNCTION BoolExternalResult::DeepEcho{{{*/
    5151void BoolExternalResult::DeepEcho(void){
    5252
    53         printf("BoolExternalResult:\n");
    54         printf("   id: %i\n",this->id);
    55         printf("   enum:  %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    56         printf("   value: %s\n",this->value?"true":"false");
    57         printf("   step: %i\n",this->step);
    58         printf("   time: %g\n",this->time);
     53        _printLine_("BoolExternalResult:");
     54        _printLine_("   id: " << this->id);
     55        _printLine_("   enum:  " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     56        _printLine_("   value: " <<(this->value?"true":"false"));
     57        _printLine_("   step: " << this->step);
     58        _printLine_("   time: " << this->time);
    5959}
    6060/*}}}*/
    6161/*FUNCTION BoolExternalResult::Id{{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/FemModel.cpp

     
    101101/*FUNCTION FemModel::Echo {{{*/
    102102void FemModel::Echo(void){
    103103
    104         printf("FemModel echo: \n");
    105         printf("   number of fem models: %i\n",nummodels);
    106         printf("   analysis_type_list: \n");
    107         for(int i=0;i<nummodels;i++)printf("     %i: %s\n",i,EnumToStringx(analysis_type_list[i]));
    108         printf("   current analysis_type: \n");
    109         printf("     %i: %s\n",analysis_counter,EnumToStringx(analysis_type_list[analysis_counter]));
     104        _printLine_("FemModel echo: ");
     105        _printLine_("   number of fem models: " << nummodels);
     106        _printLine_("   analysis_type_list: ");
     107        for(int i=0;i<nummodels;i++)_printLine_("     " << i << ": " << EnumToStringx(analysis_type_list[i]));
     108        _printLine_("   current analysis_type: ");
     109        _printLine_("     " << analysis_counter << ": " << EnumToStringx(analysis_type_list[analysis_counter]));
    110110
    111111}
    112112/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/ElementResults/PentaP1ElementResult.cpp

     
    4949/*FUNCTION PentaP1ElementResult::DeepEcho{{{*/
    5050void PentaP1ElementResult::DeepEcho(void){
    5151
    52         printf("PentaP1ElementResult:\n");
    53         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    54         printf("   values: [%g %g %g %g %g %g]\n",this->values[0],this->values[1],this->values[2],this->values[3],this->values[4],this->values[5]);
    55         printf("   step: %i\n",this->step);
    56         printf("   time: %g\n",this->time);
     52        _printLine_("PentaP1ElementResult:");
     53        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     54        _printLine_("   values: [" << this->values[0] << " " << this->values[1] << " " << this->values[2] << " " << this->values[3] << " " << this->values[4] << " " << this->values[5] << "]");
     55        _printLine_("   step: " << this->step);
     56        _printLine_("   time: " << this->time);
    5757
    5858}
    5959/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/ElementResults/DoubleElementResult.cpp

     
    4747/*FUNCTION DoubleElementResult::DeepEcho{{{*/
    4848void DoubleElementResult::DeepEcho(void){
    4949
    50         printf("DoubleElementResult:\n");
    51         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    52         printf("   value: %g\n",this->value);
    53         printf("   step: %i\n",this->step);
    54         printf("   time: %g\n",this->time);
     50        _printLine_("DoubleElementResult:");
     51        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     52        _printLine_("   value: " << this->value);
     53        _printLine_("   step: " << this->step);
     54        _printLine_("   time: " << this->time);
    5555}
    5656/*}}}*/
    5757/*FUNCTION DoubleElementResult::Id{{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/ElementResults/BoolElementResult.cpp

     
    4747/*FUNCTION BoolElementResult::DeepEcho{{{*/
    4848void BoolElementResult::DeepEcho(void){
    4949
    50         printf("BoolElementResult:\n");
    51         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    52         printf("   value: %s\n",this->value?"true":"false");
    53         printf("   step: %i\n",this->step);
    54         printf("   time: %g\n",this->time);
     50        _printLine_("BoolElementResult:");
     51        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     52        _printLine_("   value: "<<(this->value?"true":"false"));
     53        _printLine_("   step: " << this->step);
     54        _printLine_("   time: " << this->time);
    5555}
    5656/*}}}*/
    5757/*FUNCTION BoolElementResult::Id{{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/ElementResults/TriaP1ElementResult.cpp

     
    4949/*FUNCTION TriaP1ElementResult::DeepEcho{{{*/
    5050void TriaP1ElementResult::DeepEcho(void){
    5151               
    52         printf("TriaP1ElementResult:\n");
    53         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    54         printf("   values: [%g %g %g]\n",this->values[0],this->values[1],this->values[2]);
    55         printf("   step: %i\n",this->step);
    56         printf("   time: %g\n",this->time);
     52        _printLine_("TriaP1ElementResult:");
     53        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     54        _printLine_("   values: [" << this->values[0] << " " << this->values[1] << " " << this->values[2] << "]");
     55        _printLine_("   step: " << this->step);
     56        _printLine_("   time: " << this->time);
    5757}
    5858/*}}}*/
    5959/*FUNCTION TriaP1ElementResult::Id{{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Elements/Tria.cpp

     
    866866/*FUNCTION Tria::DeepEcho{{{*/
    867867void Tria::DeepEcho(void){
    868868
    869         printf("Tria:\n");
    870         printf("   id: %i\n",id);
     869        _printLine_("Tria:");
     870        _printLine_("   id: " << id);
    871871        if(nodes){
    872872                nodes[0]->DeepEcho();
    873873                nodes[1]->DeepEcho();
    874874                nodes[2]->DeepEcho();
    875875        }
    876         else printf("nodes = NULL\n");
     876        else _printLine_("nodes = NULL");
    877877
    878878        if (matice) matice->DeepEcho();
    879         else printf("matice = NULL\n");
     879        else _printLine_("matice = NULL");
    880880
    881881        if (matpar) matpar->DeepEcho();
    882         else printf("matpar = NULL\n");
     882        else _printLine_("matpar = NULL");
    883883
    884         printf("   parameters\n");
     884        _printLine_("   parameters");
    885885        if (parameters) parameters->DeepEcho();
    886         else printf("parameters = NULL\n");
     886        else _printLine_("parameters = NULL");
    887887
    888         printf("   inputs\n");
     888        _printLine_("   inputs");
    889889        if (inputs) inputs->DeepEcho();
    890         else printf("inputs=NULL\n");
     890        else _printLine_("inputs=NULL");
    891891
    892892        if (results) results->DeepEcho();
    893         else printf("results=NULL\n");
     893        else _printLine_("results=NULL");
    894894
    895         printf("neighboor sids: \n");
    896         printf(" %i %i %i\n",horizontalneighborsids[0],horizontalneighborsids[1],horizontalneighborsids[2]);
     895        _printLine_("neighboor sids: ");
     896        _printLine_(" " << horizontalneighborsids[0] << " " << horizontalneighborsids[1] << " " << horizontalneighborsids[2]);
    897897       
    898898        return;
    899899}
    … …  
    909909/*}}}*/
    910910/*FUNCTION Tria::Echo{{{*/
    911911void Tria::Echo(void){
    912         printf("Tria:\n");
    913         printf("   id: %i\n",id);
     912        _printLine_("Tria:");
     913        _printLine_("   id: " << id);
    914914        if(nodes){
    915915                nodes[0]->Echo();
    916916                nodes[1]->Echo();
    917917                nodes[2]->Echo();
    918918        }
    919         else printf("nodes = NULL\n");
     919        else _printLine_("nodes = NULL");
    920920
    921921        if (matice) matice->Echo();
    922         else printf("matice = NULL\n");
     922        else _printLine_("matice = NULL");
    923923
    924924        if (matpar) matpar->Echo();
    925         else printf("matpar = NULL\n");
     925        else _printLine_("matpar = NULL");
    926926
    927         printf("   parameters\n");
     927        _printLine_("   parameters");
    928928        if (parameters) parameters->Echo();
    929         else printf("parameters = NULL\n");
     929        else _printLine_("parameters = NULL");
    930930
    931         printf("   inputs\n");
     931        _printLine_("   inputs");
    932932        if (inputs) inputs->Echo();
    933         else printf("inputs=NULL\n");
     933        else _printLine_("inputs=NULL");
    934934
    935935        if (results) results->Echo();
    936         else printf("results=NULL\n");
     936        else _printLine_("results=NULL");
    937937
    938         printf("neighboor sids: \n");
    939         printf(" %i %i %i\n",horizontalneighborsids[0],horizontalneighborsids[1],horizontalneighborsids[2]);
     938        _printLine_("neighboor sids: ");
     939        _printLine_(" " << horizontalneighborsids[0] << " " << horizontalneighborsids[1] << " " << horizontalneighborsids[2]);
    940940}
    941941/*}}}*/
    942942/*FUNCTION Tria::ObjectEnum{{{*/
    … …  
    12061206                elementresult->GetElementVectorFromResults(vector,sid);
    12071207        }
    12081208        else{
    1209                 printf("Interpolation %s not supported\n",EnumToStringx(interp));
     1209                _printLine_("Interpolation " << EnumToStringx(interp) << " not supported");
    12101210        }
    12111211}
    12121212/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Elements/Penta.cpp

     
    652652
    653653        int i;
    654654       
    655         printf("Penta:\n");
    656         printf("   id: %i\n",id);
     655        _printLine_("Penta:");
     656        _printLine_("   id: " << id);
    657657        nodes[0]->DeepEcho();
    658658        nodes[1]->DeepEcho();
    659659        nodes[2]->DeepEcho();
    … …  
    662662        nodes[5]->DeepEcho();
    663663        matice->DeepEcho();
    664664        matpar->DeepEcho();
    665         printf("   neighbor ids: %i-%i\n",verticalneighbors[0]->Id(),verticalneighbors[1]->Id());
    666         printf("   parameters\n");
     665        _printLine_("   neighbor ids: " << verticalneighbors[0]->Id() << "-" << verticalneighbors[1]->Id());
     666        _printLine_("   parameters");
    667667        parameters->DeepEcho();
    668         printf("   inputs\n");
     668        _printLine_("   inputs");
    669669        inputs->DeepEcho();
    670         printf("   results\n");
     670        _printLine_("   results");
    671671        results->DeepEcho();
    672         printf("neighboor sids: \n");
    673         printf(" %i %i %i\n",horizontalneighborsids[0],horizontalneighborsids[1],horizontalneighborsids[2]);
     672        _printLine_("neighboor sids: ");
     673        _printLine_(" " << horizontalneighborsids[0] << " " << horizontalneighborsids[1] << " " << horizontalneighborsids[2]);
    674674
    675675        return;
    676676}
    … …  
    10941094                elementresult->GetElementVectorFromResults(vector,sid);
    10951095        }
    10961096        else{
    1097                 printf("Interpolation %s not supported\n",EnumToStringx(interp));
     1097                _printLine_("Interpolation " << EnumToStringx(interp) << " not supported");
    10981098        }
    10991099}
    11001100/*}}}*/
    … …  
    43284328
    43294329                /*Check solution*/
    43304330                if(isnan(values[i])) _error2_("NaN found in solution vector");
    4331                 //if(values[i]<0)      printf("temperature < 0°K found in solution vector\n");
    4332                 //if(values[i]>275)    printf("temperature > 275°K found in solution vector (Paterson's rheology associated is negative)\n");
     4331                //if(values[i]<0)      _printLine_("temperature < 0°K found in solution vector");
     4332                //if(values[i]>275)    _printLine_("temperature > 275°K found in solution vector (Paterson's rheology associated is negative)");
    43334333        }
    43344334
    43354335        /*Get all inputs and parameters*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Inputs/ControlInput.cpp

     
    7171/*FUNCTION ControlInput::DeepEcho{{{*/
    7272void ControlInput::DeepEcho(void){
    7373
    74         printf("ControlInput:\n");
    75         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    76         printf("---values: \n");     if (values)      values->Echo();
    77         printf("---savedvalues: \n");if (savedvalues) savedvalues->Echo();
    78         printf("---minvalues: \n");  if (minvalues)   minvalues->Echo();
    79         printf("---maxvalues: \n");  if (maxvalues)   maxvalues->Echo();
    80         printf("---gradient: \n");   if (gradient)    gradient->Echo();
     74        _printLine_("ControlInput:");
     75        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     76        _printLine_("---values: ");     if (values)      values->Echo();
     77        _printLine_("---savedvalues: ");if (savedvalues) savedvalues->Echo();
     78        _printLine_("---minvalues: ");  if (minvalues)   minvalues->Echo();
     79        _printLine_("---maxvalues: ");  if (maxvalues)   maxvalues->Echo();
     80        _printLine_("---gradient: ");   if (gradient)    gradient->Echo();
    8181}
    8282/*}}}*/
    8383/*FUNCTION ControlInput::Id{{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Inputs/DatasetInput.cpp

     
    4646/*FUNCTION DatasetInput::DeepEcho{{{*/
    4747void DatasetInput::DeepEcho(void){
    4848
    49         printf("DatasetInput:\n");
    50         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    51         printf("---inputs: \n"); inputs->Echo();
     49        _printLine_("DatasetInput:");
     50        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     51        _printLine_("---inputs: "); inputs->Echo();
    5252}
    5353/*}}}*/
    5454/*FUNCTION DatasetInput::Id{{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Inputs/IntInput.cpp

     
    3939/*FUNCTION IntInput::DeepEcho{{{*/
    4040void IntInput::DeepEcho(void){
    4141
    42         printf("IntInput:\n");
    43         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    44         printf("   value: %i\n",(int)this->value);
     42        _printLine_("IntInput:");
     43        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     44        _printLine_("   value: " << (int)this->value);
    4545}
    4646/*}}}*/
    4747/*FUNCTION IntInput::Id{{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Inputs/BoolInput.cpp

     
    4444/*FUNCTION BoolInput::DeepEcho{{{*/
    4545void BoolInput::DeepEcho(void){
    4646
    47         printf("BoolInput:\n");
    48         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    49         printf("   value: %s\n",value?"true":"false");
     47        _printLine_("BoolInput:");
     48        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     49        _printLine_("   value: " <<(value?"true":"false"));
    5050}
    5151/*}}}*/
    5252/*FUNCTION BoolInput::Id{{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Inputs/TriaP1Input.cpp

     
    5555/*FUNCTION TriaP1Input::DeepEcho{{{*/
    5656void TriaP1Input::DeepEcho(void){
    5757
    58         printf("TriaP1Input:\n");
    59         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    60         printf("   values: [%g %g %g]\n",this->values[0],this->values[1],this->values[2]);
     58        _printLine_("TriaP1Input:");
     59        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     60        _printLine_("   values: [" << this->values[0] << " " << this->values[1] << " " << this->values[2] << "]");
    6161}
    6262/*}}}*/
    6363/*FUNCTION TriaP1Input::Id{{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Inputs/TransientInput.cpp

     
    6565
    6666        int i;
    6767
    68         printf("TransientInput:\n");
    69         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    70         printf("   numtimesteps: %i\n",this->numtimesteps);
    71         printf("---inputs: \n");
     68        _printLine_("TransientInput:");
     69        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     70        _printLine_("   numtimesteps: " << this->numtimesteps);
     71        _printLine_("---inputs: ");
    7272        for(i=0;i<this->numtimesteps;i++){
    73                 printf("   time: %g  \n",this->timesteps[i]);
     73                _printLine_("   time: " << this->timesteps[i] << "  ");
    7474                ((Input*)this->inputs->GetObjectByOffset(i))->Echo();
    7575        }
    7676}

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Inputs/PentaP1Input.cpp

     
    5555/*FUNCTION PentaP1Input::DeepEcho{{{*/
    5656void PentaP1Input::DeepEcho(void){
    5757
    58         printf("PentaP1Input:\n");
    59         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    60         printf("   values: [%g %g %g %g %g %g]\n",this->values[0],this->values[1],this->values[2],this->values[3],this->values[4],this->values[5]);
     58        _printLine_("PentaP1Input:");
     59        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     60        _printLine_("   values: [" << this->values[0] << " " << this->values[1] << " " << this->values[2] << " " << this->values[3] << " " << this->values[4] << " " << this->values[5] << "]");
    6161}
    6262/*}}}*/
    6363/*FUNCTION PentaP1Input::Id{{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Inputs/DoubleInput.cpp

     
    4444/*FUNCTION DoubleInput::DeepEcho{{{*/
    4545void DoubleInput::DeepEcho(void){
    4646
    47         printf("DoubleInput:\n");
    48         printf("   enum: %i (%s)\n",this->enum_type,EnumToStringx(this->enum_type));
    49         printf("   value: %g\n",this->value);
     47        _printLine_("DoubleInput:");
     48        _printLine_("   enum: " << this->enum_type << " (" << EnumToStringx(this->enum_type) << ")");
     49        _printLine_("   value: " << this->value);
    5050}
    5151/*}}}*/
    5252/*FUNCTION DoubleInput::Id{{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Kriging/ExponentialVariogram.cpp

     
    5050/*Object virtual functions definitions:*/
    5151/*FUNCTION ExponentialVariogram::Echo {{{*/
    5252void ExponentialVariogram::Echo(void){
    53         printf("ExponentialVariogram\n");
    54         printf("   nugget: %g\n",this->nugget);
    55         printf("   sill  : %g\n",this->sill);
    56         printf("   range : %g\n",this->range);
     53        _printLine_("ExponentialVariogram");
     54        _printLine_("   nugget: " << this->nugget);
     55        _printLine_("   sill  : " << this->sill);
     56        _printLine_("   range : " << this->range);
    5757}
    5858/*}}}*/
    5959

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Kriging/GaussianVariogram.cpp

     
    5050/*Object virtual functions definitions:*/
    5151/*FUNCTION GaussianVariogram::Echo {{{*/
    5252void GaussianVariogram::Echo(void){
    53         printf("GaussianVariogram\n");
    54         printf("   nugget: %g\n",this->nugget);
    55         printf("   sill  : %g\n",this->sill);
    56         printf("   range : %g\n",this->range);
     53        _printLine_("GaussianVariogram");
     54        _printLine_("   nugget: " << this->nugget);
     55        _printLine_("   sill  : " << this->sill);
     56        _printLine_("   range : " << this->range);
    5757}
    5858/*}}}*/
    5959
    … …  
    9292        a     = 1./3.;
    9393        gamma = (sill-nugget)*(1.-exp(-h2/(a*range*range))) + nugget;
    9494
    95         //if(h2>1000*1000) printf("gamma = %g h= %g\n",gamma,sqrt(h2));
    96         printf("h = %g gamma = %g\n",sqrt(h2),gamma);
     95        //if(h2>1000*1000) _printLine_("gamma = " << gamma << " h= " << sqrt(h2));
     96        _printLine_("h = " << sqrt(h2) << " gamma = " << gamma);
    9797        return gamma;
    9898}
    9999/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Kriging/SphericalVariogram.cpp

     
    5050/*Object virtual functions definitions:*/
    5151/*FUNCTION SphericalVariogram::Echo {{{*/
    5252void SphericalVariogram::Echo(void){
    53         printf("SphericalVariogram\n");
    54         printf("   nugget: %g\n",this->nugget);
    55         printf("   sill  : %g\n",this->sill);
    56         printf("   range : %g\n",this->range);
     53        _printLine_("SphericalVariogram");
     54        _printLine_("   nugget: " << this->nugget);
     55        _printLine_("   sill  : " << this->sill);
     56        _printLine_("   range : " << this->range);
    5757}
    5858/*}}}*/
    5959

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Kriging/PowerVariogram.cpp

     
    5151/*Object virtual functions definitions:*/
    5252/*FUNCTION PowerVariogram::Echo {{{*/
    5353void PowerVariogram::Echo(void){
    54         printf("PowerVariogram\n");
    55         printf("   nugget: %g\n",this->nugget);
    56         printf("   slope : %g\n",this->slope);
    57         printf("   power : %g\n",this->power);
     54        _printLine_("PowerVariogram");
     55        _printLine_("   nugget: " << this->nugget);
     56        _printLine_("   slope : " << this->slope);
     57        _printLine_("   power : " << this->power);
    5858}
    5959/*}}}*/
    6060
    … …  
    8888        /*return semi-variogram*/
    8989        gamma = this->nugget + this->slope*pow(h,this->power);
    9090
    91         //if(h>1000) printf("gamma = %g h=%g\n",gamma,h);
     91        //if(h>1000) _printLine_("gamma = " << gamma << " h=" << h);
    9292        return gamma;
    9393}
    9494/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Kriging/Quadtree.cpp

     
    296296/*FUNCTION Quadtree::Echo{{{*/
    297297void  Quadtree::Echo(void){
    298298
    299         printf("Quadtree:\n");
    300         printf("   MaxDepth      = %i\n",this->MaxDepth);
    301         printf("   NbQuadtreeBox = %i\n",this->NbQuadtreeBox);
    302         printf("   NbObs         = %i\n",this->NbObs);
    303         printf("   root          = %p\n",this->root);
     299        _printLine_("Quadtree:");
     300        _printLine_("   MaxDepth      = " << this->MaxDepth);
     301        _printLine_("   NbQuadtreeBox = " << this->NbQuadtreeBox);
     302        _printLine_("   NbObs         = " << this->NbObs);
     303        _printLine_("   root          = " << this->root);
    304304
    305305}/*}}}*/
    306306/*FUNCTION Quadtree::DeepEcho{{{*/
    307307void  Quadtree::DeepEcho(void){
    308308
    309         printf("Quadtree:\n");
    310         printf("   MaxDepth      = %i\n",this->MaxDepth);
    311         printf("   NbQuadtreeBox = %i\n",this->NbQuadtreeBox);
    312         printf("   NbObs         = %i\n",this->NbObs);
    313         printf("   root          = %p\n",this->root);
     309        _printLine_("Quadtree:");
     310        _printLine_("   MaxDepth      = " << this->MaxDepth);
     311        _printLine_("   NbQuadtreeBox = " << this->NbQuadtreeBox);
     312        _printLine_("   NbObs         = " << this->NbObs);
     313        _printLine_("   root          = " << this->root);
    314314        boxcontainer->Echo();
    315315
    316316}/*}}}*/
    … …  
    511511/*FUNCTION QuadtreeBox::Echo{{{*/
    512512void  Quadtree::QuadtreeBox::Echo(void){
    513513
    514         printf("QuadtreeBox:\n");
    515         printf("   nbitems = %i\n",this->nbitems);
    516         printf("   xcenter = %g\n",this->xcenter);
    517         printf("   ycenter = %g\n",this->ycenter);
    518         printf("   length  = %g\n",this->length);
     514        _printLine_("QuadtreeBox:");
     515        _printLine_("   nbitems = " << this->nbitems);
     516        _printLine_("   xcenter = " << this->xcenter);
     517        _printLine_("   ycenter = " << this->ycenter);
     518        _printLine_("   length  = " << this->length);
    519519
    520520}/*}}}*/
    521521/*FUNCTION QuadtreeBox::IsWithinRange{{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Kriging/Observation.cpp

     
    3636
    3737        int  bit;
    3838
    39         printf("Observation\n");
    40         printf("   index : %i\n",this->index);
    41         printf("   x     : %g\n",this->x);
    42         printf("   y     : %g\n",this->y);
    43         printf("   xi    : "); printbinary(this->xi); printf("\n");
    44         printf("   yi    : "); printbinary(this->yi); printf("\n");
    45         printf("   weight: %g\n",this->weight);
    46         printf("   value : %g\n",this->value);
     39        _printLine_("Observation");
     40        _printLine_("   index : " << this->index);
     41        _printLine_("   x     : " << this->x);
     42        _printLine_("   y     : " << this->y);
     43        _printLine_("   xi    : "); printbinary(this->xi); _printLine_("");
     44        _printLine_("   yi    : "); printbinary(this->yi); _printLine_("");
     45        _printLine_("   weight: " << this->weight);
     46        _printLine_("   value : " << this->value);
    4747}
    4848/*}}}*/
    4949

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Node.cpp

     
    156156/*FUNCTION Node::Echo{{{*/
    157157void Node::Echo(void){
    158158
    159         printf("Node:\n");
    160         printf("   id: %i\n",id);
    161         printf("   sid: %i\n",sid);
    162         printf("   analysis_type: %s\n",EnumToStringx(analysis_type));
     159        _printLine_("Node:");
     160        _printLine_("   id: " << id);
     161        _printLine_("   sid: " << sid);
     162        _printLine_("   analysis_type: " << EnumToStringx(analysis_type));
    163163        indexing.Echo();
    164         printf("   hvertex:     not displayed\n");
    165         printf("   inputs:      %p\n",inputs);
     164        _printLine_("   hvertex:     not displayed");
     165        _printLine_("   inputs:      " << inputs);
    166166
    167167
    168168}
    … …  
    170170/*FUNCTION Node::DeepEcho{{{*/
    171171void Node::DeepEcho(void){
    172172
    173         printf("Node:\n");
    174         printf("   id: %i\n",id);
    175         printf("   sid: %i\n",sid);
    176         printf("   analysis_type: %s\n",EnumToStringx(analysis_type));
     173        _printLine_("Node:");
     174        _printLine_("   id: " << id);
     175        _printLine_("   sid: " << sid);
     176        _printLine_("   analysis_type: " << EnumToStringx(analysis_type));
    177177        indexing.DeepEcho();
    178         printf("Vertex:\n");
     178        _printLine_("Vertex:");
    179179        hvertex->DeepEcho();
    180         printf("   inputs\n");
     180        _printLine_("   inputs");
    181181
    182182
    183183}

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Constraints/SpcDynamic.cpp

     
    4545/*FUNCTION SpcDynamic::Echo {{{*/
    4646void SpcDynamic::Echo(void){
    4747
    48         printf("SpcDynamic:\n");
    49         printf("   sid: %i\n",sid);
    50         printf("   nodeid: %i\n",nodeid);
    51         printf("   dof: %i\n",dof);
    52         printf("   value: %g\n",value);
    53         printf("   isset: %s\n",isset?"true":"false");
    54         printf("   analysis_type: %s\n",EnumToStringx(analysis_type));
     48        _printLine_("SpcDynamic:");
     49        _printLine_("   sid: " << sid);
     50        _printLine_("   nodeid: " << nodeid);
     51        _printLine_("   dof: " << dof);
     52        _printLine_("   value: " << value);
     53        _printLine_("   isset: " <<(isset?"true":"false"));
     54        _printLine_("   analysis_type: " << EnumToStringx(analysis_type));
    5555        return;
    5656}
    5757/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Constraints/SpcStatic.cpp

     
    4444/*FUNCTION SpcStatic::Echo {{{*/
    4545void SpcStatic::Echo(void){
    4646
    47         printf("SpcStatic:\n");
    48         printf("   sid: %i\n",sid);
    49         printf("   nodeid: %i\n",nodeid);
    50         printf("   dof: %i\n",dof);
    51         printf("   value: %g\n",value);
    52         printf("   analysis_type: %s\n",EnumToStringx(analysis_type));
     47        _printLine_("SpcStatic:");
     48        _printLine_("   sid: " << sid);
     49        _printLine_("   nodeid: " << nodeid);
     50        _printLine_("   dof: " << dof);
     51        _printLine_("   value: " << value);
     52        _printLine_("   analysis_type: " << EnumToStringx(analysis_type));
    5353        return;
    5454}
    5555/*}}}*/
    5656/*FUNCTION SpcStatic::DeepEcho {{{*/
    5757void SpcStatic::DeepEcho(void){
    5858
    59         printf("SpcStatic:\n");
    60         printf("   sid: %i\n",sid);
    61         printf("   nodeid: %i\n",nodeid);
    62         printf("   dof: %i\n",dof);
    63         printf("   value: %g\n",value);
    64         printf("   analysis_type: %s\n",EnumToStringx(analysis_type));
     59        _printLine_("SpcStatic:");
     60        _printLine_("   sid: " << sid);
     61        _printLine_("   nodeid: " << nodeid);
     62        _printLine_("   dof: " << dof);
     63        _printLine_("   value: " << value);
     64        _printLine_("   analysis_type: " << EnumToStringx(analysis_type));
    6565        return;
    6666}               
    6767/*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/Constraints/SpcTransient.cpp

     
    5959void SpcTransient::Echo(void){
    6060
    6161        int i;
    62         printf("SpcTransient:\n");
    63         printf("   sid: %i\n",sid);
    64         printf("   nodeid: %i\n",nodeid);
    65         printf("   dof: %i\n",dof);
    66         printf("   nsteps: %i\n",nsteps);
    67         printf("   analysis_type: %s\n",EnumToStringx(analysis_type));
    68         printf("   steps|times|values\n");
     62        _printLine_("SpcTransient:");
     63        _printLine_("   sid: " << sid);
     64        _printLine_("   nodeid: " << nodeid);
     65        _printLine_("   dof: " << dof);
     66        _printLine_("   nsteps: " << nsteps);
     67        _printLine_("   analysis_type: " << EnumToStringx(analysis_type));
     68        _printLine_("   steps|times|values");
    6969        for(i=0;i<nsteps;i++){
    70                 printf("%i-%g:%g\n",i,times[i],values[i]);
     70                _printLine_("" << i << "-" << times[i] << ":" << values[i]);
    7171        }
    7272        return;
    7373}

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/IoModel.cpp

     
    113113                }
    114114                else{
    115115                        if(record_enum!=MaximumNumberOfEnums){
    116                                 printf("\n");
    117                                 printf("=========================================================================\n");
    118                                 printf(" Enums in marshalled file are not compatible with compiled code          \n");
    119                                 printf("                                                                         \n");
    120                                 printf("   * If you are running ISSM on a remote cluster:                        \n");
    121                                 printf("     make sure that you are using the same version of ISSM on your local \n");
    122                                 printf("     machine and remote cluster (you might need to run svn update)       \n");
    123                                 printf("   * If you are running ISSM on your local machine:                      \n");
    124                                 printf("     make sure that all the code is compiled (modules and executables)   \n");
    125                                 printf("   * If you are a developer and just added a new Enum:                   \n");
    126                                 printf("     you might need to run ./Synchronize.sh in src/c/EnumDefinitions     \n");
    127                                 printf("     and recompile                                                       \n");
    128                                 printf("=========================================================================\n");
    129                                 printf("\n");
     116                                _printLine_("");
     117                                _printLine_("=========================================================================");
     118                                _printLine_(" Enums in marshalled file are not compatible with compiled code          ");
     119                                _printLine_("                                                                         ");
     120                                _printLine_("   * If you are running ISSM on a remote cluster:                        ");
     121                                _printLine_("     make sure that you are using the same version of ISSM on your local ");
     122                                _printLine_("     machine and remote cluster (you might need to run svn update)       ");
     123                                _printLine_("   * If you are running ISSM on your local machine:                      ");
     124                                _printLine_("     make sure that all the code is compiled (modules and executables)   ");
     125                                _printLine_("   * If you are a developer and just added a new Enum:                   ");
     126                                _printLine_("     you might need to run ./Synchronize.sh in src/c/EnumDefinitions     ");
     127                                _printLine_("     and recompile                                                       ");
     128                                _printLine_("=========================================================================");
     129                                _printLine_("");
    130130                                _error2_("Enums not consistent (See error message above)");
    131131                        }
    132132                }
Note: See TracBrowser for help on using the repository browser.