Searched refs:ROUND_VALUE (Results 1 - 2 of 2) sorted by relevance

/netbsd-current/external/gpl3/gcc/dist/libgfortran/ieee/
H A Dieee_arithmetic.F90981 subroutine IEEE_GET_ROUNDING_MODE (ROUND_VALUE)
983 type(IEEE_ROUND_TYPE), intent(out) :: ROUND_VALUE local in subroutine:IEEE_GET_ROUNDING_MODE
991 ROUND_VALUE = IEEE_ROUND_TYPE(helper())
997 subroutine IEEE_SET_ROUNDING_MODE (ROUND_VALUE)
999 type(IEEE_ROUND_TYPE), intent(in) :: ROUND_VALUE local in subroutine:IEEE_SET_ROUNDING_MODE
1008 call helper(ROUND_VALUE%hidden)
1046 pure logical function IEEE_SUPPORT_ROUNDING_4 (ROUND_VALUE, X) result(res)
1049 type(IEEE_ROUND_TYPE), intent(in) :: ROUND_VALUE local in function:IEEE_SUPPORT_ROUNDING_4
1050 res = (support_rounding_helper(ROUND_VALUE%hidden) /= 0)
1053 pure logical function IEEE_SUPPORT_ROUNDING_8 (ROUND_VALUE,
1056 type(IEEE_ROUND_TYPE), intent(in) :: ROUND_VALUE local in function:IEEE_SUPPORT_ROUNDING_8
1064 type(IEEE_ROUND_TYPE), intent(in) :: ROUND_VALUE local in function:IEEE_SUPPORT_ROUNDING_10
1073 type(IEEE_ROUND_TYPE), intent(in) :: ROUND_VALUE local in function:IEEE_SUPPORT_ROUNDING_16
1080 type(IEEE_ROUND_TYPE), intent(in) :: ROUND_VALUE local in function:IEEE_SUPPORT_ROUNDING_NOARG
[all...]
/netbsd-current/external/gpl3/gcc.old/dist/libgfortran/ieee/
H A Dieee_arithmetic.F901193 subroutine IEEE_GET_ROUNDING_MODE (ROUND_VALUE)
1195 type(IEEE_ROUND_TYPE), intent(out) :: ROUND_VALUE local in subroutine:IEEE_GET_ROUNDING_MODE
1203 ROUND_VALUE = IEEE_ROUND_TYPE(helper())
1209 subroutine IEEE_SET_ROUNDING_MODE (ROUND_VALUE)
1211 type(IEEE_ROUND_TYPE), intent(in) :: ROUND_VALUE local in subroutine:IEEE_SET_ROUNDING_MODE
1220 call helper(ROUND_VALUE%hidden)
1258 pure logical function IEEE_SUPPORT_ROUNDING_4 (ROUND_VALUE, X) result(res)
1261 type(IEEE_ROUND_TYPE), intent(in) :: ROUND_VALUE local in function:IEEE_SUPPORT_ROUNDING_4
1262 res = (support_rounding_helper(ROUND_VALUE%hidden) /= 0)
1265 pure logical function IEEE_SUPPORT_ROUNDING_8 (ROUND_VALUE,
1268 type(IEEE_ROUND_TYPE), intent(in) :: ROUND_VALUE local in function:IEEE_SUPPORT_ROUNDING_8
1276 type(IEEE_ROUND_TYPE), intent(in) :: ROUND_VALUE local in function:IEEE_SUPPORT_ROUNDING_10
1285 type(IEEE_ROUND_TYPE), intent(in) :: ROUND_VALUE local in function:IEEE_SUPPORT_ROUNDING_16
1292 type(IEEE_ROUND_TYPE), intent(in) :: ROUND_VALUE local in function:IEEE_SUPPORT_ROUNDING_NOARG
[all...]

Completed in 186 milliseconds