Index: /issm/trunk-jpl/src/c/cores/sealevelrise_core.cpp
===================================================================
--- /issm/trunk-jpl/src/c/cores/sealevelrise_core.cpp	(revision 21225)
+++ /issm/trunk-jpl/src/c/cores/sealevelrise_core.cpp	(revision 21226)
@@ -283,6 +283,16 @@
 	
 	/*retrieve the inter communicators that will be used to send data from earth to ice caps:*/
-	if(modelid==earthid)femmodel->parameters->FindParam((int**)(&tocomms),&numcoms,IcecapToEarthCommEnum);
-	else femmodel->parameters->FindParam((int*)(&fromcomm), IcecapToEarthCommEnum);
+	if(modelid==earthid){
+		GenericParam<ISSM_MPI_Comm*>* parcoms = dynamic_cast<GenericParam<ISSM_MPI_Comm*>*>(femmodel->parameters->FindParamObject(IcecapToEarthCommEnum));
+		if(!parcoms)_error_("TransferSealevel error message: could not find IcecapToEarthComm communicator");
+		tocomms=parcoms->GetParameterValue();
+		//femmodel->parameters->FindParam((int**)(&tocomms),&numcoms,IcecapToEarthCommEnum);
+	}
+	else{
+		GenericParam<ISSM_MPI_Comm>* parcom = dynamic_cast<GenericParam<ISSM_MPI_Comm>*>(femmodel->parameters->FindParamObject(IcecapToEarthCommEnum));
+		if(!parcom)_error_("TransferSealevel error message: could not find IcecapToEarthComm communicator");
+		fromcomm=parcom->GetParameterValue();
+		//femmodel->parameters->FindParam((int*)(&fromcomm), IcecapToEarthCommEnum);
+	}