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