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

{ LAST EDIT: 1-JUL-1988 12:25:34 

  This is the external declaration for the Pascal callabel routine to return
  an 18 character array of digits which represent the clunk value given it.
  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 a clunk value and it will convert it into a 18 char
	array in the format:
          '012345678901234567'

	What could be simpler?

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