--- parser3/www/htdocs/Attic/index.html 2002/01/31 11:51:47 1.2
+++ parser3/www/htdocs/Attic/index.html 2002/02/18 15:23:15 1.10
@@ -1,10 +1,17 @@
-@auto[]
+#@USE
+#z/t.p
+
+@autoz[]
$request:charset[windows-1251]
$response:charset[windows-1251]
$response:content-type[$.value[text/html]$.charset[$response:charset]]
@main[]
-$form:if
+^doubleprobs[]
+#^math:random(-10)
+#^divnamestop[]
+#^arrayclone[]
+#^operator_tricks[]
#^xoutputrusattr[]
#^xdocset1[]
#^regexp3[]
@@ -95,6 +102,41 @@ $form:if
OK
+@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)
+
+@arrayclone[]
+$t[^table::create{a b
+1 11
+2 22
+}]
+$c[^table::create[$t]]
+^c.append{2 33}
+^t.count[]
+^c.count[]
+
+@operator_tricks[]
+^if(1){$a[^t[]]}
+$a!
+$a($b)
+^if(1){y}{n}
+$MAIN:a(^t[] eq OK)
+#$MAIN:a(1)
+^if($a){y}{n}
+#^if(1){y}{n}
+$form:if
+$a[$.n[1]]
+$a.if
+
@xoutputrusattr[]
$d[^xdoc::set{}]
^show_xdoc2[$d]