Lahey/Fujitsu Fortran

DPROD Function

Description

The DPROD function returns a double precision REAL product, given two single precision REAL arguments.

Syntax

DPROD (x, y)

Arguments

x is an INTENT(IN) scalar or array of type default REAL.

y is INTENT(IN) and scalar if x is a scalar, or an array if x is an array. y is of type default REAL.

Result

The result is of type double-precision REAL. Its value is an approximation of the double-precision product of x and y.

Example

real :: x.1.25,y=1.25 write(*,*) x.y,dprod(x,y) ! writes 1.56250000000000