[petsc-users] Calling DMCompositeCreate() in Fortran

[Bay, Yong Yi]

Hi,

I noticed that DMCompositeCreate() does not exist in fortran format. What would 
be the best way to call this function if my code is written in Fortran? I tried 
using iso_c_binding as follows and it compiles but crashes on execution.

interface
    subroutine DMCompositeCreate(comm, dm) bind(C,name="DMCompositeCreate")
         import
         integer(c_int), value      :: comm
         integer(c_long), value   :: dm
    end subroutine DMCompositeCreate
end interface