1#! /dc
20sm[Nx]0sm[]zsWx[li]zsGx[Nx]0sm[]zsdc
30sm[Nx]0sm[]zsWx[li]zsGx[Nx]0sm[]zsW#! /bin/dc
40sm[Nx]0s_[]zsWx[li]zs^x[lili100>Nx]0sm[]zsWx[liNx]zsxx[li;rlilix]
5x[liN]zsWx[liNx]zsxx[li;rlilix]
6x[liNzsxx#! /bin/dc
7*sm[Nx]0sm[]zsWx[li]zsGx[Nx]0sm[]zsdc
80sm[Nx]0sm[]zsWx[li]zsGx[Nx]0sm[]x]zsxx#! /bin/dc
9*sm[Nx]0sm[]zsWx[li]zsGx[Nx]0sm[]zsdc
100sm[Nx]0sm[]zsWx[li]zsGx[Nx]0sm[]zsW#! /bipR
1100?00pR0.0pR
12.0000p0000000000000;0000000000.0pR
13.0000p00.000000;00000500000.0pR
14.0000p0000000000?00pR0.0pR
15.0000p0000000000000;0000000000.0pR
16.0000p00.000000;00000500000.0pR
17.0000p00000000000000000000000000000000000000000d000.0pR
18.0000p000000000000000000000000R
19.0000p02730pR
2000000pR0.0pR
21.0000p0000000000000000000000R
22.0000p00pR
23