| Class | Description | 
|---|---|
| DisplacementGene | |
| Double0To1Gene | |
| DoubleGene | |
| HandednessGene | |
| OpeningGene | |
| ShapeGene | |
| SnailGenome | 
 
 person = record WOpening, DDisplacement, SShape, TTranslation: real;
 Coarsegraininess, Reach, GeneratingCurve: integer; TranslationGradient,
 DGradient: real; Handedness: -1..1; end; 
 | 
| SnailGenomeFactory | |
| TranslationGene |