gcc/fortran/doc/gfortran/intrinsic-procedures/dprod.rst

   1 ..
   2   Copyright 1988-2022 Free Software Foundation, Inc.
   3   This is part of the GCC manual.
   4   For copying conditions, see the copyright.rst file.
   5
   6 .. _dprod:
   7
   8 .. index:: DPROD
   9
  10 .. index:: product, double-precision
  11
  12 DPROD --- Double product function
  13 *********************************
  14
  15 .. function:: DPROD(X,Y)
  16
  17   ``DPROD(X,Y)`` returns the product ``X*Y``.
  18
  19   :param X:
  20     The type shall be ``REAL``.
  21
  22   :param Y:
  23     The type shall be ``REAL``.
  24
  25   :return:
  26     The return value is of type ``REAL(8)``.
  27
  28   Standard:
  29     Fortran 77 and later
  30
  31   Class:
  32     Elemental function
  33
  34   Syntax:
  35     .. code-block:: fortran
  36
  37       RESULT = DPROD(X, Y)
  38
  39   Example:
  40     .. code-block:: fortran
  41
  42       program test_dprod
  43           real :: x = 5.2
  44           real :: y = 2.3
  45           real(8) :: d
  46           d = dprod(x,y)
  47           print *, d
  48       end program test_dprod
  49
  50   Specific names:
  51     .. list-table::
  52        :header-rows: 1
  53
  54        * - Name
  55          - Argument
  56          - Return type
  57          - Standard
  58
  59        * - ``DPROD(X,Y)``
  60          - ``REAL(4) X, Y``
  61          - ``REAL(8)``
  62          - Fortran 77 and later