`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)
인자
X—INTEGER또는REAL타입.Y—X와 같은 타입·종류여야 해요. (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 이상