calculator_main.f (126B)
1 PROGRAM Test 2 use calculator, only: add 3 integer:: result 4 5 call add (2,2,result) 6 END PROGRAM