File:Critical orbits for f(z)=z^4-z.png
Maxiam CAS src code: description
← Older revision
Revision as of 16:54, 15 March 2013
Line 83:
Line 83:
iLength:10000;
iLength:10000;
+
+
/* compute a list of critical points */
s:GiveListOfCriticalPoints(f(z));
s:GiveListOfCriticalPoints(f(z));
multiplicities;
multiplicities;
length(s);
length(s);
−
+
/* compute orbit of every critical point and join them into one list */
Orbits:[];
Orbits:[];
for i:1 thru length(s) step 1 do
for i:1 thru length(s) step 1 do