🚀 go-pugleaf

$B1[6M!wBg:e650iBg$G$9!#(J

In article <JOE.92Nov9123609@hoihoi.kocb.astem.or.jp> joe@kocb.astem.or.jp (Kazuki Joe) writes:
> $B$=$l$,!"#2#1!v#2#1$N5U$r5a$a$k$?$a$K!"(JInverse[A]$B$r$d$C$F$bMn$A$F$7$^$&(J
> $B$s$G$9$h!#:G=i$OC1$K%a%b%j$,B-$j$J$$$@$1$@$m$&$H7Z$/;W$C$F$$$F!"!J#M#a(J
> $B#c$N!K2>A[5-21%*%s$K$7$F!"%Z!<%8!&%U%!%$%k$r$A$g$C$HIU$1B-$7$F!"!"!"!"(J
> $B$G$b$@$a$@$C$?$s$G$9!#$G!"7k6I!"%a%b%j#8#M#B!"%Z!<%8!&%U%!%$%k#6#0#M#B(J
> $B$G<B9T$7$?=j!"#1#0F|4V7W;;$7$F!"7k6IMn$A$F$7$^$$$^$7$?!##1#0!v#1#0$J$i(J
> $B?t==J,$G:Q$`$N$K!"%7%9%F%`A4BN$,Mn$A$F$7$^$&$H$3$+$i!"$I$&$b%P%0=-$$$J(J

$B>k$5$s$N7W;;$5$l$F$$$k$N$O!"?tCM$G$O$J$/$F%7%s%\%k$G$9$h$M!)(J
$B?tCM7W;;$G$O!"5U9TNs$N7W;;$K$+$+$k;~4V$O9b!9(JO(N^3)$BDxEY$G$9$,(J
$B?t<0$N>l9g$O!"$b$78=$l$k9`$,$^$H$^$i$J$$>l9g!"<0(J($B9`?t(J)$B$,(J
$B;X?t4X?tE*$KA}$($d$7$J$$$G$7$g$&$+!)=>$C$F;~4V$bF1MM$K!)(J

$B!Z<XB-JT![(J
$B<!$N$h$&$JC1=c$JNc$G$A$g$C$H$@$1;n$7$F$_$^$7$?!#(J
n$B8D$N%7%s%\%k$+$i$J$k%j%9%H$r=g$K2sE>$7$F:n$C$?9TNs$N5U$G$9!#(J

In[1]:= L[0][n_]:=RotateRight[Array[a,n]]
In[2]:= M[n_]:=Table[L[k][n]=RotateLeft[L[k-1][n]],{k,1,n}]
In[3]:= T[n_]:=Timing[Inverse[M[n]];]
In[4]:= Do[Print[k,T[k],{k,4,8}]
        4{0.25 Second, Null}
        5{1.28333 Second, Null}
        6{6.95 Second, Null}
        7{44.4833 Second, Null}
        8{273.467 Second, Null}
$B$3$l$+$i30A^$9$k$H(J($B$$$$$N$+$J!<!)(J *_*;;)
$B!!!!!!!!(Jt[n] $B!A(J Exp[1.75(n-1)]/900 Sec
$B!!!!!!!!(Jn=21 -> $B?tK|G/$K$J$j$^$9!#(J

$B<!$K!"%7%s%\%k$r0l<oN`$K8:$i$7$F$_$^$9!#3F9TNsMWAG$O(Jx$B$N$Y$->h$G$9!#(J
In[5]:= Do[a[k]=x^(k-1),{k,1,n}]
In[6]:= Do[Print[k,T[k],{k,4,8}]
        4{0.0833333 Second, Null}
        5{0.316667 Second, Null}
        6{0.75 Second, Null}
        7{1.61667 Second, Null}
        8{3.21667 Second, Null}
$B$3$l$+$i30A^$9$k$H(J($B$^$:$$$+$J!<!)(J ^_^;;)
$B!!!!!!!!(Jt[n] $B!A(J 2^(n-1)]/40 Sec
$B!!!!!!!!(Jn=21 -> $B?t;~4V$K$J$j$^$9!#(J

$B$"$l!"(Jn$B!f(J12$B$N>l9g2?J,$?$C$F$b=*$o$i$J$$!&!&!&$d$O$j%P%0$+!)(J
[Mathematica Ver2.0.4; NeXTstation System2.1J RAM20MB]
--
K. Koshigiri
koshi@cc.osaka-kyoiku.ac.jp