mirror of
https://github.com/ivabus/pantry
synced 2024-11-29 11:45:07 +03:00
6 lines
142 B
Fortran
6 lines
142 B
Fortran
|
! example.f90
|
||
|
|
subroutine add_numbers(a, b, c)
|
||
|
|
real, intent(in) :: a, b
|
||
|
|
real, intent(out) :: c
|
||
|
|
c = a + b
|
||
|
|
end subroutine add_numbers
|