Ada-pakke-specifikation til Cusil-protese design-parametre

Følgende Ada-pakke definerer en struktureret record-type til et Cusil-protese-design, der fanger materiale, tand-konfiguration, farve, klammer-type og base-bredde parametre.

package cusil_denture is type material is (ceramic, metal, plastic); type teeth is (full, partial); type color is (white, off_white, yellow); type clasp_type is (internal, external, plastic); subtype base_width is float range 0.0 .. 1.0; -- millimeters type cusil_denture is record material : material; teeth : teeth := full; color : color := off_white; clasp_type : clasp_type := internal; base_width : base_width := 1.0; end record; end cusil_denture; 

Denne specifikation giver et type-sikkert rammeværk til CAD/CAM protese-design software, der sikrer gyldige parameter-kombinationer og standard-værdier til fremstilling-workflows.