--- parser3/www/htdocs/Attic/index.html	2002/02/18 12:05:02	1.7
+++ parser3/www/htdocs/Attic/index.html	2002/02/26 12:49:46	1.15
@@ -7,7 +7,10 @@ $response:charset[windows-1251]
 $response:content-type[$.value[text/html]$.charset[$response:charset]]
 
 @main[]
-^divnamestop[]
+^xmlprobs[]
+#^doubleprobs[]
+#^math:random(-10)
+#^divnamestop[]
 #^arrayclone[]
 #^operator_tricks[]
 #^xoutputrusattr[]
@@ -100,6 +103,21 @@ $response:content-type[$.value[text/html
 <hr>
 OK
 
+@xmlprobs[]
+$xmlDataType[^xdoc::load[program.xml]]
+#<pre>^taint[^xmlDataType.string[]]
+$xmlDataTypes[^xmlDataType.select[programs/program[@id=4]/data]]
+#=^xmlDataTypes._count[]=
+=^xmlDataTypes.0.getAttribute[type-id]=
+
+@doubleprobs[]
+$1(^math:radians(180))
+$2($math:PI)
+^if(^1.format[%.10f]==^2.format[%.10f]){y;n}
+^if($1==$2){y;n}
+^if(^math:radians(180)==$math:PI){y;n}
+
+
 @divnamestop[]
 $a(10)
 ^eval($a\3)