Number.st
changeset 19140 b00fb7810ab6
parent 19136 5645cf0c4774
child 19141 7241f0129961
--- a/Number.st	Tue Feb 02 17:12:20 2016 +0100
+++ b/Number.st	Thu Feb 04 02:19:56 2016 +0100
@@ -1479,6 +1479,17 @@
 
 
 
+!Number methodsFor:'physics-unit converting'!
+
+fahrenheit
+    ^ ((self + 459.67s) * (5/9)) kelvin
+
+    "
+     0 fahrenheit
+     32 fahrenheit
+     96 fahrenheit
+    "
+! !
 
 !Number methodsFor:'printing & storing'!