Does src/vec/is/examples/tests/ex1f.F work for you? That has CHKERRQ.<div><br></div><div> Thanks,</div><div><br></div><div> Matt<br><br><div class="gmail_quote">On Wed, Oct 6, 2010 at 2:35 PM, Gaetan Kenway <span dir="ltr"><<a href="mailto:kenway@utias.utoronto.ca">kenway@utias.utoronto.ca</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;"> Hello<br>
<br>
I use PETSc with fortran. I was wondering if the CHKERRQ(ierr) command is supposed to work in Fortran? My compiler (mpif90 with ifort). If I do something like this:<br>
<br>
call VecCreate(WARP_COMM_WORLD,globalSurfForce,ierr)<br>
CHKERRQ(ierr)<br>
ifort complains there is a syntax error.<br>
<br>
I also tried:<br>
call VecCreate(WARP_COMM_WORLD,globalSurfForce,ierr)<br>
call CHKERRQ(ierr)<br>
<br>
But then it complains that it can't find the chkerrq function while linking.<br>
<br>
I'm using PETSc-3.1-p3 which was compiled with the following options:<br>
<br>
--with-shared --download-superlu_dist=yes --download-spooles=yes --download-parmetis=yes --with-fortran-interfaces=1<br>
<br>
The subroutine includes:<br>
#include "include/finclude/petsc.h"<br>
<br>
Am I missing something obvious?<br><font color="#888888">
<br>
Gaetan<br>
</font></blockquote></div><br><br clear="all"><br>-- <br>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<br>
</div>