Commit | Line | Data |
---|---|---|
7fd59977 | 1 | -- File : MeshVS_ColorHasher.cdl |
2 | -- Created : 5 December 2003 | |
3 | -- Author : Alexander SOLOVYOV | |
4 | ---Copyright: Open CASCADE 2003 | |
5 | ||
6 | ||
7 | class ColorHasher from MeshVS inherits MapIntegerHasher from TColStd | |
8 | ||
9 | ---Purpose: Hasher for using in ColorToIdsMap from MeshVS | |
10 | ||
11 | uses | |
12 | Color from Quantity | |
13 | ||
14 | is | |
15 | HashCode ( myclass; K : Color from Quantity; Upper : Integer ) returns Integer; | |
16 | ||
17 | IsEqual ( myclass; K1, K2 : Color from Quantity ) returns Boolean; | |
18 | ||
19 | end ColorHasher; |