function
   
petsc-3.5.0 2014-06-30
comm = PETSC_COMM_SELF() [err,comm] = calllib('libpetsc', 'PetscGetPETSC_COMM_SELF',0);PetscCHKERRQ(err);