waf

calculator.f (278B)

---

         module calculator
           implicit none
         contains
           subroutine add (a, b, output)
             integer, intent (in) :: a, b
             integer, intent (out) :: output
             output = a + b
           end subroutine add
         end module calculator