--- a/Point.st	Sat Aug 31 16:16:15 2019 +0200
+++ b/Point.st	Sat Aug 31 16:16:38 2019 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -992,11 +990,16 @@
 !
 
 isFinite
-	^x isFinite and: [y isFinite]
+    "return true, if the receiver is a finite point
+     I.e. both coordinates are not NaN and not +/-INF"
+
+        ^x isFinite and: [y isFinite]
 !
 
 isInfinite
-	^x isInfinite or: [y isInfinite]
+    "return true, if the receiver has an infinite coordinate"
+
+    ^x isInfinite or: [y isInfinite]
 ! !
 
 !Point methodsFor:'transformations'!