function value = theron_1000 ( n )
  value = theron ( n ) - 1000.0;
  return
end
