<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
</head>
<body text="#000000" bgcolor="#FFFFFF">
<p>Hi Matt,</p>
<p>Thanks. <br>
</p>
<p>BTW: DmPlexGetVertexNumbering now can work using the latest
develop version. But the index is not in natural ordering when
DMSetUseNatural is called. That's why I want to use
PetscSFDistributeSection to check if I miss anything in the code.</p>
<p>Regards,</p>
<p>Danyang<br>
</p>
<div class="moz-cite-prefix">On 2018-12-03 5:22 a.m., Matthew
Knepley wrote:<br>
</div>
<blockquote type="cite"
cite="mid:CAMYG4Gnpjvx6VXBy43drpHRJY1WQeYwVy+znnmmK5-mA58uSUg@mail.gmail.com">
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<div dir="ltr">I need to write a custom Fortran stub for this one.
I will get it done as soon as possible.
<div><br>
</div>
<div> Thanks,</div>
<div><br>
</div>
<div> Matt</div>
</div>
<br>
<div class="gmail_quote">
<div dir="ltr">On Sat, Dec 1, 2018 at 7:16 PM Danyang Su via
petsc-users <<a href="mailto:petsc-users@mcs.anl.gov"
moz-do-not-send="true">petsc-users@mcs.anl.gov</a>>
wrote:<br>
</div>
<blockquote class="gmail_quote" style="margin:0 0 0
.8ex;border-left:1px #ccc solid;padding-left:1ex">Hi All,<br>
<br>
I got a simple compilation error when use
PetscSFDistributeSection in <br>
Fortran. It looks like the required head files are included
and the <br>
parameters are correctly defined. However, when compile the
code, I got <br>
error undefined reference to `petscsfdistributesection_'. The
code is <br>
shown below. Did I miss anything here?<br>
<br>
#include <petsc/finclude/petscsys.h><br>
#include <petsc/finclude/petscvec.h><br>
#include <petsc/finclude/petscdm.h><br>
#include <petsc/finclude/petscdmplex.h><br>
use petscsys<br>
use petscvec<br>
use petscdm<br>
use petscdmplex<br>
<br>
implicit none<br>
<br>
PetscSection :: section, section_seq<br>
PetscSF :: migrationsf_inv, sf_natural<br>
Vec :: vec_global, vec_natural<br>
PetscErrorCode :: ierr<br>
<br>
...<br>
<br>
call PetscSFDistributeSection(migrationsf_inv,section,
&<br>
PETSC_NULL_INTEGER,section_seq,ierr)<br>
CHKERRQ(ierr)<br>
<br>
<br>
call
PetscSFDistributeSection(migrationsf_inv,section, &<br>
PETSC_NULL_INTEGER,section_seq,ierr)<br>
CHKERRQ(ierr)<br>
<br>
Thanks,<br>
<br>
Danyang<br>
<br>
</blockquote>
</div>
<br clear="all">
<div><br>
</div>
-- <br>
<div dir="ltr" class="gmail_signature"
data-smartmail="gmail_signature">
<div dir="ltr">
<div>
<div dir="ltr">
<div>
<div dir="ltr">
<div>What most experimenters take for granted before
they begin their experiments is infinitely more
interesting than any results to which their
experiments lead.<br>
-- Norbert Wiener</div>
<div><br>
</div>
<div><a href="http://www.cse.buffalo.edu/~knepley/"
target="_blank" moz-do-not-send="true">https://www.cse.buffalo.edu/~knepley/</a><br>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
</blockquote>
</body>
</html>