Changeset 3462
- Timestamp:
- 04/08/10 09:02:06 (15 years ago)
- Location:
- issm/trunk/src/c/ModelProcessorx
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/c/ModelProcessorx/Balancedthickness/CreateParametersBalancedthickness.cpp
r3460 r3462 1 * \brief driver for creating parameters dataset, for prognostic analysis.1 /* \brief driver for creating parameters dataset, for prognostic analysis. 2 2 */ 3 3 … … 50 50 count++; 51 51 param= new Param(count,"m_g",DOUBLEVEC); 52 if(iomodel->melting) param->SetDoubleVec( melting,iomodel->numberofvertices,1);53 else param->SetDoubleVec( melting,0,1);52 if(iomodel->melting) param->SetDoubleVec(iomodel->melting,iomodel->numberofvertices,1); 53 else param->SetDoubleVec(iomodel->melting,0,1); 54 54 parameters->AddObject(param); 55 55 -
issm/trunk/src/c/ModelProcessorx/Prognostic/CreateParametersPrognostic.cpp
r3460 r3462 50 50 parameters->FindParam(&dim,"dim"); 51 51 if (dim==3){ 52 IoModelFetchData(& pressure,NULL,NULL,iomodel_handle,"pressure");52 IoModelFetchData(&iomodel->pressure,NULL,NULL,iomodel_handle,"pressure"); 53 53 54 54 count++; 55 55 param= new Param(count,"p_g",DOUBLEVEC); 56 if( pressure) param->SetDoubleVec(pressure,iomodel->numberofvertices,1);57 else param->SetDoubleVec( pressure,0,0);56 if(iomodel->pressure) param->SetDoubleVec(iomodel->pressure,iomodel->numberofvertices,1); 57 else param->SetDoubleVec(iomodel->pressure,0,0); 58 58 parameters->AddObject(param); 59 59 60 60 /*Free pressure: */ 61 xfree((void**)& pressure);61 xfree((void**)&iomodel->pressure); 62 62 } 63 63 … … 65 65 parameters->FindParam(&dim,"dim"); 66 66 if (dim==3){ 67 IoModelFetchData(& temperature,NULL,NULL,iomodel_handle,"temperature");67 IoModelFetchData(&iomodel->temperature,NULL,NULL,iomodel_handle,"temperature"); 68 68 69 69 count++; 70 70 param= new Param(count,"t_g",DOUBLEVEC); 71 if( temperature) param->SetDoubleVec(temperature,iomodel->numberofvertices,1);72 else param->SetDoubleVec( temperature,0,0);71 if(iomodel->temperature) param->SetDoubleVec(iomodel->temperature,iomodel->numberofvertices,1); 72 else param->SetDoubleVec(iomodel->temperature,0,0); 73 73 parameters->AddObject(param); 74 74 75 75 /*Free temperature: */ 76 xfree((void**)& temperature);76 xfree((void**)&iomodel->temperature); 77 77 } 78 78 … … 114 114 115 115 /*Get melting: */ 116 IoModelFetchData(&i iomodel->melting,NULL,NULL,iomodel_handle,"melting");116 IoModelFetchData(&iomodel->melting,NULL,NULL,iomodel_handle,"melting"); 117 117 if(iomodel->melting) for(i=0;i<iomodel->numberofvertices;i++)iomodel->melting[i]=iomodel->melting[i]/iomodel->yts; 118 118
Note:
See TracChangeset
for help on using the changeset viewer.