9.238. SIGN
9.238 SIGN — Sign copying function
- Description:
-
SIGN(A,B)
returns the value of A with the sign of B. - Standard:
- Fortran 77 and later
- Class:
- Elemental function
- Syntax:
-
RESULT = SIGN(A, B)
- Arguments:
-
A Shall be of type INTEGER
orREAL
B Shall be of the same type and kind as A - Return value:
- The kind of the return value is that of A and B. If B\ge 0 then the result is
ABS(A)
, else it is-ABS(A)
. - Example:
-
program test_sign print *, sign(-12,1) print *, sign(-12,0) print *, si