トップ «前の日記(2017-12-24(Sun)) 最新 次の日記(2018-01-07(Sun))» 編集

屑俺日記

僕の備忘録(PC、UN*X、ネットワーク関連が中心)なんです。
自分の書いたところは適当(な時とか)に書き換えますので御了承を。


2017-12-26(Tue) 昨日は遂に参加断念

dcの大なりを否定すると

「一つ前のスタックより大きい」が「一つ前のスタック以下」になってしまうようだ。

[[True]p]sp
10
10
!>p
True
 
10
9
!>p
True

factrial

dcの スタックの深さに頼らないバージョンができた。
でもコードは より長くなってしまった。

$ echo 11 | dc -e \
> '?sl1sf1sb[lf1+sflfll!<x]sy[lblf*sblfll!<y]sxlyxlbp'
39916800
$ time echo 20000 | dc -f dirt_fact.txt > /dev/null
 
real    0m6.192s
user    0m6.172s
sys     0m0.016s
 
$ time echo 20000 | dc -f d2.txt > /dev/null
 
real    0m4.765s
user    0m4.760s
sys     0m0.004s

リンクはご自由にどうぞ。でもURLや内容が変った場合はあしからず。

index.htmlは ここから。