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