Source: https://pages.mtu.edu/~shene/COURSES/cs201/NOTES/F90-Subprograms.pdf