Salute e malattia
```ada
il pacchetto cusil_denture è
il tipo di materiale è (ceramica, metallo, plastica);
il tipo di denti è (completo, parziale);
il colore del tipo è (bianco, bianco sporco, giallo);
tipo chiusura_tipo è (interno, esterno, plastica);
sottotipo base_width intervallo float :=0.0 .. 1.0; - millimetri
il tipo cusil_denture è un record
materiale:materiale;
denti :denti :=pieni;
colore :colore :=bianco_sporco;
tipo_chiusura :tipo_chiusura :=interno;
larghezza_base :larghezza_base :=1.0;
fine registrazione;
fine cusil_denture;
```
ortodonzia