Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ! gfortran temperature_module.f90 10.f90
- ! ./a.out
- program main
- use temperature_module, ONLY : celsius2farenheit, celsius2kelvin
- implicit none
- real :: c
- write (*, *) 'Insert Temperature in Celsius: '
- read (*, *) c
- print *, celsius2farenheit(c)
- print *, celsius2kelvin(c)
- end program main
Add Comment
Please, Sign In to add comment