Ignore:
Timestamp:
06/18/10 19:24:59 (15 years ago)
Author:
Eric.Larour
Message:

Keep simplifying solutions.
New convergence module at the input level, instead at the solution level, when solution vectors are not
available anymore.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk/src/c/solutions/bedslope.cpp

    r4030 r4055  
    3737        double   start_init, finish_init;
    3838
    39         int analyses[1]={BedSlopeComputeAnalysisEnum};
    40         int solution_type=BedSlopeComputeSolutionEnum;
     39        int analyses[1]={SlopeAnalysisEnum};
     40        int solution_type=SlopeAnalysisEnum;
    4141
    4242        MODULEBOOT();
     
    6767        _printf_("create finite element model, using analyses types statically defined above:\n");
    6868        femmodel=new FemModel(fid,solution_type,analyses,1);
     69
     70        /*add outputfilename in parameters: */
     71        femmodel->parameters->AddObject(new StringParam(OutputFileNameEnum,outputfilename));
    6972       
    7073        /*get parameters: */
     
    8386
    8487                _printf_("write results to disk:\n");
    85                 OutputResults(femmodel,outputfilename,DiagnosticAnalysisEnum);
     88                OutputResults(femmodel->elements, femmodel->loads, femmodel->nodes, femmodel->vertices, femmodel->materials, femmodel->parameters);
    8689        }
    8790        else{
     
    9295                #ifdef _HAVE_DAKOTA_
    9396                MPI_Barrier(MPI_COMM_WORLD); start_core=MPI_Wtime( );
    94                 Qmux(femmodel,SlopeComputeAnalysisEnum,NoneAnalysisEnum);
     97                Qmux(femmodel,BedSlopeAnalysisEnum,NoneAnalysisEnum);
    9598                MPI_Barrier(MPI_COMM_WORLD); finish_core=MPI_Wtime( );
    9699                #else
Note: See TracChangeset for help on using the changeset viewer.