function
   
petsc-3.3-p4 2012-10-26
[] = PetscCHKERRQ(err) if (err) error('Errors generated on calling Petsc library function'); end