[Date Index] [Thread Index] [Author Index]

Crinkled Hyperbola (ContourPlot in Manipulate)

• To: mathgroup at smc.vnet.net
• Subject: [mg77822] Crinkled Hyperbola (ContourPlot in Manipulate)
• From: Bruce Colletti <vze269bv at verizon.net>
• Date: Sun, 17 Jun 2007 06:18:41 -0400 (EDT)

Re Mathematica 6.0 under WinXP.

As the slider moves, a point glides along the hyperbola:  

Manipulate[ContourPlot[x^2-y^2==1,{x,-3,3},{y,-3,3},Epilog->{
PointSize at 0.02,Point@{Cosh@h,Sinh@h}}],
{h,-1.5,1.5}]

However, the moving point crinkles the plot, which restores itself when the mouse button is released.

What causes the crinkling (this seems tied to ContourPlot, since no crinkling occurs when I use Plot[Sqrt[x^2-1],...])?

Thankx.

Bruce

• Follow-Ups:
  • Re: Crinkled Hyperbola (ContourPlot in Manipulate)
    • From: Carl Woll <carlw@wolfram.com>