#!/usr/bin/dc

10k

2.9 d sb sx
4 lb - 570 / ss



[
[p ]P lx lb - 4 lb - / n [ ]P ly p sz
] sP

[ 1 ly - ly * lx * sy ] sY

[ 1 -
r d x r
d 0 !=R] sR

[ 
0.25 sy
lY 300 lR x
[lY x lP x] 200 lR x
lx ls + sx
lx 4 >M] sM


[#PLOT 2]p
[o]p
[e]p
lM x
[x]p