<div class="gmail_extra">On Mon, Nov 12, 2012 at 8:43 AM, Alexander Grayver <span dir="ltr"><<a href="mailto:agrayver@gfz-potsdam.de" target="_blank">agrayver@gfz-potsdam.de</a>></span> wrote:<br><div class="gmail_quote">
<blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex"><div bgcolor="#FFFFFF" text="#000000">Does it make sense that in fortran one has to call
<span class="">MatCreateMPISBAIJ</span>? <br></div></blockquote><div><br></div><div>No, this was missed in the rename. It's fixed here.</div><div><br></div><div><a href="https://bitbucket.org/petsc/petsc-dev/changeset/cfa58f9da86656f6ddf509089493a99a1d503d6f">https://bitbucket.org/petsc/petsc-dev/changeset/cfa58f9da86656f6ddf509089493a99a1d503d6f</a><br>
</div><div><br></div><div><br></div><div>This should probably be back-ported to 3.3, though it will break an existing Fortran user that forgot to fix that call (or noticed the bug and didn't report it).</div><div><br>
</div><div>The <a href="http://petsc.cs.iit.edu">petsc.cs.iit.edu</a> server is down right now and although we are migrating to bitbucket, we haven't decided how to manage the release repository there yet.</div><div><br>
</div><div><a href="https://bitbucket.org/petsc/petsc-dev/issue/22/backport-bug-fixes-to-33-once-release">https://bitbucket.org/petsc/petsc-dev/issue/22/backport-bug-fixes-to-33-once-release</a><br></div><div> </div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex">
<div bgcolor="#FFFFFF" text="#000000">
<br>
<i>EXTERN_C_BEGIN<br>
void PETSC_STDCALL matcreatempisbaij_(MPI_Comm *comm,PetscInt
*bs,PetscInt *m,PetscInt *n,PetscInt *M,PetscInt *N,<br>
PetscInt *d_nz,PetscInt *d_nnz,PetscInt *o_nz,PetscInt
*o_nnz,<span class="">Mat</span> *newmat,PetscErrorCode *ierr)<br>
{<br>
CHKFORTRANNULLINTEGER(d_nnz);<br>
CHKFORTRANNULLINTEGER(o_nnz);<br>
*ierr = MatCreateSBAIJ(MPI_Comm_f2c(*(MPI_Fint
*)&*comm),*bs,*m,*n,*M,*N,*d_nz,d_nnz,*o_nz,o_nnz,newmat);<br>
}</i></div></blockquote></div><br></div>