c1f320dc-ba98-487f-97f7-a9a4250f3101 6 4 5 decimal

&[DATE] &[TIME] - &[FILENAME]

x y Φ3 x 2^y 2^+ (2^1 x 3^3 x * y 2^* - (* - : x C 1 x 2^- sqrt ± : 21 sys

t0 1 time :

x map x y Φ3 0 ≡ y solve maple :

junction 0.5625 - 0.5625 - map 1 el + 15 black 15 mat :

x plot x 32 x * + 916 x * + sqrt - (* - sqrt 2 sqrt / x 32 x * + 916 x * + sqrt - (* - sqrt 2 sqrt / - x 32 x * + 916 x * + sqrt + (* - sqrt 2 sqrt / x 32 x * + 916 x * + sqrt + (* - sqrt 2 sqrt / - 41 sys :

x plot x C junction 3 1 sys

Maple  symbolic x q1 x 32 x * + 916 x * + sqrt - (* - sqrt 2 sqrt / : x q2 x 32 x * + 916 x * + sqrt - (* - sqrt 2 sqrt / - : 21 sys

lo 0.56245 - : hi 0.99 : 12 mat

Hi 0.001 - :

find low limit u lo hi lo hi lo - 99 / + (range :

find low limit v lo Hi lo Hi lo - 51 / + (range :

T j 1 u length range rho j el dum u j el y Φ3 y roots at : 11 line for rho 21 line :

u T augment u reverse T - reverse augment v v q2 vectorize augment v reverse v q1 vectorize reverse augment 4 1 sys

Next collect Trifolium

NUMERIC Ω u T augment u reverse T - reverse augment v v q2 vectorize augment v reverse v q1 vectorize reverse augment 41 sys :

Most important . . .

Ω & Eol NUMERIC

]]>

NUMERIC Eol Ω 1 el Ω 2 el Ω 3 el Ω 4 el stack :

===================== Next rotate Trifolium ====================

θ rot θ cos θ sin - θ sin θ cos 22 mat :

θ π 5 / - :

x c 1 x 2^- sqrt ± :

Smath 2D vectors rotation system t Eol Eol θ π 30 / t * + rot * eval :

Animate rotation [60..0] Hub 00.20 red 15 mat : step1 060 range : 21 line

Smath "Wind Mill" project

t Eol x c Hub 3 1 sys Eol x c 2 1 sys

1 time t0 - 65 s *

t Eol x c Hub 31 sys

R 1 : r 1 - 3 / : L 2 r * : 13 mat

start 0 : end 6 π * : 12 mat

Logo t start end start 0.1 + (range : i 1 t rows range Xp i el r L + (r R / t i el * t i el + cos * R r + (r R / t i el * cos * + eval : Yp i el r L + (r R / t i el * t i el + sin * R r + (r R / t i el * sin * + eval : 21 line for Xp Yp augment 31 line :

Δ 0.0625 :

N end start (- Δ / : 301.59

Logo Logo :

t vx r L + (r R / start Δ t * + (* start + Δ t * + cos * R r + (r R / start Δ t * + (* cos * + eval : t vy r L + (r R / start Δ t * + (* start + Δ t * + sin * R r + (r R / start Δ t * + (* sin * + eval : τ 0 N range : Ellipse t vx t vy . 15 red 15 mat : 41 sys

Logo Ellipse 2 1 sys

a 0.5 : b 1 : Φ π : 13 mat

start 2 π * - : end 2 π * : 12 mat

P2 t start end start 0.1 + (range : i 1 t rows range X i el b t i el * a * t i el Φ + cos (2^* eval : Y i el a t i el * b * t i el Φ + sin (2^* eval : 21 line for X Y augment 31 line :

Δ 0.25 :

P2 P2 :

N end start (- Δ / : 50.27

t vx b start Δ t * + (* a * start Δ t * + Φ + cos (2^* eval : t vy a start Δ t * + (* b * start Δ t * + Φ + sin (2^* eval : τ 0 N range : (Mathcad FRAME ≡ Gozilla t vx t vy . 15 red 15 mat : 41 sys

Gozilla testing his birthday ladder

P2 Gozilla 2 1 sys