DEFINITION MODULE TadItem;

TYPE ITEM = CARDINAL;

PROCEDURE Iguales(i1,i2:ITEM):BOOLEAN;
PROCEDURE Escribir(i:ITEM);
PROCEDURE Leer(): ITEM;
PROCEDURE ValorPorDefecto():ITEM;

END TadItem.


