-- -- Video output -- package Video.Display with Pure is end Video.Display;