source:
issm/oecreview/Archive/21724-22754/ISSM-22710-22711.diff@
22755
Last change on this file since 22755 was 22755, checked in by , 7 years ago | |
---|---|
File size: 740 bytes |
-
../trunk-jpl/src/c/cores/transient_core.cpp
183 183 femmodel->parameters->FindParam(&oceangridnysize,OceanGridNyEnum); 184 184 oceanmelt = xNew<IssmDouble>(oceangridnxsize*oceangridnysize); 185 185 ISSM_MPI_Recv(oceanmelt,oceangridnxsize*oceangridnysize,ISSM_MPI_DOUBLE,0,10001007,tomitgcmcomm,&status); 186 icebase = xNew<IssmDouble>(oceangridnxsize*oceangridnysize); 186 187 for(int i=0;i<oceangridnxsize;i++){ 187 188 for(int j=0;j<oceangridnysize;j++){ 188 189 icebase[i*oceangridnysize+j]=9999.;
Note:
See TracBrowser
for help on using the repository browser.