function pot = scale_gpot(pot, scale)
% SCALE_GPOT Scale the weight of a Gaussian potential.
% pot = scale_gpot(pot, scale)

if pot.subtype=='c'
  pot.g = pot.g + log(scale);
else
  pot.logp = pot.logp + log(scale);
end
