Actual source code: tmpbench.c

  1: static char help[] = "Benchmark dense matrix LU factorization (BLAS/LAPACK)\n\n";

  3: #include <petscbm.h>
  4: #include <petscmat.h>

  6: int main(int argc, char **argv)
  7: {
  8:   PetscBench bm;

 10:   PetscFunctionBeginUser;
 11:   PetscCall(PetscInitialize(&argc, &argv, NULL, help));
 12:   PetscCall(MatInitializePackage());
 13:   PetscCall(PetscBenchCreate(PETSC_COMM_SELF, &bm));
 14:   PetscCall(PetscBenchSetType(bm, PETSCBMHPL));
 15:   PetscCall(PetscBenchSetFromOptions(bm));
 16:   PetscCall(PetscBenchSetUp(bm));
 17:   PetscCall(PetscBenchRun(bm));
 18:   PetscCall(PetscBenchView(bm, PETSC_VIEWER_STDOUT_SELF));
 19:   PetscCall(PetscBenchSetSize(bm, 5000));
 20:   PetscCall(PetscBenchRun(bm));
 21:   PetscCall(PetscBenchView(bm, PETSC_VIEWER_STDOUT_SELF));

 23:   PetscCall(PetscBenchDestroy(&bm));
 24:   PetscCall(PetscFinalize());
 25:   return 0;
 26: }

 28: /*TEST

 30:    test:
 31:      requires: hpl

 33: TEST*/