function test3(a As byte) as string 'testinc.bas
   print "inside test3 ";@a
   return "Coming from test3"+Str(a*2)
end Function