[petsc-users] Error: Symbol 'petsc_default_real' at (1) has no IMPLICIT type

[TAY wee-beng]

Hi,

When compiling using gnu gfortran, I got the following error msg:

Error: Symbol 'petsc_default_real' at (1) has no IMPLICIT type

My code is :

/module PETSc_solvers//
//
//use set_matrix//
//
//use ibm//
//
//implicit none//
//
//contains//
//
//subroutine semi_momentum_simple_xyz(du,dv,dw)//
//
//!discretise momentum eqn using semi-implicit mtd//
//
//!simple except east,west//
//
//#include "finclude/petsc.h90"//
//
//...//
//
//call 
KSPSetTolerances(ksp_semi_xyz,tol,PETSC_DEFAULT_REAL,PETSC_DEFAULT_REAL,PETSC_DEFAULT_INTEGER,ierr) 
-> error/

There's no problem when using ifort though.

-- 
Thank you

Yours sincerely,

TAY wee-beng

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.mcs.anl.gov/pipermail/petsc-users/attachments/20141030/d060ef5b/attachment.html>