<html><head><meta http-equiv="content-type" content="text/html; charset=us-ascii"></head><body style="overflow-wrap: break-word; -webkit-nbsp-mode: space; line-break: after-white-space;"><div><br></div> These beasts should be PetscInt, not real<div><br></div><div> real :: ufields(2), pfields(1)</div><div><br></div><div><br></div><div> Side note. We do not recommend using options like <b>-fdefault-real-8 </b>because the compiler may change values in surprising ways. You can use PetscReal to declare real numbers and this will automatically match with single or double precision based on the PETSc configure options.</div><div><br></div><div> What version of PETSc are you using? We don't have Fortran stubs for the calls to PCFieldSplitSetFields in the latest release. I should add them.</div><div><br></div><div><br><div><br><blockquote type="cite"><div>On Nov 9, 2022, at 12:00 PM, Edoardo alinovi <edoardo.alinovi@gmail.com> wrote:</div><br class="Apple-interchange-newline"><div><div dir="ltr">Hi Matt,<div><br></div><div>it took a bit more than 1s, but I can reproduce the error in the attached file.</div><div><br></div><div>To compile:</div><div><b>mpifort -L$PETSC_DIR/$PETSC_ARCH/lib -lpetsc -fdefault-real-8 -o test test.F90 -I$PETSC_DIR/include -I$PETSC_DIR/$PETSC_ARCH/include</b><br></div><div><b><br></b></div><div>Please run it in serial as I have hardcoded some dimensions to code this up faster.</div><div><br></div><div>Thank you!</div></div>
<span id="cid:f_la9vxzcy0"><test.F90></span></div></blockquote></div><br></div></body></html>