diff options
-rw-r--r-- | regress/usr.bin/dc/Makefile | 5 | ||||
-rw-r--r-- | regress/usr.bin/dc/t21.in | 64 | ||||
-rw-r--r-- | regress/usr.bin/dc/t21.out | 8 |
3 files changed, 75 insertions, 2 deletions
diff --git a/regress/usr.bin/dc/Makefile b/regress/usr.bin/dc/Makefile index 871b58f5529..65589ca2297 100644 --- a/regress/usr.bin/dc/Makefile +++ b/regress/usr.bin/dc/Makefile @@ -1,9 +1,9 @@ -# $OpenBSD: Makefile,v 1.11 2003/12/17 15:11:36 otto Exp $ +# $OpenBSD: Makefile,v 1.12 2004/10/19 07:39:36 otto Exp $ DC=dc -x REGRESS_TARGETS=t1 t2 t3 t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 \ - t18 t19 t20 + t18 t19 t20 t21 # .in: input file # .out: desired result @@ -28,6 +28,7 @@ REGRESS_TARGETS=t1 t2 t3 t4 t5 t6 t7 t8 t9 t10 t11 t12 t13 t14 t15 t16 t17 \ # t18: read uninitialized and initialized array locations # t19: test extended registers # t20: towers of hanoi +# t21: 500 decimals of pi all: clean ${REGRESS_TARGET} diff --git a/regress/usr.bin/dc/t21.in b/regress/usr.bin/dc/t21.in new file mode 100644 index 00000000000..ee95a9ca943 --- /dev/null +++ b/regress/usr.bin/dc/t21.in @@ -0,0 +1,64 @@ + + + + + + + 20k +[ 0lx-sx 1sw]s0 +[lx 2/sxly 1+sylx 2<1]s1 +[lglg*sglyd1-sy 0!=4]s4 +[ 1lg/Lxs.Las.Lbs.Lcs.Lds.Les.Lgs.Lts.Lws.Lys. 4Q]s5 +[lg 1/sglyd1-sy 0!=4 ltklw 1=5 lg 1/Lxs.Las.Lbs.Lcs.Lds.Les.Lgs.Lts.Lws.Lys. 3Q]s3 +[lblx*sblcla*lb+scldla*sdlcld/sglgle=3 lgselad1+sas. 1 1=2]s2 +[0Sy0Sw0St0Sg0Se0Sd0Sc0Sb0SaSxKstlt .434lx*+ 1+k 0swlx 0>0 0sylx 2<1 1sa 1sblbsc 1sd 1se 1dsas. 1 1=2 Lxs.Las.Lbs.Lcs.Lds.Les.Lgs.Lts.Lws.Lys.0 1Q]s + + + +[ 1 10K^-Lxs.Las.Lbs.Lcs.Lds.Les.Lfs.Lgs.Lus.Lss.Lts. 2Q]s6 +[lsk]s8 +[lslxZlxX- 2/+ 1+ssls 0<8 lxvsxlf 2*sflx 2<7]s7 +[lsk]s: +[lslxZlxX- 2/+ 1+ssls 0<: lxvsxlf 2*sflx .5>9]s9 +[ltklulc*ld/Lxs.Las.Lbs.Lcs.Lds.Les.Lfs.Lgs.Lus.Lss.Lts. 3Q]s< +[lbls*sblcla*ldlb*+scldla*sdlcld/sglgle=< lgsela 2+dsas. 1 1=;]s; +[0St0Ss0Su0Sg0Sf0Se0Sd0Sc0Sb0SaSxlx 0!<6 Kst 1sfKlxX+lxZ- 1+kKsslx 2<7 lx .5>9 ltlfZ+lfX- 1+klx 1-lx 1+/suK 1.1ltZ*+ 1.1ltX*-klulu*ss 2lf*sblbsc 1sd 1se 3dsas. 1 1=; Lxs.Las.Lbs.Lcs.Lds.Les.Lfs.Lgs.Lus.Lss.Lts.0 1Q]s + + + +[ltss]s= +[lx 2lp*/ 1+ 2/sn]s> +[lx 2lp*/ 1- 2/sn]s? +[ 0lx-sx]s@ +[ltkls 1/Lxs.Las.Lbs.Lcs.Lss.Lts.Lys.Lps.Lns.Lis. 3Q]sB +[laly*salbli*li 1-*sblalb/sclc 0=B lslc+ssli 2+dsis. 1 1=A]sA +[0Si0Sn0Sp0Sy0St0Ss0Sc0Sb0SaSxKstlx .7853/syltlyZ+lyX-sslslt>= lsk 1lxsp 0klx 0!>> lx 0>? lx 4ln*lp*-sxln 2% 0!=@ lt 1.2lt*Z+ 1.2lt*X-k 0lx-lx*sylxsa 1sblxss 3dsis. 1 1=A Lxs.Las.Lbs.Lcs.Lss.Lts.Lys.Lps.Lns.Lis.0 1Q]s + + + +[0StSxKstK 1+klx 2 1lx*+lxsxltklx 1/Lxs.Lts. 1QLxs.Lts.0 1Q]s + + + +[ 0Lxs.Las.Lbs.Lcs.Lds.Les.Lfs.Lgs.Lss.Lts. 2Q]sC +[ .7853981633974483096156608458198757210492923498437764 1/Lxs.Las.Lbs.Lcs.Lds.Les.Lfs.Lgs.Lss.Lts. 3Q]sE +[K 52>E ]sD +[K 1+k 0 1 1.lxlx*+v--lx/sxlf 2*sflx .5<F]sF +[K 1+k 0 1 1.lxlx*+v--lx/sxlf 2*sflx 0 .5->G]sG +[ltklxlc*ld/Lxs.Las.Lbs.Lcs.Lds.Les.Lfs.Lgs.Lss.Lts. 3Q]sI +[lbls*sblcla*ldlb*+scldla*sdlcld/sglgle=I lgsela 2+dsas. 1 1=H]sH +[0St0Ss0Sg0Sf0Se0Sd0Sc0Sb0SaSxlx 0=C lx 1=D Kst 1sflx .5<F lx 0 .5->G 0lx-lx*sslfsblfsc 1sd 1se 3dsas. 1 1=H Lxs.Las.Lbs.Lcs.Lds.Les.Lfs.Lgs.Lss.Lts.0 1Q]s + + + +[Klk+k]sJ +[ 0ln-sn 0lx-sx]sK +[lalx*salc 2*li*sclid1+sis.liln!<L]sL +[ltklg 1/Lns.Lxs.Las.Lbs.Lcs.Lds.Les.Lgs.Lis.Lss.Lks.Lts. 3Q]sN +[lals*salbli*lnli+*la+sblcli*lnli+*sclblc/sglgle=N lgselid1+sis. 1 0!=M]sM +[0St0Sk0Ss0Si0Sg0Se0Sd0Sc0Sb0SaSxSnKst 1.36lx* 1.16lt*+ln-sklkZlkX-sklk 0<J 0lx-lx* 4/ssln 0>K 1sa 1sc 1dsis.liln!<L lasb 1sd 1se 1dsis. 1 0!=M Lns.Lxs.Las.Lbs.Lcs.Lds.Les.Lgs.Lis.Lss.Lks.Lts.0 1Q]s + + + + 500k 2 2 10000^lx*ps. +q
\ No newline at end of file diff --git a/regress/usr.bin/dc/t21.out b/regress/usr.bin/dc/t21.out new file mode 100644 index 00000000000..8cc2012e640 --- /dev/null +++ b/regress/usr.bin/dc/t21.out @@ -0,0 +1,8 @@ +3.1415926535897932384626433832795028841971693993751058209749445923078\ +164062862089986280348253421170679821480865132823066470938446095505822\ +317253594081284811174502841027019385211055596446229489549303819644288\ +109756659334461284756482337867831652712019091456485669234603486104543\ +266482133936072602491412737245870066063155881748815209209628292540917\ +153643678925903600113305305488204665213841469519415116094330572703657\ +595919530921861173819326117931051185480744623799627495673518857527248\ +9122793818301194912 |