Fortran Wiki
scale (Rev #2, 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

scale(x,i) returns x * radix(x)**i.

Standard

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

Class

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

Syntax

result = scale(x, i)

Arguments

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

Return value

The return value is of the same type and kind as x. Its value is x * radix(x)**i.

Example

program test_scale
 real :: x = 178.1387e-4
 integer :: i = 5
 print *, scale(x,i), x*radix(x)**i
end program test_scale

Revision from April 30, 2009 19:37:43 by Jason Blevins

Forward in time (to current) | Back in time (1 more) | See current | Hide changes | History | Rollback | View: Source | Linked from: Intrinsic procedures, radix