function
   
petsc-3.3-p3 2012-08-29
[] = PetscCHKERRQ(err) if (err) error('Errors generated on calling Petsc library function'); end