program exercise_program1

  ! Functions and subroutines

  use exercise_module1
  implicit none

  print *, "pi: ", pi_gauss_legendre()

end program exercise_program1
