⠀

∣❁∣◇⯏∣⑄∣⯏◇∣❁∣/Ⱉ𑽇ⵙ✢𐫱🝊✸Ⓞ⯏Ⓞ✸🝊𐫱✢ⵙ𑽇Ⱉ/ꖅ⦻⛋🟏✢𖥠Ⓞ𖧷Ⓞ𖥠✢🟏⛋⦻ꖅ/𖧷✻⦻Ⓞ🟏⊞✢⛋✸⛋✢⊞🟏Ⓞ⦻✻𖧷/𖢌⛋◇✢⛋✸⛋✢◇⛋𖢌/M..𖣠⚪ᴥᗱᗴᙁᑐᑕ᨟ᑐᑕ𖢌ИNⓄⵙ✣ᑐᑕИNᑎꗳ𖡗⚪𔗢⚪🞋⚪𔗢⚪𖡗ꗳᑎИNᑐᑕ✣ⵙⓄИN𖢌ᑐᑕ᨟ᑐᑕᙁᗱᗴᴥ⚪𖣠..M

@@ -0,0 +1,37 @@
+clc;tic;clf;clear;set(0,'DefaultFIGUREWINDOWSTYLE','DOCKED');
+syms X
+
+O_YTITNAUQ_TNIOP_TOLP_O_PLOT_POINT_QUANTITY_O=1+                ((((                2^8                ))))                ;
+O_EGNAR_X_O_X_RANGE_O=                ((((                -2                ))))                :                1/(O_YTITNAUQ_TNIOP_TOLP_O_PLOT_POINT_QUANTITY_O-1)                :                ((((                2                ))))                ;
+
+O_ALUMROF_O_FORMULA_O=@(X)                ((((                X.^3.35                ))))                ;
+%O_ALUMROF_O_FORMULA_O=@(X)                ((((                1./(exp(1./X + 1./(X - 1)) + 1)                ))))                ;                %
+%O_ALUMROF_O_FORMULA_O=@(X)                ((((                .5.*(1+tanh((.5-X)./((-1+X).*X)))                ))))                ;                %
+%O_ALUMROF_O_FORMULA_O=@(X)                ((((                ((-32.*(max(0,-15./16+X).^3-max(0,-13./16+X).^3-max(0,-11./16+X).^3+max(0,-9./16+X).^3-max(0,-7./16+X).^3+max(0,-5./16+X).^3+max(0,-3./16+X).^3-max(0,-1./16+X).^3))./3)                ))))                ;                %
+fprintf('%s\n',O_ALUMROF_O_FORMULA_O(X));
+fprintf('%s\n',simplify(expand(O_ALUMROF_O_FORMULA_O(X),"IGNOREANALYTICCONSTRAINTS",true),"STEPS",16,"CRITERION","PREFERREAL","IGNOREANALYTICCONSTRAINTS",true));
+
+O_TFIHS_THGIEH_O_HEIGHT_SHIFT_O_HEIGHT_SHIFT_O=                ((((                .5                ))))                ;
+O_SIXA_X_GNOLA_GNILCYC_LACITREW_O_WERTICAL_CYCLING_ALONG_X_AXIS_O=@(X)(-1).^floor(X).*(O_ALUMROF_O_FORMULA_O(mod(X,1))-O_TFIHS_THGIEH_O_HEIGHT_SHIFT_O_HEIGHT_SHIFT_O)+O_TFIHS_THGIEH_O_HEIGHT_SHIFT_O_HEIGHT_SHIFT_O;
+fprintf('\n%s\n',O_SIXA_X_GNOLA_GNILCYC_LACITREW_O_WERTICAL_CYCLING_ALONG_X_AXIS_O(X));
+fprintf('%s\n',simplify(expand(O_SIXA_X_GNOLA_GNILCYC_LACITREW_O_WERTICAL_CYCLING_ALONG_X_AXIS_O(X),"IGNOREANALYTICCONSTRAINTS",true),"STEPS",16,"CRITERION","PREFERREAL","IGNOREANALYTICCONSTRAINTS",true));
+
+O_SIXA_X_GNOLA_GNILCYC_LATNOZIROH_O_HORIZONTAL_CYCLING_ALONG_X_AXIS_O=@(X)O_ALUMROF_O_FORMULA_O(mod(X,1)).*(mod(floor(X+1),2))+O_ALUMROF_O_FORMULA_O(1-mod(X,1)).*(mod(floor(-X+1),2));
+fprintf('\n%s\n',O_SIXA_X_GNOLA_GNILCYC_LATNOZIROH_O_HORIZONTAL_CYCLING_ALONG_X_AXIS_O(X));
+fprintf('%s\n',simplify(expand(O_SIXA_X_GNOLA_GNILCYC_LATNOZIROH_O_HORIZONTAL_CYCLING_ALONG_X_AXIS_O(X),"IGNOREANALYTICCONSTRAINTS",true),"STEPS",16,"CRITERION","PREFERREAL","IGNOREANALYTICCONSTRAINTS",true));
+
+figure(gcf);
+subplot(3,1,1);
+plot(O_EGNAR_X_O_X_RANGE_O, O_ALUMROF_O_FORMULA_O(O_EGNAR_X_O_X_RANGE_O));
+xlim([-2 2]);ylim([-1 1]);
+pbaspect([4 1 1])
+subplot(3,1,2);
+plot(O_EGNAR_X_O_X_RANGE_O, O_SIXA_X_GNOLA_GNILCYC_LACITREW_O_WERTICAL_CYCLING_ALONG_X_AXIS_O(O_EGNAR_X_O_X_RANGE_O));
+xlim([-2 2]);ylim([-1 1]);
+pbaspect([4 1 1])
+subplot(3,1,3);
+plot(O_EGNAR_X_O_X_RANGE_O, O_SIXA_X_GNOLA_GNILCYC_LATNOZIROH_O_HORIZONTAL_CYCLING_ALONG_X_AXIS_O(O_EGNAR_X_O_X_RANGE_O));
+xlim([-2 2]);ylim([-1 1]);
+pbaspect([4 1 1])
+
+fprintf(1,['\n\n%.' num2str(2^6) 'f\n'],toc);

∣❁∣◇⯏∣⑄∣⯏◇∣❁∣/Ⱉ𑽇ⵙ✢𐫱🝊✸Ⓞ⯏Ⓞ✸🝊𐫱✢ⵙ𑽇Ⱉ/ꖅ⦻⛋🟏✢𖥠Ⓞ𖧷Ⓞ𖥠✢🟏⛋⦻ꖅ/𖧷✻⦻Ⓞ🟏⊞✢⛋✸⛋✢⊞🟏Ⓞ⦻✻𖧷/𖢌⛋◇✢⛋✸⛋✢◇⛋𖢌/M..𖣠⚪𐧾⊚ⵈ⛭𖢌𐧼𐧾ⵔ∶⸭❋ⵔⵔ𐧾❋❋ⵔ❋·𐧾❋❋ⵈ𐧾❋ⵔ𐧾❋∶ⵔⵔⵔ·𐧾ⵔ∶𐧾ⵔ𐧾𐧾··𐧼❋❋⠿𐧼ⵔⵈⵔ⁘⸭𐧾𐧾❋⸭∶∶ⵔ⠿ⵔ⁘◌⁘❋⚇·⚪𔗢⚪🞋⚪𔗢⚪·⚇❋⁘◌⁘ⵔ⠿ⵔ∶∶⸭❋𐧾𐧾⸭⁘ⵔⵈⵔ𐧼⠿❋❋𐧼··𐧾𐧾ⵔ𐧾∶ⵔ𐧾·ⵔⵔⵔ∶❋𐧾ⵔ❋𐧾ⵈ❋❋𐧾·❋ⵔ❋❋𐧾ⵔⵔ❋⸭∶ⵔ𐧾𐧼𖢌⛭ⵈ⊚𐧾⚪𖣠..M

@@ -0,0 +1,27 @@
+clc
+%tic;pkg install -forge symbolic;fprintf(1,['%.' num2str(2^6) 'f.\n'],toc);%
+
+try
+                try
+                    
+                tic;digits(2^15-2);fprintf(1,['%.' num2str(2^6) 'f.\n'],toc);
+                
+                tic
+                vpa(1)...
+                /...
+                vpa(84.406022589954030768899117092091000289089388918088900852079)...
+                *...
+                vpa(3)...
+                ^...
+                vpa(9)
+                fprintf(1,['%.' num2str(2^6) 'f.\n'],toc)
+                        catch ME
+                        tic;pkg load symbolic;fprintf(1,['%.' num2str(2^6) 'f.\n'],toc);
+                end
+
+
+        catch ME
+        tic;fprintf(['%.' num2str(2^6) 'f\n'], 1 / 84.406022589954030768899117092091000289089388918088900852079 * 3^9);fprintf(1,['%.' num2str(2^6) 'f.\n'],toc);
+
+        
+end

∣❁∣◇⯏∣⑄∣⯏◇∣❁∣/Ⱉ𑽇ⵙ✢𐫱🝊✸Ⓞ⯏Ⓞ✸🝊𐫱✢ⵙ𑽇Ⱉ/ꖅ⦻⛋🟏✢𖥠Ⓞ𖧷Ⓞ𖥠✢🟏⛋⦻ꖅ/𖧷✻⦻Ⓞ🟏⊞✢⛋✸⛋✢⊞🟏Ⓞ⦻✻𖧷/𖢌⛋◇✢⛋✸⛋✢◇⛋𖢌/M.𖣠⚪ᴥⓄ✣ᗩᙁⵙᑐᑕᔓᔕⓄ𖣓Ⓞⵙↀᑎᗩ⚪𔗢⚪🞋⚪𔗢⚪ᗩᑎↀⵙⓄ𖣓Ⓞᔓᔕᑐᑕⵙᙁᗩ✣Ⓞᴥ⚪𖣠.M

@@ -0,0 +1,42 @@
+clc;tic;clear;
+O    =    84.406022589954030768899117092091000289089388918088900852079    ;
+A    =    ((((    0    ))))    ;
+M    =    ((((    3    ))))    ;
+I    =    ((((    0    ))))    ;
+O_EDUTILPMA_O_AMPLITUDE_O    =    1    /    M    ^    ((((    0    ))))    ;
+O_SYCNEUQERF_O_FREQUENCYS_O    =    1    /    O    *    M.^((    ((((    0    ))))    *M^A    :    ((((    13    ))))    *M^A    )/M^A);
+for O_SEULAW_YCNEUQERF_O_FREQUENCY_WALUES_O=1:length(O_SYCNEUQERF_O_FREQUENCYS_O)  fprintf(['%d    :    %.' num2str(2^4) 'f\n'],O_SEULAW_YCNEUQERF_O_FREQUENCY_WALUES_O,O_SYCNEUQERF_O_FREQUENCYS_O(O_SEULAW_YCNEUQERF_O_FREQUENCY_WALUES_O));end
+
+fprintf('%s','<>');
+O_ETAR_ELPMAS_O_SAMPLE_RATE_O=ceil(    4    *    2    ^    ((((    0    ))))    /    O    *    M    ^    ((((    13    ))))    )    ;
+fprintf('\n%s\n',sprintf('%.d',O_ETAR_ELPMAS_O_SAMPLE_RATE_O));
+fprintf('%s\n','*');
+O_NOITARUD_O_DURATION_O    =    O    /    M    ^    ((((    4    ))))    ;
+fprintf('%s\n',sprintf('%.16f',O_NOITARUD_O_DURATION_O));
+fprintf('%s\n','=');
+O_YTITNAUQ_ELPMAS_O_SAMPLE_QUANTITY_O=ceil(O_NOITARUD_O_DURATION_O*O_ETAR_ELPMAS_O_SAMPLE_RATE_O);
+fprintf('%s\n',sprintf('%.d',O_YTITNAUQ_ELPMAS_O_SAMPLE_QUANTITY_O));
+
+O_LANGIS_OIDUA_O_AUDIO_SIGNAL_O=zeros(O_YTITNAUQ_ELPMAS_O_SAMPLE_QUANTITY_O,1);
+
+for O_XEDNI_YCNEUQERF_O_FREQUENCY_INDEX_O=1:length(O_SYCNEUQERF_O_FREQUENCYS_O) O_EMIT_O_TIME_O=(0:O_YTITNAUQ_ELPMAS_O_SAMPLE_QUANTITY_O-1)/O_ETAR_ELPMAS_O_SAMPLE_RATE_O;
+O_EPAHS_MROFEWAW_ENIS_O_SINE_WAWEFORM_SHAPE_O    =    sin(2*4*atan(1)*O_SYCNEUQERF_O_FREQUENCYS_O(O_XEDNI_YCNEUQERF_O_FREQUENCY_INDEX_O)*O_EMIT_O_TIME_O')    ;
+O_EPAHS_MROFEWAW_LAITNENOPXE_O_EXPONENTIAL_WAWEFORM_SHAPE_O    =    (-1).^floor(.5+O_SYCNEUQERF_O_FREQUENCYS_O(O_XEDNI_YCNEUQERF_O_FREQUENCY_INDEX_O)*2*O_EMIT_O_TIME_O').*(-1+2./(1+exp(1./(-1+mod(.5+O_SYCNEUQERF_O_FREQUENCYS_O(O_XEDNI_YCNEUQERF_O_FREQUENCY_INDEX_O)*2*O_EMIT_O_TIME_O',1))+1./mod(.5+O_SYCNEUQERF_O_FREQUENCYS_O(O_XEDNI_YCNEUQERF_O_FREQUENCY_INDEX_O)*2*O_EMIT_O_TIME_O',1))))    ;
+O_EPAHS_MROFEWAW_DOIREP_ELGNIS_O_SINGLE_PERIOD_WAWEFORM_SHAPE_O    =    ((((    O_EPAHS_MROFEWAW_ENIS_O_SINE_WAWEFORM_SHAPE_O    ))))    ;
+O_LANGIS_OIDUA_O_AUDIO_SIGNAL_O=O_LANGIS_OIDUA_O_AUDIO_SIGNAL_O+O_EPAHS_MROFEWAW_DOIREP_ELGNIS_O_SINGLE_PERIOD_WAWEFORM_SHAPE_O;end
+
+O_EPAHS_EDAF_ENISOC_O_COSINE_FADE_SHAPE_O    =    (0.5 - 0.5*cos(4*atan(1)/O_NOITARUD_O_DURATION_O*2* O_EMIT_O_TIME_O    *    M    ^    ((((    I    ))))    ))    ;
+O_EPAHS_EDAF_LAITNENOPXE_O_EXPONENTIAL_FADE_SHAPE_O    =    (0.5-0.5*(-1).^floor(1./O_NOITARUD_O_DURATION_O*2* O_EMIT_O_TIME_O    *    M    ^    ((((    I    ))))    )+((-1).^floor(1./O_NOITARUD_O_DURATION_O*2* O_EMIT_O_TIME_O    *    M    ^    ((((    I    ))))    ))./(1+exp((1)./(-1+mod(1./O_NOITARUD_O_DURATION_O*2* O_EMIT_O_TIME_O    *    M    ^    ((((    I    ))))    ,1))+(1)./(mod(1./O_NOITARUD_O_DURATION_O*2* O_EMIT_O_TIME_O    *    M    ^    ((((    I    ))))    ,1)))))    ;
+O_EPAHS_EDAF_O_FADE_SHAPE_O    =    ((((    O_EPAHS_EDAF_ENISOC_O_COSINE_FADE_SHAPE_O    ))))    ;
+for O_XEDNI_ELPMAS_O_SAMPLE_INDEX_O=1:O_YTITNAUQ_ELPMAS_O_SAMPLE_QUANTITY_O O_LANGIS_OIDUA_O_AUDIO_SIGNAL_O(O_XEDNI_ELPMAS_O_SAMPLE_INDEX_O)=O_LANGIS_OIDUA_O_AUDIO_SIGNAL_O(O_XEDNI_ELPMAS_O_SAMPLE_INDEX_O)*O_EDUTILPMA_O_AMPLITUDE_O*O_EPAHS_EDAF_O_FADE_SHAPE_O(O_XEDNI_ELPMAS_O_SAMPLE_INDEX_O);end
+
+fprintf('%s','|');
+fprintf('\n%s%s%s\n',sprintf('%.16f',max(abs(O_LANGIS_OIDUA_O_AUDIO_SIGNAL_O))),'=',sprintf('%.16f',20*log10(max(abs(O_LANGIS_OIDUA_O_AUDIO_SIGNAL_O)))));
+O_LANGIS_OIDUA_O_AUDIO_SIGNAL_O=(O_LANGIS_OIDUA_O_AUDIO_SIGNAL_O/max(abs(O_LANGIS_OIDUA_O_AUDIO_SIGNAL_O)))*O_EDUTILPMA_O_AMPLITUDE_O;
+fprintf('%s\n','-');
+fprintf('%s%s%s\n',sprintf('%.16f',max(abs(O_LANGIS_OIDUA_O_AUDIO_SIGNAL_O))),'=',sprintf('%.16f',20*log10(max(abs(O_LANGIS_OIDUA_O_AUDIO_SIGNAL_O)))));
+
+try sound(O_LANGIS_OIDUA_O_AUDIO_SIGNAL_O,O_ETAR_ELPMAS_O_SAMPLE_RATE_O,24);end
+try audiowrite('C:\VAW.O____TUPTUO_ROTALICSO_OIDUA____O____AUDIO_OSCILATOR_OUTPUT____O.WAV',O_LANGIS_OIDUA_O_AUDIO_SIGNAL_O,O_ETAR_ELPMAS_O_SAMPLE_RATE_O,'BITSPERSAMPLE',64);end
+fprintf('%s','#');
+fprintf('\n%s\n',sprintf('%.16f',toc));

∣❁∣◇⯏∣⑄∣⯏◇∣❁∣/Ⱉ𑽇ⵙ✢𐫱🝊✸Ⓞ⯏Ⓞ✸🝊𐫱✢ⵙ𑽇Ⱉ/ꖅ⦻⛋🟏✢𖥠Ⓞ𖧷Ⓞ𖥠✢🟏⛋⦻ꖅ/𖧷✻⦻Ⓞ🟏⊞✢⛋✸⛋✢⊞🟏Ⓞ⦻✻𖧷/𖢌⛋◇✢⛋✸⛋✢◇⛋𖢌/M.𖣠⚪𐧾⊚ⵈ⛭𖢌𐧼𐧾ⵔ∶⸭❋ⵔⵔ𐧾❋❋ⵔ❋·𐧾❋❋ⵈ𐧾❋ⵔ𐧾❋∶ⵔⵔⵔ·𐧾ⵔ∶𐧾ⵔ𐧾𐧾··𐧼❋❋⠿𐧼ⵔⵈⵔ⁘⸭𐧾𐧾❋⸭∶∶ⵔ⠿ⵔ⁘◌⁘❋⚇·⚪𔗢⚪🞋⚪𔗢⚪·⚇❋⁘◌⁘ⵔ⠿ⵔ∶∶⸭❋𐧾𐧾⸭⁘ⵔⵈⵔ𐧼⠿❋❋𐧼··𐧾𐧾ⵔ𐧾∶ⵔ𐧾·ⵔⵔⵔ∶❋𐧾ⵔ❋𐧾ⵈ❋❋𐧾·❋ⵔ❋❋𐧾ⵔⵔ❋⸭∶ⵔ𐧾𐧼𖢌⛭ⵈ⊚𐧾⚪𖣠.M

@@ -0,0 +1,16 @@
+%pkg install -forge symbolic%
+%pkg load symbolic%
+%tic%
+digits(2^16);
+%toc%
+
+tic
+vpa(1)...
+/...
+vpa(84.406022589954030768899117092091000289089388918088900852079)...
+*...
+vpa(3)...
+^...
+vpa(9)
+toc
+%clc%