[petsc-dev] Checking for PETSc Cuda Support

[Jed Brown]

On Mon, Mar 19, 2012 at 22:15, Dave Nystrom
<Dave.Nystrom at tachyonlogic.com>wrote:

> OK.  I was thinking of a function but that should work.


subroutine does_petsc_have_cuda(does)
logical :: does
does = .false.
#ifdef PETSC_HAVE_CUDA
does = .true.
#endif
end subroutine
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.mcs.anl.gov/pipermail/petsc-dev/attachments/20120319/67324acc/attachment.html>