===================================================================
RCS file: /home/cvs/OpenXM/src/kan96xx/Doc/oxasir.asir,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -p -r1.1 -r1.2
--- OpenXM/src/kan96xx/Doc/oxasir.asir	1999/10/08 02:12:02	1.1
+++ OpenXM/src/kan96xx/Doc/oxasir.asir	2002/08/10 13:30:49	1.2
@@ -123,7 +123,10 @@ def sm1_rat2plist2(TT) {
 }
 
   
-  
+def oxasir_bfct(F) {
+  G = bfct(F);
+  return rtostr(G);
+}