Changeset 8331


Ignore:
Timestamp:
05/17/11 16:08:06 (14 years ago)
Author:
Eric.Larour
Message:

now deleted

Location:
issm/trunk/src/c
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk/src/c/Makefile.am

    r8330 r8331  
    10361036                                        ./io/pfopen.cpp\
    10371037                                        ./io/pfclose.cpp\
    1038                                         ./io/ParsePetscOptions.cpp\
    10391038                                        ./EnumDefinitions/EnumDefinitions.h\
    10401039                                        ./EnumDefinitions/EnumToModelField.cpp\
  • issm/trunk/src/c/modules/ModelProcessorx/Transient/UpdateElementsTransient.cpp

    r8330 r8331  
    2222        /*Ok, let's go through forcings: */
    2323
    24         /*Fetch data needed: */
    25         IoModelFetchData(&iomodel->elements,NULL,NULL,iomodel_handle,"elements");
    26         IoModelFetchData(&iomodel->elements_type,NULL,NULL,iomodel_handle,"elements_type");
    27         IoModelFetchData(&iomodel->thickness,NULL,NULL,iomodel_handle,"thickness");
    28         IoModelFetchData(&iomodel->thickness_coeff,NULL,NULL,iomodel_handle,"thickness_coeff");
    29         IoModelFetchData(&iomodel->surface,NULL,NULL,iomodel_handle,"surface");
    30         IoModelFetchData(&iomodel->bed,NULL,NULL,iomodel_handle,"bed");
    31         IoModelFetchData(&iomodel->drag_coefficient,NULL,NULL,iomodel_handle,"drag_coefficient");
    32         IoModelFetchData(&iomodel->drag_p,NULL,NULL,iomodel_handle,"drag_p");
    33         IoModelFetchData(&iomodel->drag_q,NULL,NULL,iomodel_handle,"drag_q");
    34         IoModelFetchData(&iomodel->elementoniceshelf,NULL,NULL,iomodel_handle,"elementoniceshelf");
    35         IoModelFetchData(&iomodel->elementonwater,NULL,NULL,iomodel_handle,"elementonwater");
    36         IoModelFetchData(&iomodel->rheology_B,NULL,NULL,iomodel_handle,"rheology_B");
    37         IoModelFetchData(&iomodel->rheology_n,NULL,NULL,iomodel_handle,"rheology_n");
    38         IoModelFetchData(&iomodel->vx,NULL,NULL,iomodel_handle,"vx");
    39         IoModelFetchData(&iomodel->vy,NULL,NULL,iomodel_handle,"vy");
    40         if(iomodel->gl_migration!=NoneEnum) IoModelFetchData(&iomodel->bathymetry,NULL,NULL,iomodel_handle,"bathymetry");
    4124
    42         if (iomodel->dim==3){
    43                 IoModelFetchData(&iomodel->elementonbed,NULL,NULL,iomodel_handle,"elementonbed");
    44                 IoModelFetchData(&iomodel->elementonsurface,NULL,NULL,iomodel_handle,"elementonsurface");
    45                 IoModelFetchData(&iomodel->vz,NULL,NULL,iomodel_handle,"vz");
    46                 IoModelFetchData(&iomodel->accumulation_rate,NULL,NULL,iomodel_handle,"accumulation_rate");
    47                 IoModelFetchData(&iomodel->melting_rate,NULL,NULL,iomodel_handle,"melting_rate");
    48                 IoModelFetchData(&iomodel->nodeonstokes,NULL,NULL,iomodel_handle,"nodeonstokes");
    49         }
    50         if(iomodel->control_analysis){
    51                 IoModelFetchData(&iomodel->vx_obs,NULL,NULL,iomodel_handle,"vx_obs");
    52                 IoModelFetchData(&iomodel->vy_obs,NULL,NULL,iomodel_handle,"vy_obs");
    53         }
    54 
    55         /*Update elements: */
    56         counter=0;
    57         for (i=0;i<iomodel->numberofelements;i++){
    58                 if(iomodel->my_elements[i]){
    59                         element=(Element*)elements->GetObjectByOffset(counter);
    60                         element->Update(i,iomodel,analysis_counter,analysis_type); //we need i to index into elements.
    61                         counter++;
    62                 }
    63         }
    64 cleanup_and_return:
    65 
    66         /*Free data: */
    67         xfree((void**)&iomodel->elements);
    68         xfree((void**)&iomodel->elements_type);
    69         xfree((void**)&iomodel->thickness);
    70         xfree((void**)&iomodel->thickness_coeff);
    71         xfree((void**)&iomodel->surface);
    72         xfree((void**)&iomodel->bed);
    73         xfree((void**)&iomodel->drag_coefficient);
    74         xfree((void**)&iomodel->drag_p);
    75         xfree((void**)&iomodel->drag_q);
    76         xfree((void**)&iomodel->rheology_n);
    77         xfree((void**)&iomodel->rheology_B);
    78         xfree((void**)&iomodel->elementoniceshelf);
    79         xfree((void**)&iomodel->elementonbed);
    80         xfree((void**)&iomodel->elementonsurface);
    81         xfree((void**)&iomodel->elementonwater);
    82         xfree((void**)&iomodel->accumulation_rate);
    83         xfree((void**)&iomodel->melting_rate);
    84         xfree((void**)&iomodel->nodeonstokes);
    85         xfree((void**)&iomodel->vx);
    86         xfree((void**)&iomodel->vy);
    87         xfree((void**)&iomodel->vz);
    88         xfree((void**)&iomodel->vx_obs);
    89         xfree((void**)&iomodel->vy_obs);
    9025}
Note: See TracChangeset for help on using the changeset viewer.