{$
		}
		
	
	
		
		(*$
		)
		
	
	
		{
		}
	
	
		(*
		*)
	
	//
	
		'
		
	
	
		#$
		
				
	
	
		#
		
				
	
	
		$
		
	
	
		.
		e
		
	
	
  		
		and
		else
		inherited
		packed
		then
		array
		end
		initialization
		procedure
		threadvar
		as
		except
		inline
		program
		to
		asm
		exports
		interface
		property
		try
		begin
		file
		is
		raise
		type
		case
		final
		label
		record
		unit
		class
		finalization
		library
		repeat
		unsafe
		const
		finally
		mod
		resourcestring
		until
		constructor
		for
		nil
		sealed
		uses
		destructor
		function
		not
		set
		var
		dispinterface
		goto
		object
		shl
		while
		div
		if
		of
		shr
		with
		do
		implementation
		or
		static
		xor
		downto
		in
		out
		string
  		
		at
		on
  
		
		absolute
		dynamic
		local
		platform
		requires
		abstract
		export
		message
		private
		resident
		assembler
		external
		name
		protected
		safecall
		automated
		far
		near
		public
		stdcall
		cdecl
		forward
		nodefault
		published
		stored
		contains
		implements
		overload
		read
		varargs
		default
		index
		override
		readonly
		virtual
		deprecated
		inline
		package
		register
		write
		dispid
		library
		pascal
		reintroduce
		writeonly