function addtest3(&a,b)
  a = a + 2*b