Fortran Wiki
scale

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

Description

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

Standard

Fortran 95 and later

Class

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

See also

radix

Revised on March 13, 2010 00:09:28 by Jason Blevins (75.178.9.182) (634 characters / 0.0 pages)

Edit | Back in time (2 revisions) | See changes | History | Views: Print | TeX | Source | Linked from: Intrinsic procedures, radix