Fortran Wiki
fraction (changes)

Skip the Navigation Links | Home Page | All Pages | Recently Revised | Authors | Feeds | Export |

Showing changes from revision #1 to #2: (追記) Added (追記ここまで) | (削除) Removed (削除ここまで) | (削除) Chan (削除ここまで)(追記) ged (追記ここまで)

Description

fraction(x) returns the fractional part of the model representation of x.

Standard

(削除) Fortran 95 and later (削除ここまで)(追記) Fortran 95 (追記ここまで)(追記) and later (追記ここまで)

Class

(削除) Elemental function (削除ここまで)(追記) Elemental function (追記ここまで)

Syntax

y = fraction(x)

Arguments

• x - The type of the argument shall be a real.

Return value

The return value is of the same type and kind as the argument. The fractional part of the model representation of x is returned; it is x * radix(x)**(-exponent(x)).

Example

program test_fraction
 real :: x
 x = 178.1387e-4
 print *, fraction(x), x * radix(x)**(-exponent(x))
end program test_fraction

Revised on April 30, 2009 22:46:50 by Jason Blevins (71.70.142.190) (679 characters / 0.0 pages)

Edit | Back in time (1 revision) | Hide changes | History | Views: Print | TeX | Source | Linked from: Intrinsic procedures