예제 #1
0
파일: pot.c 프로젝트: ReiMatsuzaki/rescol 
PetscErrorCode PotSetHarm(Pot self, PetscScalar a) {
  Harm *ctx; PetscNew(&ctx);
  ctx->a = a;
  PFSet(self, HarmApply, NULL, HarmView, HarmDestroy, ctx);
  return 0;
}