what's the ifc corresponding argument for -bp in absoft f90

From: Shi Jin (jinzishuai_at_hotmail.com)
Date: 10/20/03


Date: Mon, 20 Oct 2003 14:01:07 -0400

Hi there,

We are having some problem porting our fortran 90 code from absoft f90
compiler to intel ifc compiler .
Both are on the same platform: Intel + Linux

To demostrate the problem, let's look at the follwoing code:
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
program ifctest
real*8::x
real::y

x=1.0d0
y=1.0
print *,dsin(x),dsin(y)

end program
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
The problem is dsin(y) where y is a single precision floating point while
the expected argument of dsin is a double precision.
Basically this is the code's problem.
But we have a way to overcome this problem under absoft f90 compiler --
using the -dp option. Here is the description from the man page:
 -dp Causes variables declared in a DOUBLE PRECISION or DOUBLE
              COMPLEX statement and constants specified with the D expo-
              nent character to be converted to the default real kind.

This works!

But for the intel ifc compiler for linux, we are having trouble finding out
what's the corresponding switch .
Could anybody help us out here?

Thank you very much.

Shi Jin