with core, resource; use resource; package body resource is ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ procedure draw (index : in codex; x, y : in integer) is begin null; end draw; ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ end resource;