data art; length function color style $ 8; input function $ x y color $ style $; xsys='5'; ysys='5'; datalines; poly 30 20 blue solid polycont 50 20 . . polycont 40 50 . . poly 50 20 green x1 polycont 70 50 . . polycont 60 50 . . poly 40 50 red l1 polycont 60 50 . . polycont 50 80 . . ;