[Mumps2Py:] [117] test file for the fnumber intrinsic function

[subversion@xxxxxxxxxxxxx]

Revision: 117
Author:   pgallot
Date:     2008-02-18 20:50:10 +0000 (Mon, 18 Feb 2008)

Log Message:
-----------
test file for the fnumber intrinsic function

Added Paths:
-----------
    trunk/testfiles/fnumber.mps


Added: trunk/testfiles/fnumber.mps
===================================================================
--- trunk/testfiles/fnumber.mps	                        (rev 0)
+++ trunk/testfiles/fnumber.mps	2008-02-18 20:50:10 UTC (rev 117)
@@ -0,0 +1,7 @@
+ SET X=-100000,Y=2000
+ WRITE "SUPPRESS NEGATIVE SIGN:",$FNUMBER(X,"-"),!
+ WRITE "TRAILING SIGN:",$FNUMBER(X,"T"),!
+ WRITE "NEGATIVE NUMBERS IN ():",$FNUMBER(X,"P"),!
+ WRITE "COMMAS IN NUMBER:",$FNUMBER(X,","),!
+ WRITE "NUMBER WITH FRACTION:",$FNUMBER(X,"",2),!
+ WRITE "FORCE + SIGN IF POSITIVE:",$FNUMBER(Y,"+"),!