Re: How to simulate the Doppler Effect ?
- To: mathgroup at smc.vnet.net
- Subject: [mg35866] Re: How to simulate the Doppler Effect ?
- From: "Borut L" <gollum at email.si>
- Date: Sun, 4 Aug 2002 06:00:28 -0400 (EDT)
- References: <aifl0t$pua$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Hi Bryan,
Well, if I understand correctly, the point of the Doppler effect is that
velecoties of moving source and travelling wave must not be independent.
Cannot be. The parameter is their ratio, the Mach number.
The following lines generate a still image (mind, of the particular
interpretation)
Module[
{
x2 = 1,
dx = .2,
mach = .9,
},
Show[
Graphics[
{
Circle[{x2 - #, 0}, 1/mach #] & /@ Range[0, x2, dx]
}
]
, AspectRatio -> Automatic
]
]
As for the animation, I would rather engage myself in writing a java applet
then coping uneffectively with Mathematica code.
Bye,
Borut
"bryan" <timreh719 at yahoo.com.tw> wrote in message
news:aifl0t$pua$1 at smc.vnet.net...
> Dear All:
> I want to make an animation that simulate the Doppler Effect, just 2D
> circles travel out one by one, and at the same time,the origin of the
> wave also moves toward one direction. I have no idea to make the speed
> of the wave origin and the speed of traveling wave independent.Is
> anyone has any idea to create the animation ?? Thanks in advance.
> sincerely bryan
>