<div dir="ltr"><div>I get an error in PetscCommGetNewTag. So I copied the test to may main and I get the same problem. So this code fails:</div><div><br></div><div>int main( int argc, char **args ) </div><div>{</div><div>  PetscErrorCode   ierr;</div><div>  ierr = PetscInitialize( &argc, &args, "./.petscrc", NULL );CHKERRQ(ierr);</div><div>  { // debug</div><div>    PetscCommCounter *counter;</div><div>    PetscMPIInt      flg;</div><div>    ierr = MPI_Attr_get(PETSC_COMM_WORLD,Petsc_Counter_keyval,&counter,&flg);CHKERRQ(ierr);</div><div>    if (!flg) SETERRQ(PETSC_COMM_SELF,PETSC_ERR_ARG_CORRUPT,"Bad MPI communicator supplied ???????????????");</div><div>  }</div><div><br></div><div>Any ideas?</div><div><br></div><div>Mark</div></div>