Lines Matching refs:form
264 PetscCall(PetscHMapFormDestroy(&wfNew->form[f])); in PetscWeakFormCopy()
265 PetscCall(PetscHMapFormDuplicate(wf->form[f], &wfNew->form[f])); in PetscWeakFormCopy()
287 for (f = 0; f < PETSC_NUM_WF; ++f) PetscCall(PetscHMapFormClear(wf->form[f])); in PetscWeakFormClear()
355 …for (f = 0; f < PETSC_NUM_WF; ++f) PetscCall(PetscWeakFormRewriteKeys_Internal(wf, wf->form[f], la… in PetscWeakFormRewriteKeys()
431 …for (f = 0; f < PETSC_NUM_WF; ++f) PetscCall(PetscWeakFormReplaceLabel_Internal(wf, wf->form[f], l… in PetscWeakFormReplaceLabel()
438 PetscCall(PetscWeakFormClearIndexFunction_Private(wf, wf->form[kind], label, val, f, part, ind)); in PetscWeakFormClearIndex()
445 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_OBJECTIVE], label, val, f, part, … in PetscWeakFormGetObjective()
452 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_OBJECTIVE], label, val, f, part, … in PetscWeakFormSetObjective()
459 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_OBJECTIVE], label, val, f, part, … in PetscWeakFormAddObjective()
466 …PetscCall(PetscWeakFormGetIndexFunction_Private(wf, wf->form[PETSC_WF_OBJECTIVE], label, val, f, p… in PetscWeakFormGetIndexObjective()
473 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_OBJECTIVE], label, val, f, p… in PetscWeakFormSetIndexObjective()
480 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_F0], label, val, f, part, n0, (vo… in PetscWeakFormGetResidual()
481 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_F1], label, val, f, part, n1, (vo… in PetscWeakFormGetResidual()
488 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_F0], label, val, f, part, (PetscV… in PetscWeakFormAddResidual()
489 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_F1], label, val, f, part, (PetscV… in PetscWeakFormAddResidual()
496 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_F0], label, val, f, part, n0, (Pe… in PetscWeakFormSetResidual()
497 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_F1], label, val, f, part, n1, (Pe… in PetscWeakFormSetResidual()
504 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_F0], label, val, f, part, i0… in PetscWeakFormSetIndexResidual()
505 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_F1], label, val, f, part, i1… in PetscWeakFormSetIndexResidual()
512 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_BDF0], label, val, f, part, n0, (… in PetscWeakFormGetBdResidual()
513 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_BDF1], label, val, f, part, n1, (… in PetscWeakFormGetBdResidual()
520 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_BDF0], label, val, f, part, (Pets… in PetscWeakFormAddBdResidual()
521 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_BDF1], label, val, f, part, (Pets… in PetscWeakFormAddBdResidual()
528 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_BDF0], label, val, f, part, n0, (… in PetscWeakFormSetBdResidual()
529 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_BDF1], label, val, f, part, n1, (… in PetscWeakFormSetBdResidual()
536 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_BDF0], label, val, f, part, … in PetscWeakFormSetIndexBdResidual()
537 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_BDF1], label, val, f, part, … in PetscWeakFormSetIndexBdResidual()
548 PetscCall(PetscHMapFormGetSize(wf->form[PETSC_WF_G0], &n0)); in PetscWeakFormHasJacobian()
549 PetscCall(PetscHMapFormGetSize(wf->form[PETSC_WF_G1], &n1)); in PetscWeakFormHasJacobian()
550 PetscCall(PetscHMapFormGetSize(wf->form[PETSC_WF_G2], &n2)); in PetscWeakFormHasJacobian()
551 PetscCall(PetscHMapFormGetSize(wf->form[PETSC_WF_G3], &n3)); in PetscWeakFormHasJacobian()
561 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_G0], label, val, find, part, n0, … in PetscWeakFormGetJacobian()
562 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_G1], label, val, find, part, n1, … in PetscWeakFormGetJacobian()
563 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_G2], label, val, find, part, n2, … in PetscWeakFormGetJacobian()
564 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_G3], label, val, find, part, n3, … in PetscWeakFormGetJacobian()
573 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_G0], label, val, find, part, (Pet… in PetscWeakFormAddJacobian()
574 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_G1], label, val, find, part, (Pet… in PetscWeakFormAddJacobian()
575 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_G2], label, val, find, part, (Pet… in PetscWeakFormAddJacobian()
576 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_G3], label, val, find, part, (Pet… in PetscWeakFormAddJacobian()
585 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_G0], label, val, find, part, n0, … in PetscWeakFormSetJacobian()
586 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_G1], label, val, find, part, n1, … in PetscWeakFormSetJacobian()
587 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_G2], label, val, find, part, n2, … in PetscWeakFormSetJacobian()
588 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_G3], label, val, find, part, n3, … in PetscWeakFormSetJacobian()
597 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_G0], label, val, find, part,… in PetscWeakFormSetIndexJacobian()
598 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_G1], label, val, find, part,… in PetscWeakFormSetIndexJacobian()
599 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_G2], label, val, find, part,… in PetscWeakFormSetIndexJacobian()
600 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_G3], label, val, find, part,… in PetscWeakFormSetIndexJacobian()
611 PetscCall(PetscHMapFormGetSize(wf->form[PETSC_WF_GP0], &n0)); in PetscWeakFormHasJacobianPreconditioner()
612 PetscCall(PetscHMapFormGetSize(wf->form[PETSC_WF_GP1], &n1)); in PetscWeakFormHasJacobianPreconditioner()
613 PetscCall(PetscHMapFormGetSize(wf->form[PETSC_WF_GP2], &n2)); in PetscWeakFormHasJacobianPreconditioner()
614 PetscCall(PetscHMapFormGetSize(wf->form[PETSC_WF_GP3], &n3)); in PetscWeakFormHasJacobianPreconditioner()
624 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_GP0], label, val, find, part, n0,… in PetscWeakFormGetJacobianPreconditioner()
625 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_GP1], label, val, find, part, n1,… in PetscWeakFormGetJacobianPreconditioner()
626 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_GP2], label, val, find, part, n2,… in PetscWeakFormGetJacobianPreconditioner()
627 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_GP3], label, val, find, part, n3,… in PetscWeakFormGetJacobianPreconditioner()
636 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_GP0], label, val, find, part, (Pe… in PetscWeakFormAddJacobianPreconditioner()
637 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_GP1], label, val, find, part, (Pe… in PetscWeakFormAddJacobianPreconditioner()
638 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_GP2], label, val, find, part, (Pe… in PetscWeakFormAddJacobianPreconditioner()
639 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_GP3], label, val, find, part, (Pe… in PetscWeakFormAddJacobianPreconditioner()
648 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_GP0], label, val, find, part, n0,… in PetscWeakFormSetJacobianPreconditioner()
649 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_GP1], label, val, find, part, n1,… in PetscWeakFormSetJacobianPreconditioner()
650 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_GP2], label, val, find, part, n2,… in PetscWeakFormSetJacobianPreconditioner()
651 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_GP3], label, val, find, part, n3,… in PetscWeakFormSetJacobianPreconditioner()
660 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_GP0], label, val, find, part… in PetscWeakFormSetIndexJacobianPreconditioner()
661 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_GP1], label, val, find, part… in PetscWeakFormSetIndexJacobianPreconditioner()
662 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_GP2], label, val, find, part… in PetscWeakFormSetIndexJacobianPreconditioner()
663 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_GP3], label, val, find, part… in PetscWeakFormSetIndexJacobianPreconditioner()
674 PetscCall(PetscHMapFormGetSize(wf->form[PETSC_WF_BDG0], &n0)); in PetscWeakFormHasBdJacobian()
675 PetscCall(PetscHMapFormGetSize(wf->form[PETSC_WF_BDG1], &n1)); in PetscWeakFormHasBdJacobian()
676 PetscCall(PetscHMapFormGetSize(wf->form[PETSC_WF_BDG2], &n2)); in PetscWeakFormHasBdJacobian()
677 PetscCall(PetscHMapFormGetSize(wf->form[PETSC_WF_BDG3], &n3)); in PetscWeakFormHasBdJacobian()
687 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_BDG0], label, val, find, part, n0… in PetscWeakFormGetBdJacobian()
688 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_BDG1], label, val, find, part, n1… in PetscWeakFormGetBdJacobian()
689 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_BDG2], label, val, find, part, n2… in PetscWeakFormGetBdJacobian()
690 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_BDG3], label, val, find, part, n3… in PetscWeakFormGetBdJacobian()
699 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_BDG0], label, val, find, part, (P… in PetscWeakFormAddBdJacobian()
700 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_BDG1], label, val, find, part, (P… in PetscWeakFormAddBdJacobian()
701 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_BDG2], label, val, find, part, (P… in PetscWeakFormAddBdJacobian()
702 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_BDG3], label, val, find, part, (P… in PetscWeakFormAddBdJacobian()
711 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_BDG0], label, val, find, part, n0… in PetscWeakFormSetBdJacobian()
712 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_BDG1], label, val, find, part, n1… in PetscWeakFormSetBdJacobian()
713 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_BDG2], label, val, find, part, n2… in PetscWeakFormSetBdJacobian()
714 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_BDG3], label, val, find, part, n3… in PetscWeakFormSetBdJacobian()
723 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_BDG0], label, val, find, par… in PetscWeakFormSetIndexBdJacobian()
724 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_BDG1], label, val, find, par… in PetscWeakFormSetIndexBdJacobian()
725 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_BDG2], label, val, find, par… in PetscWeakFormSetIndexBdJacobian()
726 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_BDG3], label, val, find, par… in PetscWeakFormSetIndexBdJacobian()
737 PetscCall(PetscHMapFormGetSize(wf->form[PETSC_WF_BDGP0], &n0)); in PetscWeakFormHasBdJacobianPreconditioner()
738 PetscCall(PetscHMapFormGetSize(wf->form[PETSC_WF_BDGP1], &n1)); in PetscWeakFormHasBdJacobianPreconditioner()
739 PetscCall(PetscHMapFormGetSize(wf->form[PETSC_WF_BDGP2], &n2)); in PetscWeakFormHasBdJacobianPreconditioner()
740 PetscCall(PetscHMapFormGetSize(wf->form[PETSC_WF_BDGP3], &n3)); in PetscWeakFormHasBdJacobianPreconditioner()
750 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_BDGP0], label, val, find, part, n… in PetscWeakFormGetBdJacobianPreconditioner()
751 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_BDGP1], label, val, find, part, n… in PetscWeakFormGetBdJacobianPreconditioner()
752 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_BDGP2], label, val, find, part, n… in PetscWeakFormGetBdJacobianPreconditioner()
753 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_BDGP3], label, val, find, part, n… in PetscWeakFormGetBdJacobianPreconditioner()
762 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_BDGP0], label, val, find, part, (… in PetscWeakFormAddBdJacobianPreconditioner()
763 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_BDGP1], label, val, find, part, (… in PetscWeakFormAddBdJacobianPreconditioner()
764 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_BDGP2], label, val, find, part, (… in PetscWeakFormAddBdJacobianPreconditioner()
765 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_BDGP3], label, val, find, part, (… in PetscWeakFormAddBdJacobianPreconditioner()
774 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_BDGP0], label, val, find, part, n… in PetscWeakFormSetBdJacobianPreconditioner()
775 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_BDGP1], label, val, find, part, n… in PetscWeakFormSetBdJacobianPreconditioner()
776 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_BDGP2], label, val, find, part, n… in PetscWeakFormSetBdJacobianPreconditioner()
777 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_BDGP3], label, val, find, part, n… in PetscWeakFormSetBdJacobianPreconditioner()
786 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_BDGP0], label, val, find, pa… in PetscWeakFormSetIndexBdJacobianPreconditioner()
787 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_BDGP1], label, val, find, pa… in PetscWeakFormSetIndexBdJacobianPreconditioner()
788 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_BDGP2], label, val, find, pa… in PetscWeakFormSetIndexBdJacobianPreconditioner()
789 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_BDGP3], label, val, find, pa… in PetscWeakFormSetIndexBdJacobianPreconditioner()
800 PetscCall(PetscHMapFormGetSize(wf->form[PETSC_WF_GT0], &n0)); in PetscWeakFormHasDynamicJacobian()
801 PetscCall(PetscHMapFormGetSize(wf->form[PETSC_WF_GT1], &n1)); in PetscWeakFormHasDynamicJacobian()
802 PetscCall(PetscHMapFormGetSize(wf->form[PETSC_WF_GT2], &n2)); in PetscWeakFormHasDynamicJacobian()
803 PetscCall(PetscHMapFormGetSize(wf->form[PETSC_WF_GT3], &n3)); in PetscWeakFormHasDynamicJacobian()
813 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_GT0], label, val, find, part, n0,… in PetscWeakFormGetDynamicJacobian()
814 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_GT1], label, val, find, part, n1,… in PetscWeakFormGetDynamicJacobian()
815 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_GT2], label, val, find, part, n2,… in PetscWeakFormGetDynamicJacobian()
816 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_GT3], label, val, find, part, n3,… in PetscWeakFormGetDynamicJacobian()
825 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_GT0], label, val, find, part, (Pe… in PetscWeakFormAddDynamicJacobian()
826 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_GT1], label, val, find, part, (Pe… in PetscWeakFormAddDynamicJacobian()
827 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_GT2], label, val, find, part, (Pe… in PetscWeakFormAddDynamicJacobian()
828 …PetscCall(PetscWeakFormAddFunction_Private(wf, wf->form[PETSC_WF_GT3], label, val, find, part, (Pe… in PetscWeakFormAddDynamicJacobian()
837 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_GT0], label, val, find, part, n0,… in PetscWeakFormSetDynamicJacobian()
838 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_GT1], label, val, find, part, n1,… in PetscWeakFormSetDynamicJacobian()
839 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_GT2], label, val, find, part, n2,… in PetscWeakFormSetDynamicJacobian()
840 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_GT3], label, val, find, part, n3,… in PetscWeakFormSetDynamicJacobian()
849 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_GT0], label, val, find, part… in PetscWeakFormSetIndexDynamicJacobian()
850 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_GT1], label, val, find, part… in PetscWeakFormSetIndexDynamicJacobian()
851 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_GT2], label, val, find, part… in PetscWeakFormSetIndexDynamicJacobian()
852 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_GT3], label, val, find, part… in PetscWeakFormSetIndexDynamicJacobian()
859 …PetscCall(PetscWeakFormGetFunction_Private(wf, wf->form[PETSC_WF_R], label, val, f, part, n, (void… in PetscWeakFormGetRiemannSolver()
866 …PetscCall(PetscWeakFormSetFunction_Private(wf, wf->form[PETSC_WF_R], label, val, f, part, n, (Pets… in PetscWeakFormSetRiemannSolver()
873 …PetscCall(PetscWeakFormSetIndexFunction_Private(wf, wf->form[PETSC_WF_R], label, val, f, part, i, … in PetscWeakFormSetIndexRiemannSolver()
948 for (f = 0; f < PETSC_NUM_WF; ++f) PetscCall(PetscHMapFormDestroy(&(*wf)->form[f])); in PetscWeakFormDestroy()
949 PetscCall(PetscFree((*wf)->form)); in PetscWeakFormDestroy()
1053 …etscCall(PetscWeakFormViewTable_Ascii(wf, viewer, PETSC_TRUE, PetscWeakFormKinds[f], wf->form[f])); in PetscWeakFormView_Ascii()
1112 PetscCall(PetscMalloc1(PETSC_NUM_WF, &p->form)); in PetscWeakFormCreate()
1113 for (f = 0; f < PETSC_NUM_WF; ++f) PetscCall(PetscHMapFormCreate(&p->form[f])); in PetscWeakFormCreate()