indexing
	description: "Raster operation 2 (R2) constants."
	status: "See notice at end of class."
	date: "$Date$"
	revision: "$Revision$"
class interface
	WEL_ROP2_CONSTANTS
feature 
	R2_black: INTEGER is 1
	R2_copypen: INTEGER is 13
	R2_masknotpen: INTEGER is 3
	R2_maskpen: INTEGER is 9
	R2_maskpennot: INTEGER is 5
	R2_mergenotpen: INTEGER is 12
	R2_mergepen: INTEGER is 15
	R2_mergepennot: INTEGER is 14
	R2_nop: INTEGER is 11
	R2_not: INTEGER is 6
	R2_notcopypen: INTEGER is 4
	R2_notmaskpen: INTEGER is 8
	R2_notmergepen: INTEGER is 2
	R2_notxorpen: INTEGER is 10
	R2_white: INTEGER is 16
	R2_xorpen: INTEGER is 7
	
feature 
	valid_rop2_constant (c: INTEGER): BOOLEAN
			c
	
invariant
		 ANY
	reflexive_equality: standard_is_equal (Current)
	reflexive_conformance: conforms_to (Current)
end -- WEL_ROP2_CONSTANTS