function
   
petsc-3.4.2 2013-07-02
[flg,err] = PetscSNESComputeJacobianInternal(pidsnes,pidx,pidA,pidB,funcname,ctx) % % Used by SNESComputeJacobian_Matlab() to apply user Matlab Jacobian function % % err = 0; x = PetscVec(pidx,'pobj'); A = PetscMat(pidA,'pobj'); B = PetscMat(pidB,'pobj'); snes = PetscSNES(pidsnes,'pobj'); [flg,err] = feval(funcname,snes,x,A,B,ctx);