timef() - typing woes

[mkbane]

I thought timef() was meant to be declared as REAL(4) but when I run an example with this typing on a Nehalem machine it returns zero on every call (changing to DOUBLE PRECISION I do get the expected results)

[Steven_L_Intel1]

The manual is wrong - REAL(8) is the correct type. Or, add USE IFPORT. I'll let the writers know.

[Ron_Green]

Quoting - Steve Lionel (Intel)

The manual is wrong - REAL(8) is the correct type. Or, add USE IFPORT. I'll let the writers know.

Yes, it's interesting that they got the example correct in the docs for TIMEF:

USE IFPORT

INTEGER i, j

REAL(8) elapsed_time

elapsed_time = TIMEF( )

DO i = 1, 1000000000

j = j + 1

END DO

elapsed_time = TIMEF( )

PRINT *, elapsed_time

END