dd36655a-0c80-4b18-bd67-0e3559531f45 10 3 5 decimal

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

M Unwrap V M 1 col : i 2 M cols range V V M i col stack eval : for V 31 line :

L H N xd U 0 : dx H L - N / : i 1 N 1 + (range U i el L dx - (dx i * + : for U 41 line :

N 100 ≡ (7 min ≡

N 100 : p 02 π * N xd : q 1 - 1 N xd : 31 line

t0 1 time :

X i 1 N range j 1 N range mx i j el 1 q j el 2 / (p i el 2 / cos * + (p i el cos * eval : for for mx 21 line :

Y i 1 N range j 1 N range my i j el 1 q j el 2 / (p i el 2 / cos * + (p i el sin * eval : for for my 21 line :

Z i 1 N range j 1 N range mz i j el p i el 2 / (p i el 2 / sin * eval : for for mz 21 line :

xyz X Unwrap Y Unwrap Z Unwrap augment eval :

1 time t0 - min 7.2

a Ω1 1000 a cos a sin - 0 a sin a cos 33 mat :

Матрица преобразования для поворота вокруг оси y b Ω2 b cos 0 b sin 010 b sin - 0 b cos 33 mat :

Матрица преобразования для поворота вокруг оси z c Ω3 c cos c sin - 0 c sin c cos 000133 mat :

α 0 (° * :

β 30 ° * :

φ 30 ° * :

γ α Ω1 β Ω2 * φ Ω3 * eval : 0.7500 0.4330 - 0.5000 0.5000 0.8660 0.0000 0.4330 - 0.2500 0.8660 33 mat

zoom 8 :

xyz γ * zoom *

Mobius 5 petals [Mathcad 11]