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
|