function bar(a,b)
      integer a,b,bar
      bar = a + b
      end