{	These are the declarations for the OMSI PASCAL string functions.}

function  len(VAR s:string):integer;				     EXTERNAL;
procedure clear(var s:string);					     EXTERNAL;
function  empty(VAR s:string):boolean;				     EXTERNAL;
procedure detab(var s:string);					     EXTERNAL;
procedure concatenate(var s:string; VAR t:string);		     EXTERNAL;
function  search(VAR s,t:string; start:integer):integer;	     EXTERNAL;
procedure readstring(var f:text; var s:string);			     EXTERNAL;
procedure writestring(var f:text; VAR s:string);		     EXTERNAL;
procedure substring(var t:string; VAR s:string; start,span:integer); EXTERNAL;
procedure delete(var s:string; start,span:integer);		     EXTERNAL;
procedure insert(var s:string;VAR t:string; p:integer);		     EXTERNAL;