[petsc-dev] TS fortran binding patch

[Jed Brown]

Do you have any tests for this?

There were some duplicate names

+#define tssetifunction_                      tssetifunction
+#define tssetifunction_                      tsgetifunction
+#define tssetijacobian_                      tssetijacobian
+#define tssetijacobian_                      tsgetijacobian

and missing error checking

+void PETSC_STDCALL tsgetijacobian_(TS *ts,Mat *J,Mat *M,int *func,void
**ctx,PetscErrorCode *ierr)
+{
+  *ierr = TSGetIJacobian(*ts,J,M,0,ctx);
+}

which I am fixing up.

On Fri, Aug 17, 2012 at 9:00 AM, Blaise Bourdin <bourdin at lsu.edu> wrote:

> Hi,
>
> The attached trivial patch adds fortran bindings for a few TS functions
> (TSGetIFunction, TSGetRHSFunction, TSGetIJAcobian, TSSetOptiosnPrefix,
> TSAppendOptionsPrefix). Can somebody push it to petsc-3.3 if it makes sense?
>
> Blaise
>
>
> --
> Department of Mathematics and Center for Computation & Technology
> Louisiana State University, Baton Rouge, LA 70803, USA
> Tel. +1 (225) 578 1612, Fax  +1 (225) 578 4276
> http://www.math.lsu.edu/~bourdin
>
>
>
>
>
>
>
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.mcs.anl.gov/pipermail/petsc-dev/attachments/20120817/b06bf2fa/attachment.html>