Index: TECH/NumberFormatter.cls.xml
===================================================================
diff -u
--- TECH/NumberFormatter.cls.xml	(revision 0)
+++ TECH/NumberFormatter.cls.xml	(revision 1653)
@@ -0,0 +1,14 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="TECH.NumberFormatter">
+<Super>TECH.Interface</Super>
+
+<Method name="FormatNumber">
+<Abstract>1</Abstract>
+<FormalSpec>Number:%Numeric,Decimals:%Integer</FormalSpec>
+<ReturnType>%String</ReturnType>
+</Method>
+</Class>
+
+
+</Export>
Index: TECH/impl/NumberFormatter.cls.xml
===================================================================
diff -u
--- TECH/impl/NumberFormatter.cls.xml	(revision 0)
+++ TECH/impl/NumberFormatter.cls.xml	(revision 1653)
@@ -0,0 +1,15 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="TECH.impl.NumberFormatter">
+<Super>TECH.RegisteredObject,TECH.NumberFormatter</Super>
+
+<Method name="FormatNumber">
+<FormalSpec>Number:%Numeric,Decimals:%Integer=0</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit $fnumber(Number,".",Decimals)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>