function WordsFor(Units,UnitsPerWord: Scalar): Scalar;
extern;

procedure SetCheckValue(var Representation: TypeRepresentation);
extern;

function Cardinality(OrdinalType: TypeForm): integer;
extern;

procedure AugmentRepresentationFor(TheType: TypEntry);
extern;

procedure SetRepresentationFor(TheType: TypEntry);
extern;

function APartWord(Representation: TypeRepresentation): Boolean;
extern;

function StructuredWord(Representation: TypeRepresentation): Boolean;
extern;

function PostsetByCall(TheType: TypEntry): Boolean;
extern;

function PresetByCall(TheType: TypEntry): Boolean;
extern;

function CheckedByCall(TheType: TypEntry): Boolean;
extern;

procedure RsetPrsetBuffer;
extern;

procedure FlushBuff(var PresetValue: MachineValue);
extern;

procedure PrsetPartWord(PartSize: MCBitRange;
	    		PresetValue: MachineValue);
extern;

procedure AugmentSchema(TheType: TypEntry);
extern;

function EnvelopeUsed(Representation: TypeRepresentation;
			Action: TypeActions): Boolean;
extern;

procedure SetBaseLimits(var SetRep: TypeRepresentation;
			 SetConstant: ObjectValue);
extern;

procedure InitRepresentations;
extern;