`DPROD` — 배정밀도 곱(Double product)

DPROD — 배정밀도 곱(Double product)

두 단정밀도 실수의 곱을 구하되, 중간 계산에서 정밀도를 잃지 않도록 결과를 배정밀도로 받고 싶을 때가 있어요. DPROD(X, Y)는 두 실수를 곱해 배정밀도 실수(REAL(8))로 돌려주는 내장 함수예요.

출처: gfortran — DPROD

본문

시그니처

RESULT = DPROD(X, Y)

설명

DPROD(X, Y)X * Y의 곱을 반환해요.

클래스

원소 함수(Elemental function)

인자

  • XREAL 타입.
  • YREAL 타입.

반환값

반환값의 타입은 REAL(8)이에요.

예제

program test_dprod
    real :: x = 5.2
    real :: y = 2.3
    real(8) :: d
    d = dprod(x,y)
    print *, d
end program test_dprod

두 단정밀도 실수를 곱해 배정밀도 변수 d에 담는 예시예요. 곱셈이 배정밀도로 이뤄져 정밀도가 보존돼요.

특정 이름 (Specific names)

이름 인자 반환 타입 표준
DPROD(X,Y) REAL(4) X, Y REAL(8) Fortran 77 이상

표준

Fortran 77 이상