mirror of
https://github.com/ivabus/pantry
synced 2024-09-20 08:40:50 +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
|