procedure c18clu(VAR digits	: ch18;
		 VAR out_clunk	: clunk_type); nonpascal;

{ LAST EDIT: 30-JUN-1988 17:27:03 

  This is the external declaration for the Pascal callable routine to return 
  the clunk value of a 18 digit character string. This external
  declaration expects that the file 'CLUNK.TYP' has been included at some 
  point before this. Note that a clunk value is represented from [LSW..MSW].

  How it works:
	You give it an array of digits that is right justified and
	contains only digits (no spaces or other characters) and it
	will convert it to a 64 bit unsigned clunk value. 
	For example: '000000001234567890' 

	Please remember that the routine does no error checking to see
	if you only gave it digits. If you include other characters
	strange results will occur.

	By the way, the input array value is preserved.
}