--- a/Depth16Image.st	Thu Apr 24 18:02:55 1997 +0200
+++ b/Depth16Image.st	Thu Apr 24 18:03:30 1997 +0200
@@ -61,21 +61,9 @@
     "Modified: 20.4.1996 / 23:40:01 / cg"
 ! !
 
-!Depth16Image methodsFor:'accessing'!
-
-atX:x y:y putValue:aPixelValue
-    "set the pixel at x/y to aPixelValue.
-     Pixels start at x=0 , y=0 for upper left pixel, end at
-     x = width-1, y=height-1 for lower right pixel"
+!Depth16Image methodsFor:'accessing - pixels'!
 
-    |lineIndex "{ Class: SmallInteger }"|
-
-    lineIndex := (width * 2 * y) + 1.
-
-    bytes wordAt:(lineIndex + (x * 2)) put:aPixelValue MSB:true
-!
-
-valueAtX:x y:y
+pixelAtX:x y:y
     "retrieve a pixel at x/y; return a pixelValue.
      Pixels start at x=0 , y=0 for upper left pixel, end at
      x = width-1, y=height-1 for lower right pixel"
@@ -86,6 +74,22 @@
 
     "left pixel in high bits"
     ^ bytes wordAt:(lineIndex + (x * 2)) MSB:true.
+
+    "Created: 24.4.1997 / 16:06:19 / cg"
+!
+
+pixelAtX:x y:y put:aPixelValue
+    "set the pixel at x/y to aPixelValue.
+     Pixels start at x=0 , y=0 for upper left pixel, end at
+     x = width-1, y=height-1 for lower right pixel"
+
+    |lineIndex "{ Class: SmallInteger }"|
+
+    lineIndex := (width * 2 * y) + 1.
+
+    bytes wordAt:(lineIndex + (x * 2)) put:aPixelValue MSB:true
+
+    "Created: 24.4.1997 / 17:06:21 / cg"
 ! !
 
 !Depth16Image methodsFor:'queries'!
@@ -111,5 +115,5 @@
 !Depth16Image class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Depth16Image.st,v 1.6 1996-06-10 17:24:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Depth16Image.st,v 1.7 1997-04-24 16:03:30 cg Exp $'
 ! !