`DIM` — 양의 차이(Positive difference)

DIM — 양의 차이(Positive difference)

두 값의 차이를 구하되, 결과가 음수가 되면 0을 돌려주고 싶은 상황이 있어요. DIM(X, Y)X - Y가 양수이면 그 차이를, 아니면 0을 반환하는 내장 함수예요. 감소를 '음수로 안 떨어지게' 제한하고 싶을 때 유용해요.

출처: gfortran — DIM

본문

시그니처

RESULT = DIM(X, Y)

설명

DIM(X, Y)X - Y의 결과가 양수이면 그 차이를, 아니면 0을 반환해요.

클래스

원소 함수(Elemental function)

인자

  • XINTEGER 또는 REAL 타입.
  • YX와 같은 타입·종류여야 해요. (GNU 확장으로 서로 다른 종류의 인자를 허용해요.)

반환값

INTEGER 또는 REAL 타입. (GNU 확장으로, 종류는 실제 인자 중 가장 큰 종류.)

예제

program test_dim
    integer :: i
    real(8) :: x
    i = dim(4, 15)
    x = dim(4.345_8, 2.111_8)
    print *, i
    print *, x
end program test_dim

첫 번째 호출 dim(4, 15)4 - 15가 음수라 0을, 두 번째는 양수라 그 차이를 반환해요.

특정 이름 (Specific names)

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

표준

Fortran 77 이상