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 |