<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<div dir="ltr">I will have a look. I simply changed PetscSortInt(PetscInt n,PetscInt i[]) to PetscSortInt(PetscInt n,PetscInt *X). Don't know why it caused that.<br>
<div>
<div dir="ltr" class="m_5315343978550735886gmail_signature" data-smartmail="gmail_signature">
<div dir="ltr">--Junchao Zhang</div>
</div>
</div>
<br>
</div>
<br>
<div class="gmail_quote">
<div dir="ltr" class="gmail_attr">On Mon, Jul 29, 2019 at 10:14 AM Fabian.Jakub via petsc-dev <<a href="mailto:petsc-dev@mcs.anl.gov" target="_blank">petsc-dev@mcs.anl.gov</a>> wrote:<br>
</div>
<blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">
Dear Petsc,<br>
<br>
Commit 051fd8986cf23c0556f4229193defe128fafa1f7 changed the C signature<br>
of the sorting routines and as a result I cannot compile against them<br>
anymore from Fortran.<br>
I tried to rebuild Petsc from scratch and did a make allfortranstubs but<br>
still to no avail.<br>
<br>
I attach a simple fortran program that calls PetscSortInt and gives the<br>
following error at compile time.<br>
<br>
<br>
<br>
<br>
petsc_fortran_sort.F90:15:27:<br>
<br>
call PetscSortInt(N, x, ierr)<br>
1<br>
Error: Rank mismatch in argument ‘b’ at (1) (scalar and rank-1)<br>
<br>
Same applies for other routines such as PetscSortIntWithArrayPair...<br>
<br>
I am not sure where to find the FortranInterfaces and currently had no<br>
time to dig deeper.<br>
<br>
Please let me know if I have missed something stupid.<br>
<br>
Many thanks,<br>
<br>
Fabian<br>
<br>
<br>
P.S. Petsc was compiled with<br>
--with-fortran<br>
--with-fortran-interfaces<br>
--with-shared-libraries=1<br>
</blockquote>
</div>
</body>
</html>