function
   
petsc-3.3-p1 2012-06-15
[] = PetscCHKERRQ(err) if (err) error('Errors generated on calling Petsc library function'); end