-- AUTHOR: E. Burke -- DATE: November, 1996 -- PURPOSE: Specification for generic grid box and operations -- needed to play Game of Life -- Driver program is Life1 with TEXT_IO; generic MAX_ROWS : POSITIVE; MAX_COLUMNS : POSITIVE; MAX_SIZE : POSITIVE; package GRID is type BOARD is array (1..MAX_ROWS, 1..MAX_COLUMNS) OF Boolean; procedure Initialize (Grid_Box : out BOARD); procedure Input (Grid_Box : out BOARD); procedure Output (Grid_Box : in BOARD); procedure Update_Box (Grid_Box : in out BOARD); function Neighbor_Count (I : NATURAL; J : NATURAL; Grid_Box : BOARD) return NATURAL; function Enquire return BOOLEAN; end GRID;