• 0 Vote(s) - 0 Average
• 1
• 2
• 3
• 4
• 5
 b^b^x with base 0exp(-e), the two periodic fixed points are complex conjugate pairs. Code:/* formal period2 fixed point for generic function with slope=-1,  2-cyclic solution  */ /* gs=formalperiod2(-exp(x)+1,30)[1]; */ /* returns [series,x2term] */ \ps 31 kf(a)=log(-log(a))-1; fixedaaz(a,n) = {   if (n<>-1, n=1);  return((subst(gs,x,n*sqrt(kf(a)*6))-kf(a)-1)/log(a)); } formalperiod2(gf,n) = {   local(i,gs,savegs,zs,z,zt,x2term,m2,s2,r2);   savegs=0;   gs = x+aecoeff*x^2+O(x^4);   z = subst(gf,x,gs)-subst(gs,x,-x)+acoeff*x^2;   zs = subst(polcoeff(z,3),aecoeff,x);   zt = -polcoeff(zs,0)/polcoeff(zs,1);   savegs = x + zt*x^2;   gs=savegs;   z = subst(gf,x,gs)-subst(gs,x,-x)+acoeff*x^2;   zs = subst(polcoeff(z,2),acoeff,x);   zt = -polcoeff(zs,0)/polcoeff(zs,1);   x2term = zt;   m2 = matrix(2,2);   s2 = matrix(2,1);   forstep (i=3,n,2,     gs = savegs + aocoeff*x^i + aecoeff*x^(i+1)+O(x^(i+3));     z  = subst(gf,x,gs) - subst(gs,x,-x) + x2term*x^2;     zs = subst(polcoeff(z,i+1),aecoeff,x);     zs = subst(zs,aocoeff,0);     m2[1,1] =  polcoeff(zs,1);     zs = subst(polcoeff(z,i+1),aocoeff,x);     zs = subst(zs,aecoeff,0);     m2[1,2] =  polcoeff(zs,1);     s2[1,1] = -polcoeff(zs,0);     zs = subst(polcoeff(z,i+2),aecoeff,x);     zs = subst(zs,aocoeff,0);     m2[2,1] =  polcoeff(zs,1);     zs = subst(polcoeff(z,i+2),aocoeff,x);     zs = subst(zs,aecoeff,0);     m2[2,2] =  polcoeff(zs,1);     s2[2,1] = -polcoeff(zs,0);     r2 = matsolve(m2,s2);     savegs = savegs + r2[2,1]*x^i + r2[1,1]*x^(i+1);   );   return([savegs,x2term]); } gs = formalperiod2(-exp(x)+1,30)[1]; - Sheldon « Next Oldest | Next Newest »

 Possibly Related Threads... Thread Author Replies Views Last Post A compilation of graphs for the periodic real valued tetrations JmsNxn 1 129 09/09/2021, 04:37 AM Last Post: JmsNxn Constructing real tetration solutions Daniel 4 5,269 12/24/2019, 12:10 AM Last Post: sheldonison Merged fixpoints of 2 iterates ? Asymptotic ? [2019] tommy1729 1 3,041 09/10/2019, 11:28 AM Last Post: sheldonison 2 fixpoints , 1 period --> method of iteration series tommy1729 0 3,140 12/21/2016, 01:27 PM Last Post: tommy1729 2 fixpoints related by power ? tommy1729 0 2,814 12/07/2016, 01:29 PM Last Post: tommy1729 2 real fixpoints again ....... tommy1729 10 17,521 02/23/2016, 10:17 PM Last Post: tommy1729 Fixpoints a,b with f ' (a) = f ' (b) = 1 tommy1729 0 2,898 09/15/2015, 08:29 AM Last Post: tommy1729 Base -1 marraco 8 15,174 06/11/2015, 01:29 PM Last Post: MorgothV8 A new set of numbers is necessary to extend tetration to real exponents. marraco 7 15,915 03/19/2015, 10:45 PM Last Post: marraco alternative fixpoints = branches ? tommy1729 0 3,054 10/11/2014, 08:50 AM Last Post: tommy1729

Users browsing this thread: 1 Guest(s)