Re: [petsc-users] PetscSection: Fortran interfaces

2024-02-03 Thread Martin Diehl
thanks. I open an issue. Martin On Sat, 2024-02-03 at 11:19 -0600, Satish Balay wrote: > diff --git a/src/vec/f90-mod/petscvecmod.F90 b/src/vec/f90- > mod/petscvecmod.F90 > index 4c54fbf63dc..8772f89e135 100644 > --- a/src/vec/f90-mod/petscvecmod.F90 > +++ b/src/vec/f90-mod/petscvecmod.F90 > @@

Re: [petsc-users] PetscSection: Fortran interfaces

2024-02-03 Thread Satish Balay via petsc-users
diff --git a/src/vec/f90-mod/petscvecmod.F90 b/src/vec/f90-mod/petscvecmod.F90 index 4c54fbf63dc..8772f89e135 100644 --- a/src/vec/f90-mod/petscvecmod.F90 +++ b/src/vec/f90-mod/petscvecmod.F90 @@ -163,6 +163,7 @@ #include <../src/vec/f90-mod/petscvec.h90> interface #include

Re: [petsc-users] PetscSection: Fortran interfaces

2024-02-03 Thread Martin Diehl
thanks for the quick reply I think my question was not clear enough: With "interfaces" I ment the Fortran module files that ensure correct calling signatures. In the example (ex26f90), I can replace "ierr" of PetscSectionGetDof with anything without getting complaints from the compiler. This

Re: [petsc-users] PetscSection: Fortran interfaces

2024-02-03 Thread Matthew Knepley
Can you give us a simple code that is not working for you? My test should work src/dm/impls/plex/tests/ex26f90 Thanks, Matt On Sat, Feb 3, 2024 at 11:36 AM Barry Smith wrote: > > The Fortran "stubs" (subroutines) should be in >

Re: [petsc-users] PetscSection: Fortran interfaces

2024-02-03 Thread Barry Smith
The Fortran "stubs" (subroutines) should be in $PETSC_ARCH/src/vec/is/section/interface/ftn-auto/sectionf.c and compiled and linked into the PETSc library. The same tool that builds the interfaces in $PETSC_ARCH/src/vec/f90-mod/ftn-auto-interfaces/petscpetscsection.h90, also builds the

[petsc-users] PetscSection: Fortran interfaces

2024-02-03 Thread Martin Diehl
Dear PETSc team, I currently can't make use of Fortran interfaces for "section". In particular, I can't see how to use PetscSectionGetFieldComponents PetscSectionGetFieldDof PetscSectionGetFieldOffset The