Function g4peak(w,x)
  Wave w; Variable x

  Variable a0,a1,a2,a3,x0,x1,x2,x3,sig0,sig1,sig2,sig3
   Variable g1,g2,g3,g4

   a0 = w[0]
   x0 = w[1]
   sig0 = w[2]
   a1 = w[3]
   x1 = w[4]
   sig1 = w[5]
   a2 = w[6]
   x2 = w[7]
   sig2 = w[8]
   a3 = w[9]
   x3 = w[10]
   sig3 = w[11]
   g1 = (a0)/(sqrt(2.*3.14159)*sig0)*exp(-(x-x0)^2/(2*sig0^2))
   g2 = (a1)/(sqrt(2.*3.14159)*sig1)*exp(-(x-x1)^2/(2*sig1^2))
   g3= (a2)/(sqrt(2.*3.14159)*sig2)*exp(-(x-x2)^2/(2*sig2^2))
   g4= (a3)/(sqrt(2.*3.14159)*sig3)*exp(-(x-x3)^2/(2*sig3^2))
   return g1+g2+g3+g4
End