Manual Reference Pages  - asin (3fortran)

NAME

ASIN(3) - [MATHEMATICS:TRIGONOMETRIC] Arcsine function

SYNOPSIS

result = asin(x)

         elemental TYPE(kind=KIND) function asin(x)

TYPE(kind=KIND) :: x

CHARACTERISTICS

o TYPE may be real or complex
o KIND may be any kind supported by the associated type.
o The returned value will be of the same type and kind as the argument.

DESCRIPTION

ASIN(3) computes the arcsine of its argument X.

The arcsine is the inverse function of the sine function. It is commonly used in trigonometry when trying to find the angle when the lengths of the hypotenuse and the opposite side of a right triangle are known.

OPTIONS

o X : The value to compute the arcsine of : The type shall be either real and a magnitude that is less than or equal to one; or be complex.

RESULT

The result has a value equal to a processor-dependent approximation to arcsin(x).

If X is real the result is real and it is expressed in radians and lies in the range

            PI/2 <= ASIN (X) <= PI/2.

If the argument (and therefore the result) is imaginary the real part of the result is in radians and lies in the range

        -PI/2 <= real(asin(x)) <= PI/2

EXAMPLES

The arcsine will allow you to find the measure of a right angle when you know the ratio of the side opposite the angle to the hypotenuse.

So if you knew that a train track rose 1.25 vertical miles on a track that was 50 miles long, you could determine the average angle of incline of the track using the arcsine. Given

     sin(theta) = 1.25 miles/50 miles (opposite/hypotenuse)

Sample program:

    program demo_asin
    use, intrinsic :: iso_fortran_env, only : dp=>real64
    implicit none
    ! value to convert degrees to radians
    real(kind=dp),parameter :: D2R=acos(-1.0_dp)/180.0_dp
    real(kind=dp)           :: angle, rise, run
    character(len=*),parameter :: all=’(*(g0,1x))’
      ! given sine(theta) = 1.25 miles/50 miles (opposite/hypotenuse)
      ! then taking the arcsine of both sides of the equality yields
      ! theta = arcsine(1.25 miles/50 miles) ie. arcsine(opposite/hypotenuse)
      rise=1.250_dp
      run=50.00_dp
      angle = asin(rise/run)
      print all, ’angle of incline(radians) = ’, angle
      angle = angle/D2R
      print all, ’angle of incline(degrees) = ’, angle

print all, ’percent grade=’,rise/run*100.0_dp end program demo_asin

Results:

        angle of incline(radians) =    2.5002604899361139E-002
        angle of incline(degrees) =    1.4325437375665075
        percent grade=   2.5000000000000000

The percentage grade is the slope, written as a percent. To calculate the slope you divide the rise by the run. In the example the rise is 1.25 mile over a run of 50 miles so the slope is 1.25/50 = 0.025. Written as a percent this is 2.5 %.

For the US, two and 1/2 percent is generally thought of as the upper limit. This means a rise of 2.5 feet when going 100 feet forward. In the US this was the maximum grade on the first major US railroad, the Baltimore and Ohio. Note curves increase the frictional drag on a train reducing the allowable grade.

STANDARD

FORTRAN 77 , for a complex argument Fortran 2008

SEE ALSO

Inverse function: SIN(3)

RESOURCES

o wikipedia: inverse trigonometric functions
fortran-lang intrinsic descriptions (license: MIT) @urbanjost


Nemo Release 3.1 asin (3fortran) April 28, 2024
Generated by manServer 1.08 from 76095323-2290-41f5-a67d-06ceac460128 using man macros.