hyper_test.f90 Source File


Contents

Source Code


Source Code

program test_hyper
    implicit none
    
    real :: x = 4

    print *, "sinh(x) = ", sinh(x)


end program test_hyper