Algoritmos y Programación en Pascal

444 Capítulo 19. Tipos abstractos de datos
parar:= True;
insertar:= True
end
else if auxBuscar^.sig^.info >= elem then begin
parar:= True;
insertar:= auxBuscar^.sig^.info > elem
end
else
auxBuscar:= auxBuscar^.sig
until parar;
if insertar then begin
auxInsertar:= auxBuscar^.sig;
New(auxBuscar^.sig);
auxBuscar^.sig^.info:= elem;
auxBuscar^.sig^.sig:= auxInsertar
end {if}
end; {AnnadirElemConj}
que verifica la especificación, como es fácil comprobar examinando el código.
En efecto, la implementación propuesta para AnnadirElemConj, hace que se
agregue elem a la representación de conj. Más detalladamente, en el caso del que
elem no pertenezca al conjunto, se asigna el valor True a la variable insertar,
provocando la ejecución de la rama then de la instrucción if insertar..., que
añade un nuevo nodo (cuya información es elem) en la lista que representa a
conj. Esto demuestra informalmente que AnnadirElemConj consigue el efecto
descrito en la especificación.
Por otra parte, en los tipos abstractos de datos, se debe estudiar la corrección
en una segunda dirección, ya que es necesario establecer propiedades de
los objetos del tipo, y mediante ellas comprobar que los objetos que se manejan
pertenecen realmente al tipo. Estas propiedades se formalizan en los llamados
invariantes de la representación de la forma que se explica seguidamente. El
sentido de esta segunda parte de la verificación es el de una comprobación de
tipos exhaustiva: al escoger una representación, por ejemplo, las listas en el caso
del tipo abstracto tConj, se activa la comprobación de tipos implícita de Pascal,
es decir, el compilador se asegura de que todo objeto del tipo tConj es una lista
del tipo ^tNodoLista.
Pero esta comprobación de tipos implícita no es suficiente, por el hecho de
que no toda lista de enteros es una representación legal de un conjunto, concretamente
porque puede tener elementos repetidos. Por tanto, es necesaria una
verificación más profunda que debe ser realizada por el programador-diseñador.
Esta verificación se llevará a cabo formalizando las propiedades pertinentes de
los objetos en los citados invariantes de representación.