`EXPONENT` — 지수 함수

부동소수점 실수를 가수 부분과 지수 부분으로 나눴을 때, 그 지수 부분만 뽑아야 할 때가 있어요. 그 역할을 하는 내장 함수가 EXPONENT예요.

출처: The GNU Fortran Compiler — EXPONENT (Exponent function)

본문

RESULT = EXPONENT(X)

EXPONENT(X)는 X의 지수 부분 값을 돌려줘요. X가 0이면 0을 돌려줘요.

Elemental function (원소별 함수)

반환값은 기본 kind의 INTEGER 타입이에요.

program test_exponent
  real :: x = 1.0
  integer :: i
  i = exponent(x)
  print *, i
  print *, exponent(0.0)
end program test_exponent

Fortran 90 이후.