%!
%% Creator: Donkee
/dragon {
	/n exch def
	/x exch def
	/y exch def
	/z exch def
	/t exch def
	n 1.000000 eq {
		newpath
		x y moveto
		z t lineto
		stroke
	} {
		/u x z add t add y sub 2.000000 div def
		/v y t add z sub x add 2.000000 div def
		v u y x 1.000000 n sub dragon
		v u t z 1.000000 n sub dragon
	} ifelse
} def

220.000000 220.000000 20.000000 20.000000 2 dragon