AINT(3F) AINT(3F)
aint, dint, qint, iint, jint, iidint, jidint, iiqint, jiqint, kiqint -
FORTRAN integer part intrinsic function
real r1, r2
double precision dp1, dp2
real*16 qp1, qp2
real*4 r3
real*8 dp3
real*16 qp3
integer*2 ii
integer*4 ji
r2 = aint(r1)
dp2 = dint(dp1)
qp2 = qint(qp1)
ii = iint(r3)
ji = jint(r3)
ii = iidint(dp3)
ji = jidint(dp3)
ii = iiqint(qp3)
ji = jiqint(qp3)
ki = kiqint(qp3)
aint returns the truncated value of its real argument in a real. dint
returns the truncated value of its double-precision argument as a
double-precision value. qint returns the truncated value of its real*16
argument as a real*16 value. iint returns the truncated value of its
real*4 argument in a integer*2. jint returns the truncated value of its
real*4 argument in a integer*4. iidint returns the truncated value of
its real*8 argument in a integer*2. jidint returns the truncated value
of its real*8 argument in a integer*4. iiqint returns the truncated
value of its real*16 argument in a integer*2. jiqint returns the
truncated value of its real*16 argument in a integer*4. kiqint returns
the truncated value of its real*16 argument in a integer*8.
PPPPaaaaggggeeee 1111 [ Back ]
|