|
|
|
|
|
|
|
|
1
|
+clc;tic;clf;clear;set(0,'DefaultFIGUREWINDOWSTYLE','DOCKED');
|
|
|
|
2
|
+syms X
|
|
|
|
3
|
+
|
|
|
|
4
|
+O_YTITNAUQ_TNIOP_TOLP_O_PLOT_POINT_QUANTITY_O=1+ (((( 2^8 )))) ;
|
|
|
|
5
|
+O_EGNAR_X_O_X_RANGE_O= (((( -2 )))) : 1/(O_YTITNAUQ_TNIOP_TOLP_O_PLOT_POINT_QUANTITY_O-1) : (((( 2 )))) ;
|
|
|
|
6
|
+
|
|
|
|
7
|
+O_ALUMROF_O_FORMULA_O=@(X) (((( X.^3.35 )))) ;
|
|
|
|
8
|
+%O_ALUMROF_O_FORMULA_O=@(X) (((( 1./(exp(1./X + 1./(X - 1)) + 1) )))) ; %
|
|
|
|
9
|
+%O_ALUMROF_O_FORMULA_O=@(X) (((( .5.*(1+tanh((.5-X)./((-1+X).*X))) )))) ; %
|
|
|
|
10
|
+%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) )))) ; %
|
|
|
|
11
|
+fprintf('%s\n',O_ALUMROF_O_FORMULA_O(X));
|
|
|
|
12
|
+fprintf('%s\n',simplify(expand(O_ALUMROF_O_FORMULA_O(X),"IGNOREANALYTICCONSTRAINTS",true),"STEPS",16,"CRITERION","PREFERREAL","IGNOREANALYTICCONSTRAINTS",true));
|
|
|
|
13
|
+
|
|
|
|
14
|
+O_TFIHS_THGIEH_O_HEIGHT_SHIFT_O_HEIGHT_SHIFT_O= (((( .5 )))) ;
|
|
|
|
15
|
+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;
|
|
|
|
16
|
+fprintf('\n%s\n',O_SIXA_X_GNOLA_GNILCYC_LACITREW_O_WERTICAL_CYCLING_ALONG_X_AXIS_O(X));
|
|
|
|
17
|
+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));
|
|
|
|
18
|
+
|
|
|
|
19
|
+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));
|
|
|
|
20
|
+fprintf('\n%s\n',O_SIXA_X_GNOLA_GNILCYC_LATNOZIROH_O_HORIZONTAL_CYCLING_ALONG_X_AXIS_O(X));
|
|
|
|
21
|
+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));
|
|
|
|
22
|
+
|
|
|
|
23
|
+figure(gcf);
|
|
|
|
24
|
+subplot(3,1,1);
|
|
|
|
25
|
+plot(O_EGNAR_X_O_X_RANGE_O, O_ALUMROF_O_FORMULA_O(O_EGNAR_X_O_X_RANGE_O));
|
|
|
|
26
|
+xlim([-2 2]);ylim([-1 1]);
|
|
|
|
27
|
+pbaspect([4 1 1])
|
|
|
|
28
|
+subplot(3,1,2);
|
|
|
|
29
|
+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));
|
|
|
|
30
|
+xlim([-2 2]);ylim([-1 1]);
|
|
|
|
31
|
+pbaspect([4 1 1])
|
|
|
|
32
|
+subplot(3,1,3);
|
|
|
|
33
|
+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));
|
|
|
|
34
|
+xlim([-2 2]);ylim([-1 1]);
|
|
|
|
35
|
+pbaspect([4 1 1])
|
|
|
|
36
|
+
|
|
|
|
37
|
+fprintf(1,['\n\n%.' num2str(2^6) 'f\n'],toc);
|