Skip to main content

9.3) Example Of A Function Call


Here is an example of a program that uses intrinsic sin(x) and sqrt(x) functions in more complicated calculations.

       program example14
       integer :: i, j     ! use a comma to declare more variables.
       x=3.14159
       x=x*0.1
       y=2*sin(x)+10.0
       y=sqrt(y)
       print *, ‘The result is ‘,y
       end program example14

Example of intrinsic functions in a program. The functions are on lines 5 and 6.