Next: ALARM, Previous: AIMAG, Up: Intrinsic Procedures
AINT — Truncate to a whole numberAINT(X [, KIND]) truncates its argument to a whole number.
RESULT = AINT(X [, KIND])
| X | The type of the argument shall be REAL(*).
|
| KIND | (Optional) An INTEGER(*) initialization
expression indicating the kind parameter of
the result.
|
AINT(X) returns zero. If the
magnitude is equal to or greater than one, then it returns the largest
whole number that does not exceed its magnitude. The sign is the same
as the sign of X.
program test_aint
real(4) x4
real(8) x8
x4 = 1.234E0_4
x8 = 4.321_8
print *, aint(x4), dint(x8)
x8 = aint(x4,8)
end program test_aint
| Name | Argument | Return type | Standard
|
DINT(X) | REAL(8) X | REAL(8) | F77 and later
|