

This blog is property of Edward Shore. 2014.
Doppler Effect for Sound in Air
Program DOPPLER
: Input “TEMP IN ⁰F:”, T
: Input “SOURCE FREQ (HZ):”,F
: 331.4+0.6*5/9*(T32)→C
: Disp “VELOCITY”, “(TOWARDS IS NEGATIVE)”
: Input “(MPH):”, S
: S/2.2369→S
: C/(C+S)*F→R
: Disp “SPEED OF SOUND (MPH)”, C*2.2369
: Disp “OBSERVED FREQUENCY”, R
(223 bytes)
Variables:
C = calculated speed of sound in air, stored in m/s
S = speed of observer relative to the source, stored in
m/s. S<0 if the source and observer
are getting closer. S>0 when the
source and observer are moving apart.
F = source frequency, in Hz
R = observed frequency, in Hz
Example:
An observer is moving towards emitting a sound of 261.6 Hz
(Middle C) at about 1.05 mph. Input
velocity as 1.05.
Results:
Speed of Sound:
769.6427267 mph
Observed Frequency: 261.9573804 Hz
Finding the Equation of a Line between Two Points
Enter two points as complex numbers (x+y*i). The complex value i is accessed by pressing
[2^{nd}] [ 3 ]. Direction is important, P is your starting point and Q
is your finishing point.
Program PT2LINE
: a+bi
: Disp “ENTER POINTS AS”,”COMPLEX NUMBERS”,”X+Yi”
: Prompt P, Q
: angle(QP)→S
: If S=90⁰ or S=90⁰
: Then
: Disp “X=”, real(P)
: Else
: imag(P)tan(S)*real(P)→C
: Disp “Y=”,tan(S),”* X +”,C
: End
(143 bytes)
Example 1:
Find an equation for the points, going from (2,5) to (4,6).
Input:
P = 2+5i
Q = 4 + 6i
Output:
Y = 0.5 * X + 4
Example 2:
Find an equation for the points, going from (7,3) to (9,1).
Input:
P = 7+3i
Q = 9i
Output:
Y = 2 * X + 17

Arc Length of a Function
Formula: S = ∫(√(1+f’(x)^2) dx, a, b)
We will use a trick with the function variable to pull this
integral off.
** Caution: This will provide an approximate answer. Best use four to five digits at most.
Note: Enter Y1 by pressing [VARS], [ right ] for YVARS, [ 1
] for Function, [ 1 ] for Y1.
Program ARCLENGT
: Radian
: Disp “INPUT Y1 AS A STRING”
: Prompt Y1, A, B
: fnInt(√(1+nDeriv(Y1,X,X)^2),X,A,B)→S
: Disp “ARC LENGTH:”,S
(91 bytes)
Example: Find the arc
length of the function y = e^(x^2/2) from x = 0 to x = 3.
Input:
Y1: “e^(X^2/2)” (you can leave the second quote out)
A: 0
B: 3
Result:
S: 3.20863 (approximately)

Orbit around the Sun Using Kepler’s Third Law
(using US Units)
The Mass of the Sun is 4.384 x 10^30 pounds.
The universal gravitational constant is:
G = 6.67384 x 10^11 m^3/(s^2*kg) = 7.23243 x 10^6
mi^3/(y^2*lb)
Kepler’s third law is:
P = √((4*π^2*a^3)/(G*(m1 + m2))
Where
a = average radius between the two objects
G = universal gravitational constant
m1 = mass of object 1
m2 = mass of object 2
P = orbit of object 2 around object 1
Letting m1 be the mass of the sun and simplifying in U.S.
units, the periodic orbit simplifies to:
P ≈ √((5458527.439*a^3)/(4.3840 x 10^30 + m2))
** Approximate values
Program KEPLER3
: Disp “ORBIT AROUND THE SUN”
: Input “MASS (POUNDS):”, M
: Input “AVG. RADIUS (MI):”, A
: √((5458527.439*A^3)/(4.384E30+M))→P
: Disp “ORBIT IN YEARS:”,P
(135 bytes)
Examples:
Planet/Celestial Object

Mass (pounds)

Avg. Radius (miles)

Orbit (years)

Earth

1.317E25

92.954E6

1.000009092

Jupiter

4.186E27

483.682E6

11.86410888

Pluto

3.244E22

3.67005E9

248.0906781

Seriously Excellent explanation! In the online casino world, people just mesmerized to bet on live casinos. If you too want to take the pleasure then get the live casino experience with Online live casino malaysia. Grab the 100% sign up offer as welcome bonus.
ReplyDelete