diff --git a/src/Amalgam/interpreter/InterpreterOpcodesTransformations.cpp b/src/Amalgam/interpreter/InterpreterOpcodesTransformations.cpp index 7a11b02b..c48bbf94 100644 --- a/src/Amalgam/interpreter/InterpreterOpcodesTransformations.cpp +++ b/src/Amalgam/interpreter/InterpreterOpcodesTransformations.cpp @@ -1669,18 +1669,17 @@ EvaluableNodeReference Interpreter::InterpretNode_ENT_ZIP(EvaluableNode *en, boo //get value EvaluableNode *value = nullptr; - if(value_list != nullptr) + if(EvaluableNode::IsOrderedArray(value_list)) { - if(value_list->IsOrderedArray() && i < value_list->GetOrderedChildNodes().size()) - { - value = value_list->GetOrderedChildNodes()[i]; - } - else //not a list, so just use the value itself - { - value = value_list; - //reusing the value, so can't be cycle free in the result - result->SetNeedCycleCheck(true); - } + auto &vl_ocn = value_list->GetOrderedChildNodesReference(); + if(i < vl_ocn.size()) + value = vl_ocn[i]; + } + else //not a list, so just use the value itself + { + value = value_list; + //reusing the value, so can't be cycle free in the result + result->SetNeedCycleCheck(true); } //if no function, then just put value into the appropriate slot for the index diff --git a/src/Amalgam/out.txt b/src/Amalgam/out.txt index 3d519e4f..e89283eb 100644 --- a/src/Amalgam/out.txt +++ b/src/Amalgam/out.txt @@ -1,5 +1,5 @@ --Amalgam Version-- -54.4.1-alpha+local.dev +0.0.0 --system_time-- --label-- hello world: 12 and 2 @@ -8,239 +8,239 @@ hello world: 12 and 2 6 notakeyword --get_defaults-- -{ - != 0.65 - !~ 0.1 - * 0.65 - + 0.9 - "-" 0.65 - / 0.6 - < 0.85 - <= 0.85 - = 1.2 - > 0.85 - >= 0.85 - abs 0.4 - accum 0.25 - accum_entity_roots 0.01 - accum_to_entities 0.5 - acos 0.2 - acosh 0.07 - and 0.75 - append 0.65 - apply 0.5 - args 0.08 - asin 0.2 - asinh 0.07 - assign 0.95 - assign_entity_roots 0.01 - assign_to_entities 0.5 - assoc 3 - associate 0.8 - atan 0.2 - atanh 0.07 - call 1.5 - call_container 0.5 - call_entity 0.5 - call_entity_get_changes 0.05 - call_sandboxed 0.25 - ceil 0.6 - clone_entities 0.1 - commonality 0.2 - commonality_entities 0.02 - compute_entity_convictions 0.2 - compute_entity_distance_contributions 0.2 - compute_entity_group_kl_divergence 0.2 - compute_entity_kl_divergences 0.2 - compute_on_contained_entities 0.3 - concat 0.2 - conclude 0.05 - contained_entities 0.3 - contains_entity 0.1 - contains_index 0.5 - contains_label 0.5 - contains_value 0.5 - cos 0.2 - cosh 0.07 - create_entities 0.1 - crypto_sign 0.01 - crypto_sign_verify 0.01 - current_index 0.1 - current_value 0.1 - declare 0.5 - decrypt 0.01 - destroy_entities 0.1 - difference 0.2 - difference_entities 0.02 - direct_assign_to_entities 0.01 - direct_retrieve_from_entity 0.01 - dot_product 0.2 - edit_distance 0.2 - edit_distance_entities 0.02 - encrypt 0.01 - erf 0.05 - exp 0.4 - explode 0.02 - false 0.1 - filter 0.5 - first 0.65 - flatten_entity 0.02 - floor 0.6 - format 0.05 - generalized_distance 0.15 - get 3 - get_all_labels 0.05 - get_comments 0.05 - get_concurrency 0.01 - get_defaults 0.01 - get_digits 0.1 - get_entity_comments 0.01 - get_entity_rand_seed 0.01 - get_entity_root_permission 0.01 - get_labels 0.1 - get_rand_seed 0.02 - get_type 0.25 - get_type_string 0.25 - get_value 0.15 - if 1 - indices 0.5 - intersect 0.2 - intersect_entities 0.02 - keep 0.5 - lambda 1.5 - last 0.65 - let 0.95 - lgamma 0.07 - list 2 - load 0.01 - load_entity 0.01 - load_persistent_entity 0.01 - log 0.4 - map 1.1 - max 0.4 - min 0.4 - mix 0.2 - mix_entities 0.02 - mix_labels 0.2 - mod 0.2 - move_entities 0.15 - mutate 0.2 - mutate_entity 0.02 - not 0.75 - null 0.75 - number 8 - opcode_stack 0.01 - or 0.75 - parallel 0.5 - parse 0.05 - pow 0.2 - previous_result 0.05 - print 0.01 - query_among 0.2 - query_between 0.2 - query_count 0.2 - query_equals 0.2 - query_exists 0.2 - query_generalized_mean 0.2 - query_greater_or_equal_to 0.2 - query_in_entity_list 0.2 - query_less_or_equal_to 0.2 - query_max 0.2 - query_max_difference 0.2 - query_min 0.2 - query_min_difference 0.2 - query_mode 0.2 - query_nearest_generalized_distance 0.2 - query_not_among 0.2 - query_not_between 0.2 - query_not_equals 0.2 - query_not_exists 0.2 - query_not_in_entity_list 0.2 - query_quantile 0.2 - query_sample 0.2 - query_select 0.2 - query_sum 0.2 - query_value_masses 0.2 - query_weighted_sample 0.2 - query_within_generalized_distance 0.2 - rand 0.4 - range 0.5 - reduce 0.7 - remove 0.5 - replace 0.1 - retrieve 0.1 - retrieve_entity_root 0.01 - retrieve_from_entity 0.5 - return 0.05 - reverse 0.4 - rewrite 0.1 - round 0.6 - seq 0.5 - set 0.35 - set_comments 0.05 - set_concurrency 0.01 - set_digits 0.1 - set_entity_rand_seed 0.01 - set_entity_root_permission 0.01 - set_labels 0.1 - set_rand_seed 0.02 - set_type 0.35 - set_value 0.15 - sin 0.2 - sinh 0.07 - size 0.6 - sort 0.5 - split 0.2 - sqrt 0.2 - stack 0.05 - store 0.01 - store_entity 0.01 - string 4 - substr 0.2 - symbol 10 - system 0.05 - system_time 0.01 - tail 0.65 - tan 0.2 - tanh 0.07 - target 0.1 - tgamma 0.07 - total_entity_size 0.02 - total_size 0.2 - true 0.1 - trunc 0.65 - union 0.2 - union_entities 0.02 - unparse 0.05 - unzip 0.25 - values 0.5 - weave 0.2 - weighted_rand 0.02 - while 0.1 - xor 0.75 - zip 0.35 - zip_labels 0.02 - ~ 0.1 -} -{ - change_label 0.04 - change_type 0.28 - deep_copy_elements 0.05 - delete 0.12 - delete_elements 0.04 - insert 0.23 - swap_elements 0.24 -} +{ + != 0.65 + !~ 0.1 + * 0.65 + + 0.9 + "-" 0.65 + / 0.6 + < 0.85 + <= 0.85 + = 1.2 + > 0.85 + >= 0.85 + abs 0.4 + accum 0.25 + accum_entity_roots 0.01 + accum_to_entities 0.5 + acos 0.2 + acosh 0.07 + and 0.75 + append 0.65 + apply 0.5 + args 0.08 + asin 0.2 + asinh 0.07 + assign 0.95 + assign_entity_roots 0.01 + assign_to_entities 0.5 + assoc 3 + associate 0.8 + atan 0.2 + atanh 0.07 + call 1.5 + call_container 0.5 + call_entity 0.5 + call_entity_get_changes 0.05 + call_sandboxed 0.25 + ceil 0.6 + clone_entities 0.1 + commonality 0.2 + commonality_entities 0.02 + compute_entity_convictions 0.2 + compute_entity_distance_contributions 0.2 + compute_entity_group_kl_divergence 0.2 + compute_entity_kl_divergences 0.2 + compute_on_contained_entities 0.3 + concat 0.2 + conclude 0.05 + contained_entities 0.3 + contains_entity 0.1 + contains_index 0.5 + contains_label 0.5 + contains_value 0.5 + cos 0.2 + cosh 0.07 + create_entities 0.1 + crypto_sign 0.01 + crypto_sign_verify 0.01 + current_index 0.1 + current_value 0.1 + declare 0.5 + decrypt 0.01 + destroy_entities 0.1 + difference 0.2 + difference_entities 0.02 + direct_assign_to_entities 0.01 + direct_retrieve_from_entity 0.01 + dot_product 0.2 + edit_distance 0.2 + edit_distance_entities 0.02 + encrypt 0.01 + erf 0.05 + exp 0.4 + explode 0.02 + false 0.1 + filter 0.5 + first 0.65 + flatten_entity 0.02 + floor 0.6 + format 0.05 + generalized_distance 0.15 + get 3 + get_all_labels 0.05 + get_comments 0.05 + get_concurrency 0.01 + get_defaults 0.01 + get_digits 0.1 + get_entity_comments 0.01 + get_entity_rand_seed 0.01 + get_entity_root_permission 0.01 + get_labels 0.1 + get_rand_seed 0.02 + get_type 0.25 + get_type_string 0.25 + get_value 0.15 + if 1 + indices 0.5 + intersect 0.2 + intersect_entities 0.02 + keep 0.5 + lambda 1.5 + last 0.65 + let 0.95 + lgamma 0.07 + list 2 + load 0.01 + load_entity 0.01 + load_persistent_entity 0.01 + log 0.4 + map 1.1 + max 0.4 + min 0.4 + mix 0.2 + mix_entities 0.02 + mix_labels 0.2 + mod 0.2 + move_entities 0.15 + mutate 0.2 + mutate_entity 0.02 + not 0.75 + null 0.75 + number 8 + opcode_stack 0.01 + or 0.75 + parallel 0.5 + parse 0.05 + pow 0.2 + previous_result 0.05 + print 0.01 + query_among 0.2 + query_between 0.2 + query_count 0.2 + query_equals 0.2 + query_exists 0.2 + query_generalized_mean 0.2 + query_greater_or_equal_to 0.2 + query_in_entity_list 0.2 + query_less_or_equal_to 0.2 + query_max 0.2 + query_max_difference 0.2 + query_min 0.2 + query_min_difference 0.2 + query_mode 0.2 + query_nearest_generalized_distance 0.2 + query_not_among 0.2 + query_not_between 0.2 + query_not_equals 0.2 + query_not_exists 0.2 + query_not_in_entity_list 0.2 + query_quantile 0.2 + query_sample 0.2 + query_select 0.2 + query_sum 0.2 + query_value_masses 0.2 + query_weighted_sample 0.2 + query_within_generalized_distance 0.2 + rand 0.4 + range 0.5 + reduce 0.7 + remove 0.5 + replace 0.1 + retrieve 0.1 + retrieve_entity_root 0.01 + retrieve_from_entity 0.5 + return 0.05 + reverse 0.4 + rewrite 0.1 + round 0.6 + seq 0.5 + set 0.35 + set_comments 0.05 + set_concurrency 0.01 + set_digits 0.1 + set_entity_rand_seed 0.01 + set_entity_root_permission 0.01 + set_labels 0.1 + set_rand_seed 0.02 + set_type 0.35 + set_value 0.15 + sin 0.2 + sinh 0.07 + size 0.6 + sort 0.5 + split 0.2 + sqrt 0.2 + stack 0.05 + store 0.01 + store_entity 0.01 + string 4 + substr 0.2 + symbol 10 + system 0.05 + system_time 0.01 + tail 0.65 + tan 0.2 + tanh 0.07 + target 0.1 + tgamma 0.07 + total_entity_size 0.02 + total_size 0.2 + true 0.1 + trunc 0.65 + union 0.2 + union_entities 0.02 + unparse 0.05 + unzip 0.25 + values 0.5 + weave 0.2 + weighted_rand 0.02 + while 0.1 + xor 0.75 + zip 0.35 + zip_labels 0.02 + ~ 0.1 +} +{ + change_label 0.04 + change_type 0.28 + deep_copy_elements 0.05 + delete 0.12 + delete_elements 0.04 + insert 0.23 + swap_elements 0.24 +} --parse and unparse-- (print "hello") -[(null) (null) .infinity -.infinity] +[(null) (null) .infinity -.infinity] -{b 2 c ["alpha" "beta" "gamma"] a 1} -{ - b 2 - c ["alpha" "beta" "gamma"] - a 1 -} +{b 2 a 1 c ["alpha" "beta" "gamma"]} +{ + b 2 + a 1 + c ["alpha" "beta" "gamma"] +} --if-- if 1 @@ -251,25 +251,25 @@ if 2 2 3 --lambda and call-- -(declare - {x 6} - (+ x 2) -) +(declare + {x 6} + (+ x 2) +) 5 -(lambda - (+ 1 2) -) +(lambda + (+ 1 2) +) --call_sandboxed-- 7 -(null) +(null) 11 -(null) +(null) 11 (null) 11 -(null) +(null) (null) --while-- @@ -299,78 +299,78 @@ declare1 success --assign-- 10 20 -[ - 0 - 1 - 2 - {a 1 b 2 c 3} -] -[ - 0 - "not 1" - 2 - {a 1 b 2 c 3} -] -[ - 0 - "not 1" - 2 - { - a ["a attribute"] - b 2 - c ["c attribute"] - } -] +[ + 0 + 1 + 2 + {a 1 b 2 c 3} +] +[ + 0 + "not 1" + 2 + {a 1 b 2 c 3} +] +[ + 0 + "not 1" + 2 + { + a ["a attribute"] + b 2 + c ["c attribute"] + } +] --accum-- 10 11 abcdef -[1 2 3 4 5 6] - -[ - 1 - 2 - 3 - 4 - 5 - 6 - "7" - 8 -] - -{ - a 1 - b 2 - c 3 - d 4 -} - -{ - a 1 - b 2 - c 3 - d 4 - e 5 -} +[1 2 3 4 5 6] + +[ + 1 + 2 + 3 + 4 + 5 + 6 + "7" + 8 +] + +{ + a 1 + b 2 + c 3 + d 4 +} + +{ + a 1 + b 2 + c 3 + d 4 + e 5 +} 5 -[ - 0 - 2 - 2 - {a 1 b 2 c 3} -] +[ + 0 + 2 + 2 + {a 1 b 2 c 3} +] --retrieve-- 1 1 -[1 2] -{raaa 2 rwww 1} +[1 2] +{raaa 2 rwww 1} --assign-- 8 12 -[0 1 10 3 4] -{a 3 b 2} +[0 1 10 3 4] +{a 3 b 2} --+-- 10 ----- @@ -383,86 +383,86 @@ abcdef --mod-- 1 --get_digits-- -[ - 1 - 2 - 3 - 4 - 5 - 6 - 7 - 8 - 0 - 0 - 0 -] -[ - 1 - 2 - 3 - 4 - 5 - 6 - 7 - 8 - 8 - 9 - 9 -] -[ - 5 - 6 - 7 - 8 - 0 - 0 - 0 - 0 - 0 - 0 - 0 -] -[1 1 1] -[1 0 0 0 0] -[1 2 0] -[1 1 1 1] -[1 0 0 0 0] -[2 0] -[0 0 0 0 1 1] -[1 0] -[ - 1 - 0 - 0 - 0 - 0 - 0 - 1 - 0 - 0 - 0 - 1 -] -[1 2 3 4 5] -[5 6 7 8 0] -[1 2 3 4 5] -[5 6 7 8 0] -[] -[] -[] -[ - 4 - 0 - 0 - 0 - 0 - 0 - 0 - 0 - 0 - 0 - 0 -] +[ + 1 + 2 + 3 + 4 + 5 + 6 + 7 + 8 + 0 + 0 + 0 +] +[ + 1 + 2 + 3 + 4 + 5 + 6 + 7 + 8 + 8 + 9 + 9 +] +[ + 5 + 6 + 7 + 8 + 0 + 0 + 0 + 0 + 0 + 0 + 0 +] +[1 1 1] +[1 0 0 0 0] +[1 2 0] +[1 1 1 1] +[1 0 0 0 0] +[2 0] +[0 0 0 0 1 1] +[1 0] +[ + 1 + 0 + 0 + 0 + 0 + 0 + 1 + 0 + 0 + 0 + 1 +] +[1 2 3 4 5] +[5 6 7 8 0] +[1 2 3 4 5] +[5 6 7 8 0] +[] +[] +[] +[ + 4 + 0 + 0 + 0 + 0 + 0 + 0 + 0 + 0 + 0 + 0 +] --set_digits-- 5554567.8 1234567.555 @@ -477,9 +477,9 @@ abcdef 5.555567800000001e+100 1.2345555499999999e+100 1.23456585e+100 -[1 0 1 0] -[1 0 1 0] -[1 0 1 0] +[1 0 1 0] +[1 0 1 0] +[1 0 1 0] --floor-- 1 --ceil-- @@ -510,15 +510,15 @@ abcdef --sin-- 0.479425538604203 --asin-- -0.5235987755982988 +0.5235987755982989 --cos-- 0.8775825618903728 --acos-- -1.0471975511965976 +1.0471975511965979 --tan-- 0.5463024898437905 --atan-- -0.46364760900080615 +0.4636476090008061 0.7853981633974483 --sinh-- 0.5210953054937474 @@ -527,7 +527,7 @@ abcdef --cosh-- 1.1276259652063807 --acosh-- -(null) +(null) --tanh-- 0.46211715726000974 @@ -538,7 +538,7 @@ abcdef --tgamma-- 1.772453850905516 --lgamma-- -0.5723649429247 +0.5723649429247001 --sqrt-- 0.7071067811865476 --pow-- @@ -586,7 +586,7 @@ abcdef 26 2.23606797749979 27 3.0000000031604355 28 3 -29 (null) +29 (null) 30 6 31 4 @@ -617,40 +617,40 @@ abcdef 1 0 a -(null) +(null) --tail-- -[9.2 "this"] -[2 3 4 5 6] -[5 6] -[3 4 5 6] -[] -[1 2 3 4 5 6] -[1 2 3 4 5 6] -[] -{ - a 1 - b 2 - c 3 - e 5 - f 6 -} -{a 1 e 5} -{ - a 1 - c 3 - e 5 - f 6 -} -{ - a 1 - b 2 - c 3 - d 4 - e 5 - f 6 -} -{} +[9.2 "this"] +[2 3 4 5 6] +[5 6] +[3 4 5 6] +[] +[1 2 3 4 5 6] +[1 2 3 4 5 6] +[] +{ + a 1 + b 2 + c 3 + d 4 + e 5 +} +{c 3 d 4} +{ + a 1 + b 2 + c 3 + d 4 +} +{ + a 1 + b 2 + c 3 + d 4 + e 5 + f 6 +} +{} 2 0 bcdef @@ -660,7 +660,7 @@ abcdef abcdef -(null) +(null) --last-- this @@ -668,40 +668,40 @@ this 1 0 c -(null) +(null) --trunc-- -[4 9.2] -[1 2 3 4 5] -[1 2] -[1 2 3 4] -[] -[1 2 3 4 5 6] -[1 2 3 4 5 6] -[] -{ - a 1 - b 2 - c 3 - e 5 - f 6 -} -{a 1 e 5} -{ - a 1 - c 3 - e 5 - f 6 -} -{ - a 1 - b 2 - c 3 - d 4 - e 5 - f 6 -} -{} +[4 9.2] +[1 2 3 4 5] +[1 2] +[1 2 3 4] +[] +[1 2 3 4 5 6] +[1 2 3 4 5 6] +[] +{ + a 1 + b 2 + c 3 + d 4 + e 5 +} +{c 3 d 4} +{ + a 1 + b 2 + c 3 + d 4 +} +{ + a 1 + b 2 + c 3 + d 4 + e 5 + f 6 +} +{} 2 0 abcde @@ -711,252 +711,252 @@ abcdef abcdef -(null) +(null) --append-- -[ - 1 - 2 - 3 - 4 - 5 - 6 - 7 - 8 - 9 -] -{ - 0 1 - 1 2 - 2 3 - 3 7 - 4 8 - 5 9 - a 4 - b 5 - c 6 - d 10 - e 11 -} -[4 9.2 "this" "end"] -{ - 0 4 - 1 9.2 - 2 "this" - 3 "end" -} +[ + 1 + 2 + 3 + 4 + 5 + 6 + 7 + 8 + 9 +] +{ + 0 1 + 1 2 + 2 3 + 3 7 + 4 8 + 5 9 + a 4 + b 5 + c 6 + d 10 + e 11 +} +[4 9.2 "this" "end"] +{ + 0 4 + 1 9.2 + 2 "this" + 3 "end" +} --size-- 3 4 5 --range-- -[ - 0 - 1 - 2 - 3 - 4 - 5 - 6 - 7 - 8 - 9 - 10 -] -[ - 10 - 9 - 8 - 7 - 6 - 5 - 4 - 3 - 2 - 1 - 0 -] -[] -[0 1 2 3 4 5] -[12 12 12 12 12 12] -[1 2 3 4 5 6] -[1 2 3 4 5 6] +[ + 0 + 1 + 2 + 3 + 4 + 5 + 6 + 7 + 8 + 9 + 10 +] +[ + 10 + 9 + 8 + 7 + 6 + 5 + 4 + 3 + 2 + 1 + 0 +] +[] +[0 1 2 3 4 5] +[12 12 12 12 12 12] +[1 2 3 4 5 6] +[1 2 3 4 5 6] --replace-- -[ - {a 13} -] -[ - [4 5 6] - (null) - 1 -] -[ - [4 5 6] - (null) - 1 -] -[ - {a 1 b 2} -] +[ + {a 13} +] +[ + [4 5 6] + (null) + 1 +] +[ + [4 5 6] + (null) + 1 +] +[ + {a 1 b 2} +] --rewrite-- -[ - {a 14} -] -[ - (associate "a" 312) -] -[ - 8 - 8 - 8 - 8 - 8 - 8 - 8 - 8 - 8 -] -(+ 17 a) +[ + {a 14} +] +[ + (associate "a" 312) +] +[ + 8 + 8 + 8 + 8 + 8 + 8 + 8 + 8 + 8 +] +(+ 17 a) --map-- -[2 4 6 8] -[ - 10 - 2 - 22 - 5 - 34 - 8 - 46 - 11 -] -{ - 10 11 - 20 22 - 30 33 - 40 44 -} -[3 4 5 6 7 8] -[3 4 5 6 7 (null)] -{ - 0 3 - 1 (null) - 2 (null) - 3 (null) - a (null) -} +[2 4 6 8] +[ + 10 + 2 + 22 + 5 + 34 + 8 + 46 + 11 +] +{ + 10 11 + 20 22 + 30 33 + 40 44 +} +[3 4 5 6 7 8] +[3 4 5 6 7 (null)] +{ + 0 3 + 1 (null) + 2 (null) + 3 (null) + a (null) +} --filter-- -[3 4] -[10 1 20] -{10 1} -[10 1 20 30 40 4] -[ - 10 - 1 - 20 - 30 - "" - 40 - 4 -] -{ - a 10 - b 1 - c 20 - d "" - e 30 - f 3 - h 4 -} -{ - a 10 - b 1 - c 20 - d "" - e 30 - f 3 - h 4 -} +[3 4] +[10 1 20] +{10 1} +[10 1 20 30 40 4] +[ + 10 + 1 + 20 + 30 + "" + 40 + 4 +] +{ + a 10 + b 1 + c 20 + d "" + e 30 + f 3 + h 4 +} +{ + a 10 + b 1 + c 20 + d "" + e 30 + f 3 + h 4 +} --weave-- -[1 2 3] - -[1 2 3 4 5 6] - -[2 (null) 4 (null) 6 (null)] - -["a" 2 @(get (target 2) 0) 4 @(get (target 2) 0) 6] - -[ - 1 - 2 - 3 - 4 - 5 - 6 - 7 - 8 - 9 -] - -[ - 1 - 2 - 3 - 4 - 5 - 6 - 7 - 8 - 9 - 10 - 11 - 12 -] - -[ - 1 - 2 - 3 - 4 - 5 - 6 - 7 - 8 - 9 - 10 - 11 - 12 -] - -[ - 2 - 4 - 6 - 8 - 10 - 12 - 14 - 16 - 18 - 20 - 22 - 24 -] - -[1 2 3 4 5 6] - -[ - 1 - 2 - 3 - 5 - 4 - 5 - 6 - 6 - 7 -] - -[3 4 5] +[1 2 3] + +[1 2 3 4 5 6] + +[2 (null) 4 (null) 6 (null)] + +["a" 2 @(get (target 2) 0) 4 @(get (target 2) 0) 6] + +[ + 1 + 2 + 3 + 4 + 5 + 6 + 7 + 8 + 9 +] + +[ + 1 + 2 + 3 + 4 + 5 + 6 + 7 + 8 + 9 + 10 + 11 + 12 +] + +[ + 1 + 2 + 3 + 4 + 5 + 6 + 7 + 8 + 9 + 10 + 11 + 12 +] + +[ + 2 + 4 + 6 + 8 + 10 + 12 + 14 + 16 + 18 + 20 + 22 + 24 +] + +[1 2 3 4 5 6] + +[ + 1 + 2 + 3 + 5 + 4 + 5 + 6 + 6 + 7 +] + +[3 4 5] --reduce-- 24 24 @@ -965,267 +965,275 @@ abcdef 15 10 --reverse-- -[5 4 3 2 1] +[5 4 3 2 1] --sort-- -[1 3 4 5 9] -[ - 1 - 3.2 - 4 - "b" - "hello" - [1 2 3] - "n" - "soy" -] -[ - 1 - "1x" - "10" - 20 - "z2" - "z10" - "z100" -] -[ - "001x" - "010" - 1 - 20 - "z002" - "z010" - "z100" -] -[1 3 4 5 9] -[ - 1 - 0 - 6 - 2 - 10 - 3 - 9 - 4 - 5 - 8 - 7 -] -[ - "2020-06-08 lunes 11.32.36" - "2020-06-08 lunes 11.32.37" - "2020-06-08 lunes 11.32.38" - "2020-06-08 lunes 11.32.39" - "2020-06-08 lunes 11.32.46" - "2020-06-08 lunes 11.32.47" - "2020-06-08 lunes 11.32.48" - "2020-06-08 lunes 11.32.49" - "2020-06-08 lunes 11.32.56" - "2020-06-08 lunes 11.32.57" - "2020-06-08 lunes 11.32.58" - "2020-06-08 lunes 11.32.59" - "2020-06-08 lunes 11.33.36" - "2020-06-08 lunes 11.33.37" - "2020-06-08 lunes 11.33.38" - "2020-06-08 lunes 11.33.39" - "2020-06-08 lunes 11.33.40" - "2020-06-08 lunes 11.33.41" - "2020-06-08 lunes 11.33.42" - "2020-06-08 lunes 11.33.43" - "2020-06-08 lunes 11.33.44" - "2020-06-08 lunes 11.33.45" - "2020-06-08 lunes 11.33.46" - "2020-06-08 lunes 11.33.47" - "2020-06-08 lunes 11.33.48" -] -[1 3] -[9 5] -[1 3] -[9 5] +[1 3 4 5 9] +[ + 1 + 3.2 + 4 + "b" + "hello" + [1 2 3] + "n" + "soy" +] +[ + 1 + "1x" + "10" + 20 + "z2" + "z10" + "z100" +] +[ + "001x" + "010" + 1 + 20 + "z002" + "z010" + "z100" +] +[1 3 4 5 9] +[ + 1 + 2 + 9 + 3 + 0 + 4 + 5 + 8 + 7 + 10 + 6 +] +[ + "2020-06-08 lunes 11.32.36" + "2020-06-08 lunes 11.32.37" + "2020-06-08 lunes 11.32.38" + "2020-06-08 lunes 11.32.39" + "2020-06-08 lunes 11.32.46" + "2020-06-08 lunes 11.32.47" + "2020-06-08 lunes 11.32.48" + "2020-06-08 lunes 11.32.49" + "2020-06-08 lunes 11.32.56" + "2020-06-08 lunes 11.32.57" + "2020-06-08 lunes 11.32.58" + "2020-06-08 lunes 11.32.59" + "2020-06-08 lunes 11.33.36" + "2020-06-08 lunes 11.33.37" + "2020-06-08 lunes 11.33.38" + "2020-06-08 lunes 11.33.39" + "2020-06-08 lunes 11.33.40" + "2020-06-08 lunes 11.33.41" + "2020-06-08 lunes 11.33.42" + "2020-06-08 lunes 11.33.43" + "2020-06-08 lunes 11.33.44" + "2020-06-08 lunes 11.33.45" + "2020-06-08 lunes 11.33.46" + "2020-06-08 lunes 11.33.47" + "2020-06-08 lunes 11.33.48" +] +[1 3] +[9 5] +[1 3] +[9 5] --indices-- -["4" "b" "c" "a"] -[ - 0 - 1 - 2 - 3 - 4 - 5 - 6 - 7 -] +["b" "4" "a" "c"] +[ + 0 + 1 + 2 + 3 + 4 + 5 + 6 + 7 +] --values-- -["d" 2 3 1] -[ - "a" - 1 - "b" - 2 - "c" - 3 - 4 - "d" -] -[ - "a" - 1 - "b" - 2 - "c" - 3 - 4 - "d" -] -["d" 2 3 1] -[ - 1 - 2 - 3 - 4 - 5 - 6 - 7 - 8 - 9 - 10 - 11 - 12 - 13 - 14 - 15 - 16 - 17 - 18 - 19 - 20 -] +["d" 2 1 3] +[ + "a" + 1 + "b" + 2 + "c" + 3 + 4 + "d" +] +[ + "a" + 1 + "b" + 2 + "c" + 3 + 4 + "d" +] +[1 2 3 "d"] +[ + 1 + 2 + 3 + 4 + 5 + 6 + 7 + 8 + 9 + 10 + 11 + 12 + 13 + 14 + 15 + 16 + 17 + 18 + 19 + 20 +] --contains_index-- -(true) +(true) -(false) +(false) -(true) +(true) -(false) +(false) --contains_value-- -(true) +(true) -(false) +(false) -(true) +(true) -(false) +(false) -(true) -(true) -(true) -(true) -(false) -(true) +(true) +(true) +(true) +(true) +(false) +(true) --remove-- -{a 1 b 2 c 3} -[ - "a" - 1 - "b" - 2 - 3 - 4 - "d" -] -{b 2 c 3} -[1 "b" 2 3 4 "d"] -[1 3 4 5] -[0 1 2 3 4] -[1 2 3 4] -[] +{a 1 b 2 c 3} +[ + "a" + 1 + "b" + 2 + 3 + 4 + "d" +] +{b 2 c 3} +[ + "a" + 1 + "b" + 2 + 3 + 4 + "d" +] +[1 3 4 5] +[0 1 2 3 4] +[1 2 3 4] +[] --keep-- -{4 "d"} -["c"] -{4 "d" a 1} -["c"] -[0 2] -[5] -[0 5] -[0 1 2 3 4 5] +{4 "d"} +["c"] +{4 "d" a 1} +["c"] +[0 2] +[5] +[0 5] +[0 1 2 3 4 5] --zip-- -{ - a 1 - b 2 - c 3 - d 4 -} -{ - a (null) - b (null) - c (null) - d (null) -} -{ - a 3 - b @(get - (target 2) - "a" - ) - c @(get - (target 2) - "a" - ) - d @(get - (target 2) - "a" - ) -} -{ - a 4 - b 2 - c 3 - d 4 -} -{ - a 5 - b 2 - c 3 - d 4 -} -{ - a 2 - b 1 - c @(get - (target 2) - "b" - ) - d @(get - (target 2) - "b" - ) -} +{ + a 1 + b 2 + c 3 + d 4 +} +{ + a (null) + b (null) + c (null) + d (null) +} +{ + a 3 + b @(get + (target 2) + "a" + ) + c @(get + (target 2) + "a" + ) + d @(get + (target 2) + "a" + ) +} +{ + a 4 + b 2 + c 3 + d 4 +} +{ + a 5 + b 2 + c 3 + d 4 +} +{ + a 2 + b 1 + c @(get + (target 2) + "b" + ) + d @(get + (target 2) + "b" + ) +} --unzip-- -[1 2] -[1 3 2] +[1 2] +[1 3 2] --get-- -[4 9.2 "this"] +[4 9.2 "this"] 9.2 3 1 -[9.2 "this"] +[9.2 "this"] 2: 2 (null): (null) (null): (null) 3 --set-- -{ - 4 "d" - a 1 - b 2 - c 3 - e 5 -} -[0 1 10 3 4] -{a 3 b 2} +{ + 4 "d" + a 1 + b 2 + c 3 + e 5 +} +[0 1 10 3 4] +{a 3 b 2} --target-- -[1 2 3 (null) (null)] +[1 2 3 (null) (null)] --current_index-- 3 (null) @@ -1245,357 +1253,360 @@ current_index: 2 (null) --opcode_stack-- 4 -(seq - (seq - (opcode_stack 2) - ) -) +(seq + (seq + (opcode_stack 2) + ) +) -(print) +;Full test +;This is a suite of unit tests. +; This is the second line of the unit test description. +(seq) --stack-- -[ - { - abcdefghijklmnop 1 - accum_assoc { - a 1 - b 2 - c 3 - d 4 - e 5 - } - accum_list [ - 1 - 2 - 3 - 4 - 5 - 6 - "7" - 8 - ] - accum_string "abcdef" - argv ["/Users/cmack/dev/amalgam/src/Amalgam/amlg_code/full_test.amlg"] - bar (declare - {x 6} - (+ x 2) - ) - foo (declare - {x 6} - (+ x 2) - ) - get_test_assoc { - A {B 2} - B 2 - } - interpreter "../../out/build/arm64-release-macos/amalgam-mt" - raaa 2 - rwww 1 - start_time 1726684818.2221 - www 1 - x 12 - zz 10 - } -] +[ + { + abcdefghijklmnop 1 + accum_assoc { + a 1 + b 2 + c 3 + d 4 + e 5 + } + accum_list [ + 1 + 2 + 3 + 4 + 5 + 6 + "7" + 8 + ] + accum_string "abcdef" + argv ["C:\\Users\\Chris Hazard\\Desktop\\Howso_repos\\amalgam\\src\\Amalgam\\./amlg_code/full_test.amlg"] + bar (declare + {x 6} + (+ x 2) + ) + foo (declare + {x 6} + (+ x 2) + ) + get_test_assoc { + A {B 2} + B 2 + } + interpreter "C:\\Users\\Chris Hazard\\Desktop\\Howso_repos\\amalgam\\x64\\MT_Release_EXE\\Amalgam.exe" + raaa 2 + rwww 1 + start_time 1727097549.386236 + www 1 + x 12 + zz 10 + } +] --args-- -{ - abcdefghijklmnop 1 - accum_assoc { - a 1 - b 2 - c 3 - d 4 - e 5 - } - accum_list [ - 1 - 2 - 3 - 4 - 5 - 6 - "7" - 8 - ] - accum_string "abcdef" - argv ["/Users/cmack/dev/amalgam/src/Amalgam/amlg_code/full_test.amlg"] - bar (declare - {x 6} - (+ x 2) - ) - foo (declare - {x 6} - (+ x 2) - ) - get_test_assoc { - A {B 2} - B 2 - } - interpreter "../../out/build/arm64-release-macos/amalgam-mt" - raaa 2 - rwww 1 - start_time 1726684818.2221 - www 1 - x 12 - zz 10 -} -{bbb 3} -{ - abcdefghijklmnop 1 - accum_assoc { - a 1 - b 2 - c 3 - d 4 - e 5 - } - accum_list [ - 1 - 2 - 3 - 4 - 5 - 6 - "7" - 8 - ] - accum_string "abcdef" - argv ["/Users/cmack/dev/amalgam/src/Amalgam/amlg_code/full_test.amlg"] - bar (declare - {x 6} - (+ x 2) - ) - foo (declare - {x 6} - (+ x 2) - ) - get_test_assoc { - A {B 2} - B 2 - } - interpreter "../../out/build/arm64-release-macos/amalgam-mt" - raaa 2 - rwww 1 - start_time 1726684818.2221 - www 1 - x 12 - zz 10 -} +{ + abcdefghijklmnop 1 + accum_assoc { + a 1 + b 2 + c 3 + d 4 + e 5 + } + accum_list [ + 1 + 2 + 3 + 4 + 5 + 6 + "7" + 8 + ] + accum_string "abcdef" + argv ["C:\\Users\\Chris Hazard\\Desktop\\Howso_repos\\amalgam\\src\\Amalgam\\./amlg_code/full_test.amlg"] + bar (declare + {x 6} + (+ x 2) + ) + foo (declare + {x 6} + (+ x 2) + ) + get_test_assoc { + A {B 2} + B 2 + } + interpreter "C:\\Users\\Chris Hazard\\Desktop\\Howso_repos\\amalgam\\x64\\MT_Release_EXE\\Amalgam.exe" + raaa 2 + rwww 1 + start_time 1727097549.386236 + www 1 + x 12 + zz 10 +} +{bbb 3} +{ + abcdefghijklmnop 1 + accum_assoc { + a 1 + b 2 + c 3 + d 4 + e 5 + } + accum_list [ + 1 + 2 + 3 + 4 + 5 + 6 + "7" + 8 + ] + accum_string "abcdef" + argv ["C:\\Users\\Chris Hazard\\Desktop\\Howso_repos\\amalgam\\src\\Amalgam\\./amlg_code/full_test.amlg"] + bar (declare + {x 6} + (+ x 2) + ) + foo (declare + {x 6} + (+ x 2) + ) + get_test_assoc { + A {B 2} + B 2 + } + interpreter "C:\\Users\\Chris Hazard\\Desktop\\Howso_repos\\amalgam\\x64\\MT_Release_EXE\\Amalgam.exe" + raaa 2 + rwww 1 + start_time 1727097549.386236 + www 1 + x 12 + zz 10 +} --and-- true -(false) +(false) --or-- 1 1 -(false) +(false) --xor-- -(true) +(true) -(false) +(false) --not-- -(false) +(false) -(true) +(true) --=-- -(false) +(false) -(true) +(true) -(true) +(true) -(true) +(true) -(true) +(true) -(false) +(false) --!=-- -(false) +(false) -(true) +(true) -(false) +(false) -(false) +(false) -(false) +(false) -(false) +(false) -(true) +(true) --<-- -(true) +(true) -(false) +(false) -(true) +(true) -(false) +(false) --<=-- -(true) +(true) -(true) +(true) -(true) +(true) -(false) +(false) -(false) +(false) -(false) +(false) -->-- -(true) +(true) -(false) +(false) -(true) +(true) -(false) +(false) -->=-- -(true) +(true) -(true) +(true) -(true) +(true) -(false) +(false) -(false) +(false) -(false) +(false) --~-- -(true) +(true) -(false) +(false) --!~-- -(false) +(false) -(true) +(true) --rand-- -0.3614323958521609 -0.999528005105414 -32.29889190477668 -5 +0.3085212072078084 +0.8108604140462151 +36.53852784176681 7 -[] - -[7] - -[ - 5 - 6 - 8 - 7 - 4 - 3 - 1 - 0 - 10 - 9 -] +7 +[] + +[9] + +[ + 8 + 6 + 1 + 9 + 5 + 0 + 3 + 4 + 7 + 2 +] -[28.383828960491158 33.86368353211774 42.97577816527926 20.03060100688533] +[15.147298145412242 2.8707229850232165 1.1842755192409848 26.133999503489054] --weighted_rand-- -b -["a" "a" "b" "b"] - a -["b" @(get (target 2) 0) "a" @(get (target 2) 0)] +["b" "b" "b" "b"] -["b" "a" @(get (target 2) 1) @(get (target 2) 0)] +b +["b" @(get (target 2) 0) "a" @(get (target 2) 2)] + +["b" @(get (target 2) 0) @(get (target 2) 0) "a"] -infinity test c or d: ["d" "c" "d" "d"] +infinity test c or d: ["d" "d" "c" "d"] -infinity test c or d: ["c" @(get (target 2) 0) "d" @(get (target 2) 0)] +infinity test c or d: ["c" "d" @(get (target 2) 1) @(get (target 2) 0)] -{a 27 b 47 c 26} +{a 34 b 43 c 23} -{a 27 b 48 c 25} +{a 30 b 50 c 20} -["1" "3" "8"] +["3" "1" "2"] --get_rand_seed-- -$#nXgJ8U +0R'`!cl --set_rand_seed-- -0.07403619144094586 -0.018832315778081976 -0.07403619144094586 -0.018832315778081976 +0.14733430167075878 +0.7960497320657874 +0.14733430167075878 +0.7960497320657874 --true-- -(true) +(true) --false-- -(false) +(false) --null-- -(null) +(null) -(null - (+ 3 5) - 7 -) +(null + (+ 3 5) + 7 +) --node null-- -#nulltest (null) +#nulltest (null) --infinity-- .infinity -.infinity --list-- -["a" 1 "b"] +["a" 1 "b"] --associate-- -{ - 4 "d" - a 1 - b 2 - c 3 -} +{ + 4 "d" + a 1 + b 2 + c 3 +} --assoc-- -{b 2 c 3} -{(null) 3} +{b 2 c 3} +{(null) 3} --get_type-- -(+) +(+) --get_type_string-- + string --set_type-- -(- 3 4) -["b" 3 "a" 4] -["b" 3 "a" 4] -{a 4 b 3} +(- 3 4) +["b" 3 "a" 4] +["b" 3 "a" 4] +{a 4 b 3} 8.7 -(parallel - #react - (+ 3 4) -) +(parallel + #react + (+ 3 4) +) --format-- -[ - 97 - 98 - 99 - 100 - 101 - 102 - 103 - -17 - -84 - -105 - -22 - -83 - -106 - -49 - -95 -] +[ + 97 + 98 + 99 + 100 + 101 + 102 + 103 + -17 + -84 + -105 + -22 + -83 + -106 + -49 + -95 +] 1: A 2: -100 3: -100 @@ -1616,21 +1627,21 @@ string 18: Many hands make light work. 19: Many hands make light work.. 19: Many hands make light work... -20: [ - {a 3 b 4} - {c "c"} -] +20: [ + {a 3 b 4} + {c "c"} +] 21: [{"b":4,"a":3},{"d":null,"c":"c"}] 22: [{"a":3,"b":4},{"c":"c","d":null}] -23: d: 4 -b: 2 -c: 3 -e: +23: e: - a - b - - .inf +b: 2 a: 1 +d: 4 +c: 3 24: a: 1 b: 2 @@ -1642,30 +1653,30 @@ e: - - .inf -25: {a 1} -current date-time in epoch: 2024-09-18-14.40.18.230162 +25: {a 1} +current date-time in epoch: 2024-09-23-09.19.09.6988380 2020-06-07 00:22:59 1391230800 1391230800 1391230800 --13134-10-22 05:56:41 +-6053-05-28 00:24:29 2020-06-05 00:21:45 -Fri Jun 5 00:21:45 2020 EDT +06/05/20 00:21:45 EDT 45 5 s s -FriJunFri Jun 5 00:21:45 202005 5 f -jueves, ene 01, 1970 +FriJun06/05/20 00:21:4505 5 f +jueves, ene. 01, 1970 Sunday, Jun 07, 2020 -domingo, jun 07, 2020 +domingo, jun. 07, 2020 1591502400 Jun 07, 2020 -domingo, jun 07, 2020 +domingo, jun. 07, 2020 664428 -314954772 1960-01-08 11.33.48 -1960-01-08 11.33.48.010000 +1960-01-08 11.33.48.0100000 48164 48164 37364 @@ -1676,145 +1687,145 @@ domingo, jun 07, 2020 48164 13:22:44 01:22:44PM -10:22:44.330000AM +10:22:44.3300000AM 12:00:00AM 12:00:00AM 12:00:00AM --get_labels-- -["labelB"] +["labelB"] --get_all_labels-- -{ - label-number-22 #label-number-22 3 - label21 #label21 - (print - "hello world: " - (* - @(get - (target 4) - "label-number-22" - ) - 4 - ) - #label23 " and " - (* 1 2) - ) - label23 @(get - (target 2) - ["label21" 2] - ) -} -{ - labelA #labelQ #labelA - (lambda - #labelB (true) - ) - labelB @(get - (target 2) - ["labelA" 0] - ) - labelQ @(get - (target 2) - "labelA" - ) -} -{ - labelA #labelQ #labelA - (lambda - #labelB (true) - ) - labelB @(get - (target 2) - ["labelA" 0] - ) - labelQ @(get - (target 2) - "labelA" - ) -} +{ + label-number-22 #label-number-22 3 + label21 #label21 + (print + "hello world: " + (* + @(get + (target 4) + "label-number-22" + ) + 4 + ) + #label23 " and " + (* 1 2) + ) + label23 @(get + (target 2) + ["label21" 2] + ) +} +{ + labelA #labelQ #labelA + (lambda + #labelB (true) + ) + labelB @(get + (target 2) + ["labelA" 0] + ) + labelQ @(get + (target 2) + "labelA" + ) +} +{ + labelA #labelQ #labelA + (lambda + #labelB (true) + ) + labelB @(get + (target 2) + ["labelA" 0] + ) + labelQ @(get + (target 2) + "labelA" + ) +} --set_labels-- -#labelD #labelE (true) +#labelD #labelE (true) --zip_labels-- -[ - #l1 1 - #l2 2 - #l3 3 -] +[ + #l1 1 + #l2 2 + #l3 3 +] --get_comments-- comment too --set_comments-- -;new comment -(true) +;new comment +(true) --get_concurrency-- -(false) +(false) -(true) +(true) -(true) +(true) --set_concurrency-- -||(print "hello") +||(print "hello") -;complex test -#somelabel -||{a "hello" b 4} +;complex test +#somelabel +||{a "hello" b 4} --get_value-- -(true) +(true) --set_value-- 3 --explode-- -[ - "a" - "b" - "c" - "d" - "e" - "f" - "g" - "ﬗ" - "ꭖ" - "ϡ" -] -[ - "a" - "b" - "c" - "d" - "e" - "f" - "g" - "" - "" - "" - "" - "" - "" - "" - "" -] -[ - "ab" - "cd" - "ef" - "g" - "" - "" - "" - "" -] -["abc" "def" "g" "" "ϡ"] -["abcd" "efg" "" "ϡ"] +[ + "a" + "b" + "c" + "d" + "e" + "f" + "g" + "ﬗ" + "ꭖ" + "ϡ" +] +[ + "a" + "b" + "c" + "d" + "e" + "f" + "g" + "" + "" + "" + "" + "" + "" + "" + "" +] +[ + "ab" + "cd" + "ef" + "g" + "" + "" + "" + "" +] +["abc" "def" "g" "" "ϡ"] +["abcd" "efg" "" "ϡ"] --split-- -["hello world"] -["hello" "world"] -["hello" "world" "!"] -["hello" "world !"] -["hello " " the world"] -["abcdefgﬗꭖϡ"] -["abc" "de" "fgﬗꭖϡ"] -["abc" "de" "fgﬗꭖϡ"] -["abc" "de fgﬗꭖϡ"] -["abc de fgﬗꭖϡ"] +["hello world"] +["hello" "world"] +["hello" "world" "!"] +["hello" "world !"] +["hello " " the world"] +["abcdefgﬗꭖϡ"] +["abc" "de" "fgﬗꭖϡ"] +["abc" "de" "fgﬗꭖϡ"] +["abc" "de fgﬗꭖϡ"] +["abc de fgﬗꭖϡ"] --substr-- hello world ello world @@ -1826,32 +1837,32 @@ orl hxlo world e he -["he"] +["he"] -["he" "wo"] +["he" "wo"] -["he" "wo"] +["he" "wo"] -[ - ["he" "e"] -] +[ + ["he" "e"] +] -[ - ["he" "e"] - ["wo" "o"] -] +[ + ["he" "e"] + ["wo" "o"] +] -[ - ["he" "he" "h" "e"] - ["wo" "wo" "w" "o"] -] +[ + ["he" "he" "h" "e"] + ["wo" "wo" "w" "o"] +] -[ - ["he" "h"] - ["wo" "w"] -] +[ + ["he" "h"] + ["wo" "w"] +] -[] +[] h[e]ll[o] w[o]rld h[e]ll[o] world @@ -1866,94 +1877,99 @@ axdefgﬗꭖϡ --concat-- hello world --crypto_sign and crypto_sign_verify-- -valid signature: (true) +valid signature: (true) --encrypt and decrypt-- symmetric key encryption decrypted: hello public key encryption decrypted: hello --print-- -[ - 0 - 1 - 10 - 12 - 100 - 120 - 122 - 1000 - 1000.123 - 10000 - 100000 - 0.1 - 0.01 - 0.001 - 0.0001 - 1e-05 - 1.23456789e-05 - 1.2345e-149 -] -[ - -0 - -1 - -10 - -12 - -100 - -120 - -122 - -1000 - -1000.123 - -10000 - -100000 - -0.1 - -0.01 - -0.001 - -0.0001 - -1e-05 - -1.23456789e-05 - -1.2345e-149 -] +[ + 0 + 1 + 10 + 12 + 100 + 120 + 122 + 1000 + 1000.123 + 10000 + 100000 + 0.1 + 0.01 + 0.001 + 0.0001 + 1e-05 + 1.23456789e-05 + 1.2345e-149 +] +[ + -0 + -1 + -10 + -12 + -100 + -120 + -122 + -1000 + -1000.123 + -10000 + -100000 + -0.1 + -0.01 + -0.001 + -0.0001 + -1e-05 + -1.23456789e-05 + -1.2345e-149 +] .infinity -(true) +(true) -(false) +(false) --total_size-- 10 --mutate-- -[ - 1 - 2 - (lambda) - 4 - (get_labels) - 6 - 7 - (set_type) - 9 - 10 - 11 - {} - 13 - 14 - (associate "a" 1 "b" 2) -] -[ - (+) - 2 - 3 - 4 - (associate "alpha" 5 "beta" 6) - (associate - "nest" - (- - "count" - [7 (-) 9] - ) - "end" - [] - ) -] +[ + 1 + (xor) + 3 + 4 + 5 + 6 + 7 + 8 + b + (exp) + 11 + (min) + 13 + 14 + (associate + #a "a" + (contains_label) + "b" + (atan) + ) +] +[ + (-) + 2 + 3 + 4 + (associate) + (associate + (-) + (associate + "count" + [7 8 9] + ) + "end" + [10 11 (+)] + ) +] --commonality-- 3 15 @@ -1979,2180 +1995,2189 @@ decrypted: hello 3 1 --intersect-- -[ - 1 - (- 4 2) - {b 4} -] -(seq 2 1) -(parallel 2 (get_entity_comments) 1) -[ - 1 - 2 - 3 - {b 4} - (if - true - 1 - (parallel - (get_entity_comments) - #label-not-1 1 - ) - ) - [5 6] -] -[ - 1 - (associate "b" 4) -] -(replace 4 2 6 1 7) -[ - - ;comment 2 - ;comment 3 - 1 -] -[1 2 3] +[ + 1 + (- 4 2) + {b 4} +] +(seq 2 1) +(parallel 2 (get_entity_comments) 1) +[ + 1 + 2 + 3 + {b 4} + (if + true + 1 + (parallel + (get_entity_comments) + #label-not-1 1 + ) + ) + [5 6] +] +[ + 1 + (associate "b" 4) +] +(replace 4 2 6 1 7) +[ + + ;comment 2 + ;comment 3 + 1 +] +[1 2 3] --union-- -(seq 2 (get_entity_comments) 1 4 (get_entity_comments)) -[ - 1 - (- 4 2) - {a 3 b 4 c 3} -] -(parallel 2 (get_entity_comments) 1 4) -[ - 1 - 2 - 3 - {a 3 b 4 c 3} - (if - true - 1 - (parallel - (get_entity_comments) - #label-not-1 1 - ) - ) - [5 6] -] -[ - 1 - (associate "b" 4 "a" 3 "c" 3) -] -[3 4 2] -[3 2 4 3] -[ - - ;comment 1 - ;comment 2 - ;comment 3 - ;comment 4 - 1 - - ;comment x - 2 - 4 - 3 - 6 - 5 - 8 - 7 - 10 - 9 - 12 - 11 - 14 - 13 -] -[ - [1 2 3] -] - -[ - [1 2 3] -] - -(parallel - [1 2 3] -) +(seq 2 (get_entity_comments) 1 4 (get_entity_comments)) +[ + 1 + (- 4 2) + {a 3 b 4 c 3} +] +(parallel 2 (get_entity_comments) 1 4) +[ + 1 + 2 + 3 + {a 3 b 4 c 3} + (if + true + 1 + (parallel + (get_entity_comments) + #label-not-1 1 + ) + ) + [5 6] +] +[ + 1 + (associate "b" 4 "a" 3 "c" 3) +] +[3 4 2] +[3 2 4 3] +[ + + ;comment 1 + ;comment 2 + ;comment 3 + ;comment 4 + 1 + + ;comment x + 2 + 4 + 3 + 6 + 5 + 8 + 7 + 10 + 9 + 12 + 11 + 14 + 13 +] +[ + [1 2 3] +] + +[ + [1 2 3] +] + +(parallel + [1 2 3] +) --difference-- -(declare - {_ (null)} - (replace - _ - [] - (lambda - [ - a - 2 - c - 4 - d - 6 - q - 8 - e - 10 - f - 12 - g - 14 - ] - ) - ) -) -(declare - {_ (null)} - (replace - _ - [] - (lambda - { - a 2 - c (get - (current_value 1) - "c" - ) - d 6 - e (get - (current_value 1) - "e" - ) - f (get - (current_value 1) - "f" - ) - g 14 - q 8 - } - ) - ) -) -(declare - {_ (null)} - (replace - _ - [] - (lambda - [ - (get - (current_value 1) - 1 - ) - (get - (current_value 1) - 2 - ) - 6 - 8 - (get - (current_value 1) - 4 - ) - (get - (current_value 1) - 5 - ) - 14 - ] - ) - ) -) -(declare - {_ (null)} - (replace - _ - [] - (lambda - { - a 2 - c (get - (current_value 1) - "c" - ) - d 6 - e (get - (current_value 1) - "e" - ) - f (get - (current_value 1) - "f" - ) - g 14 - q 8 - } - ) - ) -) -(declare - {_ (null)} - (replace - _ - [] - (lambda - { - a 2 - g (get - (current_value 1) - "g" - ) - } - ) - ["g"] - (lambda - [ - (get - (current_value 1) - 0 - ) - 4 - ] - ) - ) -) -(declare - {_ (null)} - (replace - _ - [3] - (lambda - [ - (get - (current_value 1) - 0 - ) - 4 - ] - ) - [] - (lambda - (set_type - [ - a - 2 - g - (get - (current_value 1) - 3 - ) - ] - "associate" - ) - ) - ) -) -(declare - {_ (null)} - (replace - _ - [] - (lambda - { - 2 (null) - 5 (null) - 6 (null) - a 1 - } - ) - ) -) -(declare - {_ (null)} - (replace - _ - [] - (lambda - {2 (null) 5 (null) 6 (null)} - ) - ) -) -(declare - {_ (null)} - (replace - _ - [] - (lambda - {2 (null) 5 (null) 6 (null)} - ) - ) -) -(declare - {_ (null)} - (replace - _ - [1] - (lambda - [ - (get - (current_value 1) - 0 - ) - 4 - ] - ) - [] - (lambda - [ - 7 - (get - (current_value 1) - 1 - ) - ] - ) - ) -) -[ - 7 - [1 4] -] -(declare - {_ (null)} - (replace - _ - [1] - (lambda - [ - (get - (current_value 1) - 0 - ) - 4 - ] - ) - [0] - (lambda - (set_type - [7 8] - "+" - ) - ) - ) -) -[ - (+ 7 8) - [1 4] -] -(declare - {_ (null)} - (replace - _ - [1 0] - (lambda - [ - (get - (current_value 1) - 0 - ) - "x" - ] - ) - [1] - (lambda - [ - (get - (current_value 1) - 0 - ) - (get - (current_value 1) - 1 - ) - 4 - ] - ) - [] - (lambda - [ - 7 - (get - (current_value 1) - 1 - ) - ] - ) - ) -) -[ - 7 - [ - ["a" "x"] - 1 - 4 - ] -] +(declare + {_ (null)} + (replace + _ + [] + (lambda + [ + a + 2 + c + 4 + d + 6 + q + 8 + e + 10 + f + 12 + g + 14 + ] + ) + ) +) +(declare + {_ (null)} + (replace + _ + [] + (lambda + { + a 2 + c (get + (current_value 1) + "c" + ) + d 6 + e (get + (current_value 1) + "e" + ) + f (get + (current_value 1) + "f" + ) + g 14 + q 8 + } + ) + ) +) +(declare + {_ (null)} + (replace + _ + [] + (lambda + [ + (get + (current_value 1) + 1 + ) + (get + (current_value 1) + 2 + ) + 6 + 8 + (get + (current_value 1) + 4 + ) + (get + (current_value 1) + 5 + ) + 14 + ] + ) + ) +) +(declare + {_ (null)} + (replace + _ + [] + (lambda + { + a 2 + c (get + (current_value 1) + "c" + ) + d 6 + e (get + (current_value 1) + "e" + ) + f (get + (current_value 1) + "f" + ) + g 14 + q 8 + } + ) + ) +) +(declare + {_ (null)} + (replace + _ + ["g"] + (lambda + [ + (get + (current_value 1) + 0 + ) + 4 + ] + ) + [] + (lambda + { + a 2 + g (get + (current_value 1) + "g" + ) + } + ) + ) +) +(declare + {_ (null)} + (replace + _ + [3] + (lambda + [ + (get + (current_value 1) + 0 + ) + 4 + ] + ) + [] + (lambda + (set_type + [ + a + 2 + g + (get + (current_value 1) + 3 + ) + ] + "associate" + ) + ) + ) +) +(declare + {_ (null)} + (replace + _ + [] + (lambda + { + 2 (null) + 5 (null) + 6 (null) + a 1 + } + ) + ) +) +(declare + {_ (null)} + (replace + _ + [] + (lambda + {2 (null) 5 (null) 6 (null)} + ) + ) +) +(declare + {_ (null)} + (replace + _ + [] + (lambda + {2 (null) 5 (null) 6 (null)} + ) + ) +) +(declare + {_ (null)} + (replace + _ + [1] + (lambda + [ + (get + (current_value 1) + 0 + ) + 4 + ] + ) + [] + (lambda + [ + 7 + (get + (current_value 1) + 1 + ) + ] + ) + ) +) +[ + 7 + [1 4] +] +(declare + {_ (null)} + (replace + _ + [1] + (lambda + [ + (get + (current_value 1) + 0 + ) + 4 + ] + ) + [0] + (lambda + (set_type + [7 8] + "+" + ) + ) + ) +) +[ + (+ 7 8) + [1 4] +] +(declare + {_ (null)} + (replace + _ + [1 0] + (lambda + [ + (get + (current_value 1) + 0 + ) + "x" + ] + ) + [1] + (lambda + [ + (get + (current_value 1) + 0 + ) + (get + (current_value 1) + 1 + ) + 4 + ] + ) + [] + (lambda + [ + 7 + (get + (current_value 1) + 1 + ) + ] + ) + ) +) +[ + 7 + [ + ["a" "x"] + 1 + 4 + ] +] --mix-- -[ - 1 - 2 - 4 - 6 - 7.5 - 9.5 - 11.5 - 13.5 -] -[ - - ;comment 1 - ;comment 2 - ;comment 3 - ;comment 4 - 1 - 3.5 - 5.5 - 7.5 - 10 - 12 - 13.5 -] -[ - 1 - 2.5 - (associate "a" 3 "b" 4) - (lambda - (if - true - 1 - (parallel - (get_entity_comments) - 1 - (lambda (null)) - ) - ) - ) - [5 6] -] -[ - 1 - 5 - 2.5 - (associate "a" 3 "b" 4) - (lambda - (if - true - 1 - (seq - (get_entity_comments) - (lambda - (print []) - ) - 1 - ) - ) - ) - [5] -] -[ - (true) - 3.5 - 5.5 - 7.5 - 9.5 - 11.5 - 13.5 -] -[ - (true) - 2 - 4 - 3 - 7 - 10 - 12 - 14 -] +[ + 1 + 4 + 5.5 + 7.5 + 9.5 + 11.5 + 13.5 +] +[ + + ;comment 1 + ;comment 2 + ;comment 3 + ;comment 4 + 1 + 4 + 5.5 + 7.5 + 9.5 + 11.5 + 13.5 +] +[ + 1 + 5 + 2.5 + (associate "a" 3 "b" 4) + (lambda + (if + true + 1 + (parallel + (get_entity_comments) + 1 + (lambda + (print + [2 9] + ) + ) + ) + ) + ) + [5] +] +[ + 1 + 5 + 2.5 + (associate "a" 3) + (lambda + (if + true + 1 + (seq + (get_entity_comments) + (lambda + (print + [2 9] + ) + ) + 1 + ) + ) + ) + [5 6] +] +[ + 2 + 3.5 + 5.5 + 7.5 + 9.5 + 11.5 + 13.5 +] +[ + (true) + 2 + 4 + 3 + 6 + 5 + 8 + 10 + 9 + 12 + 11 +] +1 4 2.5 2.5 -2.5 -abcdxyz -abcdomxyz +abceomxyz +abcmxyz abcmxyz --mix_labels-- -[ - 1 - #mixtest1 2 - #mixtest2 - (associate "a" 3 "b" 4) - (lambda - (if - #mixtest3 true - 1 - (parallel - (get_entity_comments) - #mixtest4 1 - ) - ) - ) - [5 6] -] +[ + 1 + #mixtest1 2 + #mixtest2 + (associate "a" 3 "b" 4) + (lambda + (if + #mixtest3 true + 1 + (parallel + (get_entity_comments) + #mixtest4 1 + ) + ) + ) + [5 6] +] --total_entity_size-- 79 87 --flatten_entity-- -0.5600535543305718 -Wvܖ`t# -0.7886081164530508 -0.7886081164530508 -0.7833680168066879 -0.7833680168066879 +0.40971200496539806 +iA;@VOV- +0.7136950384635786 +0.7136950384635786 +0.6522822782263927 +0.6522822782263927 flatten restore with seeds test -(declare - {create_new_entity (true) new_entity (null)} - (let - { - _ (lambda - (parallel - ##a (rand) - ) - ) - } - (if - create_new_entity - (assign - "new_entity" - (first - (create_entities new_entity _) - ) - ) - (assign_entity_roots new_entity _) - ) - ) - (set_entity_rand_seed new_entity "]Ft#") - (set_entity_rand_seed - (first - (create_entities - (append new_entity "DeepRand") - (lambda - (parallel - ##a (rand) - ) - ) - ) - ) - "`qqRx,@C" - ) - new_entity -) -(declare - {create_new_entity (true) new_entity (null)} - (let - { - _ (lambda - (parallel - ##a (rand) - ) - ) - } - (if - create_new_entity - (assign - "new_entity" - (first - (create_entities new_entity _) - ) - ) - (assign_entity_roots new_entity _) - ) - ) - (set_entity_rand_seed new_entity "/+3qt#") - (set_entity_rand_seed - (first - (create_entities - (append new_entity "DeepRand") - (lambda - (parallel - ##a (rand) - ) - ) - ) - ) - "`qqRx,@C" - ) - new_entity -) -(declare - {_ (null) new_entity (null)} - (clone_entities _ new_entity) -) +(declare + {create_new_entity (true) new_entity (null)} + (let + { + _ (lambda + (parallel + ##a (rand) + ) + ) + } + (if + create_new_entity + (assign + "new_entity" + (first + (create_entities new_entity _) + ) + ) + (assign_entity_roots new_entity _) + ) + ) + (set_entity_rand_seed new_entity "£=mVOV-") + (set_entity_rand_seed + (first + (create_entities + (append new_entity "DeepRand") + (lambda + (parallel + ##a (rand) + ) + ) + ) + ) + "aE&K\"(X&\0" + ) + new_entity +) +(declare + {create_new_entity (true) new_entity (null)} + (let + { + _ (lambda + (parallel + ##a (rand) + ) + ) + } + (if + create_new_entity + (assign + "new_entity" + (first + (create_entities new_entity _) + ) + ) + (assign_entity_roots new_entity _) + ) + ) + (set_entity_rand_seed new_entity "M:pVVOV-") + (set_entity_rand_seed + (first + (create_entities + (append new_entity "DeepRand") + (lambda + (parallel + ##a (rand) + ) + ) + ) + ) + "aE&K\"(X&\0" + ) + new_entity +) +(declare + {_ (null) new_entity (null)} + (clone_entities _ new_entity) +) flatten restore without seeds test -(declare - {create_new_entity (true) new_entity (null)} - (let - { - _ (lambda - (parallel - ##a (rand) - ) - ) - } - (if - create_new_entity - (assign - "new_entity" - (first - (create_entities new_entity _) - ) - ) - (assign_entity_roots new_entity _) - ) - ) - (create_entities - (append new_entity "DeepRand") - (lambda - (parallel - ##a (rand) - ) - ) - ) - new_entity -) -(declare - {create_new_entity (true) new_entity (null)} - (let - { - _ (lambda - (parallel - ##a (rand) - ) - ) - } - (if - create_new_entity - (assign - "new_entity" - (first - (create_entities new_entity _) - ) - ) - (assign_entity_roots new_entity _) - ) - ) - (set_entity_rand_seed new_entity "T'J z2") - (set_entity_rand_seed - (first - (create_entities - (append new_entity "DeepRand") - (lambda - (parallel - ##a (rand) - ) - ) - ) - ) - "Tɵ{\\p} 8" - ) - new_entity -) -(declare - {_ (null) new_entity (null)} - (clone_entities _ new_entity) -) +(declare + {create_new_entity (true) new_entity (null)} + (let + { + _ (lambda + (parallel + ##a (rand) + ) + ) + } + (if + create_new_entity + (assign + "new_entity" + (first + (create_entities new_entity _) + ) + ) + (assign_entity_roots new_entity _) + ) + ) + (create_entities + (append new_entity "DeepRand") + (lambda + (parallel + ##a (rand) + ) + ) + ) + new_entity +) +(declare + {create_new_entity (true) new_entity (null)} + (let + { + _ (lambda + (parallel + ##a (rand) + ) + ) + } + (if + create_new_entity + (assign + "new_entity" + (first + (create_entities new_entity _) + ) + ) + (assign_entity_roots new_entity _) + ) + ) + (set_entity_rand_seed new_entity "{'IC") + (set_entity_rand_seed + (first + (create_entities + (append new_entity "DeepRand") + (lambda + (parallel + ##a (rand) + ) + ) + ) + ) + "5z^\rF/VQ" + ) + new_entity +) +(declare + {_ (null) new_entity (null)} + (clone_entities _ new_entity) +) flatten restore with parallel -(declare - {create_new_entity (true) new_entity (null)} - (let - { - _ (lambda - (parallel - ##a (rand) - ) - ) - } - (if - create_new_entity - (assign - "new_entity" - (first - (create_entities new_entity _) - ) - ) - (assign_entity_roots new_entity _) - ) - ) - (set_entity_rand_seed new_entity "]Ft#") - ||(parallel - (set_entity_rand_seed - (first - (create_entities - (append new_entity "DeepRand") - (lambda - (parallel - ##a (rand) - ) - ) - ) - ) - "`qqRx,@C" - ) - ) - new_entity -) -(declare - {create_new_entity (true) new_entity (null)} - (let - { - _ (lambda - (parallel - ##a (rand) - ) - ) - } - (if - create_new_entity - (assign - "new_entity" - (first - (create_entities new_entity _) - ) - ) - (assign_entity_roots new_entity _) - ) - ) - (set_entity_rand_seed new_entity "/+3qt#") - (set_entity_rand_seed - (first - (create_entities - (append new_entity "DeepRand") - (lambda - (parallel - ##a (rand) - ) - ) - ) - ) - "`qqRx,@C" - ) - new_entity -) -(declare - {_ (null) new_entity (null)} - (clone_entities _ new_entity) -) +(declare + {create_new_entity (true) new_entity (null)} + (let + { + _ (lambda + (parallel + ##a (rand) + ) + ) + } + (if + create_new_entity + (assign + "new_entity" + (first + (create_entities new_entity _) + ) + ) + (assign_entity_roots new_entity _) + ) + ) + (set_entity_rand_seed new_entity "£=mVOV-") + ||(parallel + (set_entity_rand_seed + (first + (create_entities + (append new_entity "DeepRand") + (lambda + (parallel + ##a (rand) + ) + ) + ) + ) + "aE&K\"(X&\0" + ) + ) + new_entity +) +(declare + {create_new_entity (true) new_entity (null)} + (let + { + _ (lambda + (parallel + ##a (rand) + ) + ) + } + (if + create_new_entity + (assign + "new_entity" + (first + (create_entities new_entity _) + ) + ) + (assign_entity_roots new_entity _) + ) + ) + (set_entity_rand_seed new_entity "M:pVVOV-") + (set_entity_rand_seed + (first + (create_entities + (append new_entity "DeepRand") + (lambda + (parallel + ##a (rand) + ) + ) + ) + ) + "aE&K\"(X&\0" + ) + new_entity +) +(declare + {_ (null) new_entity (null)} + (clone_entities _ new_entity) +) --mutate_entity-- -[ - 1 - 2 - 3 - 4 - 5 - 6 - ##a 2.2533610976391527 - (range) - 9 - 10 - 11 - 12 - @(get - (target 2) - 6 - ) - 22.1933739650672 - (associate "a" 1 "b" "a") -] - -[ - 2 - 2 - 3 - (mix) - 5 - 6 - (not) - 8 - 9 - (+) - 2.6252692074129436 - (size) - 13 - (get) - (associate) -] - -[ - (*) - (-) - (*) - 4 - 5 - (+) - 7 - 8 - (+) - 10 - (-) - (-) - 13 - 14 - (associate) -] +[ + (let) + 9.199301571762836 + 3 + 4 + (null) + 6 + 7 + 8 + (=) + 10 + 11 + 12 + (xor) + 8 + (associate + "a" + "b" + "b" + ##b 2 + ) +] + +[ + (compute_entity_group_kl_divergence) + 2 + ##coRvnI 3 + 4 + 5 + 6 + "a" + 8 + (query_nearest_generalized_distance) + 10 + (<=) + (if) + 13 + 14 + (associate (null) 1 "b" 2) +] + +[ + (+) + 2 + 3 + (-) + (+) + (+) + 7 + (*) + (+) + (+) + 11 + (+) + (-) + 14 + (associate "a" (+) (+) 2) +] --commonality_entities-- 73.3678794503212 --edit_distance_entities-- 19.264241099357605 --intersect_entities-- -(associate "b" 4) +(associate "b" 4) MergeEntityChild1 -(associate "x" 3 "y" 4) +(associate "x" 3 "y" 4) MergeEntityChild2 -(associate "p" 3 "q" 4) -_637896666 -(associate "E" 3 "F" 4) -_4073300237 -(associate "e" 3 "f" 4) +(associate "p" 3 "q" 4) +_1651806471 +(associate "e" 3 "f" 4) +_3130331116 +(associate "E" 3 "F" 4) --union_entities-- -(associate "b" 4 "a" 3 "c" 3) +(associate "b" 4 "a" 3 "c" 3) MergeEntityChild1 -(associate "x" 3 "y" 4 "z" 5) +(associate "x" 3 "y" 4 "z" 5) MergeEntityChild2 -(associate - "p" - 3 - "q" - 4 - "u" - 5 - "v" - 6 - "w" - 7 -) -_637896666 -(associate - "E" - 3 - "F" - 4 - "G" - 5 - "H" - 6 -) -_4073300237 -(associate - "e" - 3 - "f" - 4 - "g" - 5 - "h" - 6 -) -(parallel - ##p - ["_696766412" "_696766412" "_1342682483" "_1342682483"] -) -_696766412 -(associate - "E" - 3 - "F" - 4 - "G" - 5 - "H" - 6 -) -_1342682483 -(associate - "e" - 3 - "f" - 4 - "g" - 5 - "h" - 6 -) +(associate + "p" + 3 + "q" + 4 + "u" + 5 + "v" + 6 + "w" + 7 +) +_1651806471 +(associate + "e" + 3 + "f" + 4 + "g" + 5 + "h" + 6 +) +_3130331116 +(associate + "E" + 3 + "F" + 4 + "G" + 5 + "H" + 6 +) +(parallel + ##p + ["_2325275497" "_2325275497" "_2973704165" "_2973704165"] +) +_2325275497 +(associate + "E" + 3 + "F" + 4 + "G" + 5 + "H" + 6 +) +_2973704165 +(associate + "e" + 3 + "f" + 4 + "g" + 5 + "h" + 6 +) --difference_entities-- -(declare - {_ (null) new_entity (null)} - (clone_entities _ new_entity) -) -(declare - {_ (null) new_entity (null)} - (assign - "new_entity" - (first - (create_entities - new_entity - (call - (lambda - (declare - {_ (null)} - (replace - _ - [] - (lambda - (set_type - [ - "c" - 3 - (get - (current_value 1) - 2 - ) - (get - (current_value 1) - 3 - ) - ] - "associate" - ) - ) - ) - ) - ) - { - _ (retrieve_entity_root _) - } - ) - ) - ) - ) - (create_entities - (append new_entity "MergeEntityChild1") - (call - (lambda - (declare - {_ (null)} - (replace - _ - [] - (lambda - (set_type - [ - (get - (current_value 1) - 0 - ) - (get - (current_value 1) - 1 - ) - (get - (current_value 1) - 2 - ) - (get - (current_value 1) - 3 - ) - "z" - 5 - ] - "associate" - ) - ) - ) - ) - ) - { - _ (retrieve_entity_root - (append _ "MergeEntityChild1") - ) - } - ) - ) - (create_entities - (append new_entity "MergeEntityChild2") - (call - (lambda - (declare - {_ (null)} - (replace - _ - [] - (lambda - (set_type - [ - (get - (current_value 1) - 0 - ) - (get - (current_value 1) - 1 - ) - (get - (current_value 1) - 2 - ) - (get - (current_value 1) - 3 - ) - "u" - 5 - "v" - 6 - "w" - 7 - ] - "associate" - ) - ) - ) - ) - ) - { - _ (retrieve_entity_root - (append _ "MergeEntityChild2") - ) - } - ) - ) - (create_entities - (append new_entity "_2442216634") - (call - (lambda - (declare - {_ (null)} - (replace - _ - [] - (lambda - (set_type - [ - (get - (current_value 1) - 0 - ) - (get - (current_value 1) - 1 - ) - (get - (current_value 1) - 2 - ) - (get - (current_value 1) - 3 - ) - "G" - 5 - "H" - 6 - ] - "associate" - ) - ) - ) - ) - ) - { - _ (retrieve_entity_root - (append _ "_2442216634") - ) - } - ) - ) - (create_entities - (append new_entity "_627214166") - (call - (lambda - (declare - {_ (null)} - (replace - _ - [] - (lambda - (set_type - [ - (get - (current_value 1) - 0 - ) - (get - (current_value 1) - 1 - ) - (get - (current_value 1) - 2 - ) - (get - (current_value 1) - 3 - ) - ] - "associate" - ) - ) - ) - ) - ) - { - _ (retrieve_entity_root - (append _ "_627214166") - ) - } - ) - ) - new_entity -) -_3135866817 -["DiffEntityChild1" "OnlyIn2" "_3190678094" "_3860309062"] -(declare - {_ (null) new_entity (null)} - (assign - "new_entity" - (first - (create_entities - new_entity - (call - (lambda - (declare - {_ (null)} - (replace - _ - [] - (lambda - { - b (get - (current_value 1) - "b" - ) - c 3 - } - ) - ) - ) - ) - { - _ (retrieve_entity_root _) - } - ) - ) - ) - ) - (create_entities - (append new_entity "DiffEntityChild1") - (call - (lambda - (declare - {_ (null)} - (replace - _ - [] - (lambda - { - x (get - (current_value 1) - "x" - ) - y (get - (current_value 1) - "y" - ) - z 5 - } - ) - ) - ) - ) - { - _ (retrieve_entity_root - (append _ "DiffEntityChild1") - ) - } - ) - ) - (create_entities - (append new_entity "OnlyIn2") - (call - (lambda - (declare - {_ (null)} - (replace - _ - [] - (lambda - {o 6} - ) - ) - ) - ) - { - _ (retrieve_entity_root - (append _ "OnlyIn2") - ) - } - ) - ) - (create_entities - (append new_entity "_3190678094") - (call - (lambda - (declare - {_ (null)} - (replace - _ - [] - (lambda - { - E 3 - F 4 - G 5 - H 6 - } - ) - ) - ) - ) - { - _ (retrieve_entity_root - (append _ "_3190678094") - ) - } - ) - ) - (create_entities - (append new_entity "_3860309062") - (call - (lambda - (declare - {_ (null)} - (replace - _ - [] - (lambda - {e 3 f 4} - ) - ) - ) - ) - { - _ (retrieve_entity_root - (append _ "_3860309062") - ) - } - ) - ) - (clone_entities - (append - _ - ["DiffEntityChild1" "DiffEntityChild2"] - ) - (append - new_entity - ["DiffEntityChild1" "DiffEntityChild2"] - ) - ) - new_entity -) -new_entity: _680487499 -new_entity root: {b 4 c 3} +(declare + {_ (null) new_entity (null)} + (clone_entities _ new_entity) +) +(declare + {_ (null) new_entity (null)} + (assign + "new_entity" + (first + (create_entities + new_entity + (call + (lambda + (declare + {_ (null)} + (replace + _ + [] + (lambda + (set_type + [ + "c" + 3 + (get + (current_value 1) + 2 + ) + (get + (current_value 1) + 3 + ) + ] + "associate" + ) + ) + ) + ) + ) + { + _ (retrieve_entity_root _) + } + ) + ) + ) + ) + (create_entities + (append new_entity "MergeEntityChild1") + (call + (lambda + (declare + {_ (null)} + (replace + _ + [] + (lambda + (set_type + [ + (get + (current_value 1) + 0 + ) + (get + (current_value 1) + 1 + ) + (get + (current_value 1) + 2 + ) + (get + (current_value 1) + 3 + ) + "z" + 5 + ] + "associate" + ) + ) + ) + ) + ) + { + _ (retrieve_entity_root + (append _ "MergeEntityChild1") + ) + } + ) + ) + (create_entities + (append new_entity "MergeEntityChild2") + (call + (lambda + (declare + {_ (null)} + (replace + _ + [] + (lambda + (set_type + [ + (get + (current_value 1) + 0 + ) + (get + (current_value 1) + 1 + ) + (get + (current_value 1) + 2 + ) + (get + (current_value 1) + 3 + ) + "u" + 5 + "v" + 6 + "w" + 7 + ] + "associate" + ) + ) + ) + ) + ) + { + _ (retrieve_entity_root + (append _ "MergeEntityChild2") + ) + } + ) + ) + (create_entities + (append new_entity "_2565637960") + (call + (lambda + (declare + {_ (null)} + (replace + _ + [] + (lambda + (set_type + [ + (get + (current_value 1) + 0 + ) + (get + (current_value 1) + 1 + ) + (get + (current_value 1) + 2 + ) + (get + (current_value 1) + 3 + ) + "G" + 5 + "H" + 6 + ] + "associate" + ) + ) + ) + ) + ) + { + _ (retrieve_entity_root + (append _ "_2565637960") + ) + } + ) + ) + (create_entities + (append new_entity "_407614051") + (call + (lambda + (declare + {_ (null)} + (replace + _ + [] + (lambda + (set_type + [ + (get + (current_value 1) + 0 + ) + (get + (current_value 1) + 1 + ) + (get + (current_value 1) + 2 + ) + (get + (current_value 1) + 3 + ) + ] + "associate" + ) + ) + ) + ) + ) + { + _ (retrieve_entity_root + (append _ "_407614051") + ) + } + ) + ) + new_entity +) +_3532185687 +["DiffEntityChild1" "OnlyIn2" "_3626604918" "_3823131681"] +(declare + {_ (null) new_entity (null)} + (assign + "new_entity" + (first + (create_entities + new_entity + (call + (lambda + (declare + {_ (null)} + (replace + _ + [] + (lambda + { + b (get + (current_value 1) + "b" + ) + c 3 + } + ) + ) + ) + ) + { + _ (retrieve_entity_root _) + } + ) + ) + ) + ) + (create_entities + (append new_entity "DiffEntityChild1") + (call + (lambda + (declare + {_ (null)} + (replace + _ + [] + (lambda + { + x (get + (current_value 1) + "x" + ) + y (get + (current_value 1) + "y" + ) + z 5 + } + ) + ) + ) + ) + { + _ (retrieve_entity_root + (append _ "DiffEntityChild1") + ) + } + ) + ) + (create_entities + (append new_entity "OnlyIn2") + (call + (lambda + (declare + {_ (null)} + (replace + _ + [] + (lambda + {o 6} + ) + ) + ) + ) + { + _ (retrieve_entity_root + (append _ "OnlyIn2") + ) + } + ) + ) + (create_entities + (append new_entity "_3626604918") + (call + (lambda + (declare + {_ (null)} + (replace + _ + [] + (lambda + { + E (get + (current_value 1) + "E" + ) + F (get + (current_value 1) + "F" + ) + G 5 + H 6 + } + ) + ) + ) + ) + { + _ (retrieve_entity_root + (append _ "_3626604918") + ) + } + ) + ) + (create_entities + (append new_entity "_3823131681") + (call + (lambda + (declare + {_ (null)} + (replace + _ + [] + (lambda + { + e (get + (current_value 1) + "e" + ) + f (get + (current_value 1) + "f" + ) + } + ) + ) + ) + ) + { + _ (retrieve_entity_root + (append _ "_3823131681") + ) + } + ) + ) + (clone_entities + (append + _ + ["DiffEntityChild1" "DiffEntityChild2"] + ) + (append + new_entity + ["DiffEntityChild1" "DiffEntityChild2"] + ) + ) + new_entity +) +new_entity: _1461236888 +new_entity root: {b 4 c 3} DiffEntityChild1 root: -{x 3 y 4 z 5} -contained_entities new_entity: ["DiffEntityChild1" "OnlyIn2" "_3190678094" "_3860309062"] +{x 3 y 4 z 5} +contained_entities new_entity: ["DiffEntityChild1" "OnlyIn2" "_3626604918" "_3823131681"] difference between DiffEntity2 and new_entity: -(declare - {_ (null) new_entity (null)} - (clone_entities _ new_entity) -) -(declare - {_ (null) new_entity (null)} - (assign - "new_entity" - (first - (create_entities - new_entity - (call - (lambda - (declare - {_ (null)} - (replace - _ - [] - (lambda - { - b (get - (current_value 1) - "b" - ) - c 3 - } - ) - ) - ) - ) - { - _ (retrieve_entity_root _) - } - ) - ) - ) - ) - (create_entities - (append new_entity "OnlyIn2") - (call - (lambda - (declare - {_ (null)} - (replace - _ - [] - (lambda - {o 6} - ) - ) - ) - ) - { - _ (retrieve_entity_root - (append _ "OnlyIn2") - ) - } - ) - ) - (create_entities - (append new_entity "_3573226531") - (call - (lambda - (declare - {_ (null)} - (replace - _ - [] - (lambda - { - E (get - (current_value 1) - "E" - ) - F (get - (current_value 1) - "F" - ) - G 5 - H 6 - } - ) - ) - ) - ) - { - _ (retrieve_entity_root - (append _ "_3573226531") - ) - } - ) - ) - (create_entities - (append new_entity "_1014040861") - (call - (lambda - (declare - {_ (null)} - (replace - _ - [] - (lambda - { - e (get - (current_value 1) - "e" - ) - f (get - (current_value 1) - "f" - ) - } - ) - ) - ) - ) - { - _ (retrieve_entity_root - (append _ "_1014040861") - ) - } - ) - ) - (clone_entities - (append _ "DiffEntityChild1") - (append new_entity "DiffEntityChild1") - ) - new_entity -) +(declare + {_ (null) new_entity (null)} + (assign + "new_entity" + (first + (create_entities + new_entity + (call + (lambda + (declare + {_ (null)} + (replace _) + ) + ) + { + _ (retrieve_entity_root _) + } + ) + ) + ) + ) + (create_entities + (append new_entity "_3626604918") + (call + (lambda + (declare + {_ (null)} + (replace + _ + [] + (lambda + { + E (null) + F (null) + G (get + (current_value 1) + "G" + ) + H (get + (current_value 1) + "H" + ) + } + ) + ) + ) + ) + { + _ (retrieve_entity_root + (append _ "_3626604918") + ) + } + ) + ) + (create_entities + (append new_entity "_3823131681") + (call + (lambda + (declare + {_ (null)} + (replace + _ + [] + (lambda + {e (null) f (null)} + ) + ) + ) + ) + { + _ (retrieve_entity_root + (append _ "_3823131681") + ) + } + ) + ) + (clone_entities + (append _ "DiffEntityChild1") + (append new_entity "DiffEntityChild1") + ) + (clone_entities + (append _ "OnlyIn2") + (append new_entity "OnlyIn2") + ) + new_entity +) +(declare + {_ (null) new_entity (null)} + (assign + "new_entity" + (first + (create_entities + new_entity + (call + (lambda + (declare + {_ (null)} + (replace + _ + [] + (lambda + { + b (get + (current_value 1) + "b" + ) + c 3 + } + ) + ) + ) + ) + { + _ (retrieve_entity_root _) + } + ) + ) + ) + ) + (create_entities + (append new_entity "OnlyIn2") + (call + (lambda + (declare + {_ (null)} + (replace + _ + [] + (lambda + {o 6} + ) + ) + ) + ) + { + _ (retrieve_entity_root + (append _ "OnlyIn2") + ) + } + ) + ) + (create_entities + (append new_entity "_1985995361") + (call + (lambda + (declare + {_ (null)} + (replace + _ + [] + (lambda + { + E 3 + F 4 + G 5 + H 6 + } + ) + ) + ) + ) + { + _ (retrieve_entity_root + (append _ "_1985995361") + ) + } + ) + ) + (create_entities + (append new_entity "_2783372341") + (call + (lambda + (declare + {_ (null)} + (replace + _ + [] + (lambda + {e 3 f 4} + ) + ) + ) + ) + { + _ (retrieve_entity_root + (append _ "_2783372341") + ) + } + ) + ) + (clone_entities + (append _ "DiffEntityChild1") + (append new_entity "DiffEntityChild1") + ) + new_entity +) new_entity: DiffContainerReconstructed -new_entity root: {b 4 c 3} +new_entity root: {b 4 c 3} DiffEntityChild1 root: -{x 3 y 4 z 6} -contained_entities new_entity: ["OnlyIn2" "_3573226531" "_1014040861" "DiffEntityChild1"] +{x 3 y 4 z 6} +contained_entities new_entity: ["OnlyIn2" "_1985995361" "_2783372341" "DiffEntityChild1"] difference between DiffContainer and DiffEntity2: -(declare - {_ (null) new_entity (null)} - (assign - "new_entity" - (first - (create_entities - new_entity - (call - (lambda - (declare - {_ (null)} - (replace _) - ) - ) - { - _ (retrieve_entity_root _) - } - ) - ) - ) - ) - (create_entities - (append new_entity "_3573226531") - (call - (lambda - (declare - {_ (null)} - (replace - _ - [] - (lambda - { - E (null) - F (null) - G (get - (current_value 1) - "G" - ) - H (get - (current_value 1) - "H" - ) - } - ) - ) - ) - ) - { - _ (retrieve_entity_root - (append _ "_3573226531") - ) - } - ) - ) - (create_entities - (append new_entity "_1014040861") - (call - (lambda - (declare - {_ (null)} - (replace - _ - [] - (lambda - {e (null) f (null)} - ) - ) - ) - ) - { - _ (retrieve_entity_root - (append _ "_1014040861") - ) - } - ) - ) - (clone_entities - (append _ "OnlyIn2") - (append new_entity "OnlyIn2") - ) - (clone_entities - (append _ "DiffEntityChild1") - (append new_entity "DiffEntityChild1") - ) - new_entity -) +(declare + {_ (null) new_entity (null)} + (clone_entities _ new_entity) +) --mix_entities-- -(associate "b" 4 "a" 3) +(associate "b" 4) MergeEntityChild1 -(associate "x" 3 "y" 4) +(associate "x" 3 "y" 4 "z" 5) MergeEntityChild2 -(associate - "p" - 3 - "q" - 4 - "u" - 5 - "v" - 6 - "w" - 7 -) -_637896666 -(associate "E" 3 "F" 4 "G" 5) -_4073300237 -(associate "e" 3 "f" 4 "g" 5) +(associate + "p" + 3 + "q" + 4 + "u" + 5 + "v" + 6 +) +_1651806471 +(associate "e" 3 "f" 4 "h" 6) +_3130331116 +(associate "E" 3 "F" 4 "G" 5) --get_entity_comments-- -Full test -This is a suite of unit tests. +Full test +This is a suite of unit tests. This is the second line of the unit test description. this is a fully described entity -{ - ^containervar "a variable accessible to contained entities" - foo "the function foo" - get_api "returns the api details" - publicvar "some public variable" -} -[ - { - x ["the value of x\r\nthe default value of x" 1] - y ["the value of y" 2] - } - "a number representing the sum" -] -{ - description "this is a fully described entity" - labels { - ^containervar {description "a variable accessible to contained entities" parameters (null)} - foo { - description "the function foo" - parameters [ - { - x ["the value of x\r\nthe default value of x" 1] - y ["the value of y" 2] - } - "a number representing the sum" - ] - } - get_api {description "returns the api details" parameters (null)} - publicvar {description "some public variable" parameters (null)} - } -} +{ + ^containervar "a variable accessible to contained entities" + foo "the function foo" + get_api "returns the api details" + publicvar "some public variable" +} +[ + { + x ["the value of x\r\nthe default value of x" 1] + y ["the value of y" 2] + } + "a number representing the sum" +] +{ + description "this is a fully described entity" + labels { + ^containervar {description "a variable accessible to contained entities" parameters (null)} + foo { + description "the function foo" + parameters [ + { + x ["the value of x\r\nthe default value of x" 1] + y ["the value of y" 2] + } + "a number representing the sum" + ] + } + get_api {description "returns the api details" parameters (null)} + publicvar {description "some public variable" parameters (null)} + } +} --retrieve_entity_root-- -[ - 1 - 2 - ##three 3 -] -[ - 1 - 2 - #three 3 -] -[ - 1 - 2 - ##three 3 -] +[ + 1 + 2 + ##three 3 +] +[ + 1 + 2 + #three 3 +] +[ + 1 + 2 + ##three 3 +] --assign_entity_roots-- -[4 5 6] +[4 5 6] --accum_entity_roots-- -(null - #a 1 - #b 2 - #c 3 -) -(null - #c 3 -) +(null + #a 1 + #b 2 + #c 3 +) +(null + #c 3 +) --get_entity_rand_seed-- -tWZU$37 -0.9091038899390481 -!4cޯ% +3yr>89012345 +0.812564396753873 +adx)5 iD --set_entity_rand_seed-- -0.5922565697995871 -0.5922565697995871 +0.21086495653466275 +0.21086495653466275 deep sets -0.7696636444700973 -0.7696636444700973 +0.6853081112330822 +0.6853081112330822 --get_entity_root_permission-- -(false) +(false) --set_entity_root_permission-- RootTest -1726684818.275941 -(true) +1727097549.948708 +(true) RootTest (null) -(false) +(false) --create_entities-- -["MyLibrary"] +["MyLibrary"] --nested create_entities-- -["Child1" "Child2"] -["MultipleTest1"] +["Child1" "Child2"] +["MultipleTest1"] -["MultipleTest2"] +["MultipleTest2"] --clone_entities-- -["MyNewLibrary"] +["MyNewLibrary"] --move_entities-- -["MyLibrary2"] +["MyLibrary2"] --destroy_entities-- -[ - "MergeEntity1" - "MergeEntity2" - "FlattenTest" - "_347625219" - "_3603138190" - "_1437130625" - "_840945339" - "_2096402224" - "_492844185" - "MutateEntity" - "MutatedEntity" - "MutatedEntity2" - "MutatedEntity3" - "AndedEntities" - "OredEntities" - "ComplexMergeEntity1" - "ComplexMergeEntity2" - "ComplexOredEntities" - "_3135866817" - "DiffEntity1" - "DiffEntity2" - "_680487499" - "DiffContainer" - "DiffContainerReconstructed" - "MixedEntities" - "descriptive_entity" - "SetGetCodeTest" - "AER_test" - "AER_test_2" - "RandTest" - "RootTest" - "MyNewLibrary" - "EntityWithChildren" - "MultipleTest1" - "MultipleTest2" - "MyLibrary2" -] -[ - "MergeEntity1" - "MergeEntity2" - "FlattenTest" - "_347625219" - "_3603138190" - "_1437130625" - "_840945339" - "_2096402224" - "_492844185" - "MutateEntity" - "MutatedEntity" - "MutatedEntity2" - "MutatedEntity3" - "AndedEntities" - "OredEntities" - "ComplexMergeEntity1" - "ComplexMergeEntity2" - "ComplexOredEntities" - "_3135866817" - "DiffEntity1" - "DiffEntity2" - "_680487499" - "DiffContainer" - "DiffContainerReconstructed" - "MixedEntities" - "descriptive_entity" - "SetGetCodeTest" - "AER_test" - "AER_test_2" - "RandTest" - "RootTest" - "MyNewLibrary" - "EntityWithChildren" - "MultipleTest1" - "MultipleTest2" -] -[ - "MergeEntity1" - "MergeEntity2" - "FlattenTest" - "_347625219" - "_3603138190" - "_1437130625" - "_840945339" - "_2096402224" - "_492844185" - "MutateEntity" - "MutatedEntity" - "MutatedEntity2" - "MutatedEntity3" - "AndedEntities" - "OredEntities" - "ComplexMergeEntity1" - "ComplexMergeEntity2" - "ComplexOredEntities" - "_3135866817" - "DiffEntity1" - "DiffEntity2" - "_680487499" - "DiffContainer" - "DiffContainerReconstructed" - "MixedEntities" - "descriptive_entity" - "SetGetCodeTest" - "AER_test" - "AER_test_2" - "RandTest" - "RootTest" - "MyNewLibrary" - "EntityWithChildren" -] +[ + "MergeEntity1" + "MergeEntity2" + "FlattenTest" + "_3220334892" + "_2587601847" + "_570580630" + "_4288357968" + "_3069907149" + "_350559405" + "MutateEntity" + "MutatedEntity" + "MutatedEntity2" + "MutatedEntity3" + "AndedEntities" + "OredEntities" + "ComplexMergeEntity1" + "ComplexMergeEntity2" + "ComplexOredEntities" + "_3532185687" + "DiffEntity1" + "DiffEntity2" + "_1461236888" + "DiffContainer" + "DiffContainerReconstructed" + "MixedEntities" + "descriptive_entity" + "SetGetCodeTest" + "AER_test" + "AER_test_2" + "RandTest" + "RootTest" + "MyNewLibrary" + "EntityWithChildren" + "MultipleTest1" + "MultipleTest2" + "MyLibrary2" +] +[ + "MergeEntity1" + "MergeEntity2" + "FlattenTest" + "_3220334892" + "_2587601847" + "_570580630" + "_4288357968" + "_3069907149" + "_350559405" + "MutateEntity" + "MutatedEntity" + "MutatedEntity2" + "MutatedEntity3" + "AndedEntities" + "OredEntities" + "ComplexMergeEntity1" + "ComplexMergeEntity2" + "ComplexOredEntities" + "_3532185687" + "DiffEntity1" + "DiffEntity2" + "_1461236888" + "DiffContainer" + "DiffContainerReconstructed" + "MixedEntities" + "descriptive_entity" + "SetGetCodeTest" + "AER_test" + "AER_test_2" + "RandTest" + "RootTest" + "MyNewLibrary" + "EntityWithChildren" + "MultipleTest1" + "MultipleTest2" +] +[ + "MergeEntity1" + "MergeEntity2" + "FlattenTest" + "_3220334892" + "_2587601847" + "_570580630" + "_4288357968" + "_3069907149" + "_350559405" + "MutateEntity" + "MutatedEntity" + "MutatedEntity2" + "MutatedEntity3" + "AndedEntities" + "OredEntities" + "ComplexMergeEntity1" + "ComplexMergeEntity2" + "ComplexOredEntities" + "_3532185687" + "DiffEntity1" + "DiffEntity2" + "_1461236888" + "DiffContainer" + "DiffContainerReconstructed" + "MixedEntities" + "descriptive_entity" + "SetGetCodeTest" + "AER_test" + "AER_test_2" + "RandTest" + "RootTest" + "MyNewLibrary" + "EntityWithChildren" +] --load-- -{ - a #a 1 - b #b (true) - c #c 0.1 - d #d 100000000 - hello #hello - (print "hello\n") -} +{ + a #a 1 + b #b (true) + c #c 0.1 + d #d 100000000 + hello #hello + (print "hello\n") +} load from .json: -[ - {a 3 b 4} - {c "c" d (null)} -] +[ + {a 3 b 4} + {c "c" d (null)} +] load from .yaml: -[ - { - a 123 - b "ABC" - c 123.45 - d "true" - } -] +[ + { + a 123 + b "ABC" + c 123.45 + d "true" + } +] --load_entity-- load from .amlg: hello -(declare - {create_new_entity (true) new_entity (null)} - (let - { - _ (lambda - { - a ##a 1 - b ##b (true) - c ##c 0.1 - d ##d 100000000 - hello ##hello - (print "hello\n") - } - ) - } - (if - create_new_entity - (assign - "new_entity" - (first - (create_entities new_entity _) - ) - ) - (assign_entity_roots new_entity _) - ) - ) - (set_entity_rand_seed new_entity "=%zx%N") - (set_entity_rand_seed - (first - (create_entities - (append new_entity "submoduletest2") - (lambda - (parallel - ##a 8 - ##hello - (print "sub hello 2\n") - ) - ) - ) - ) - "y>" - ) - (set_entity_rand_seed - (first - (create_entities - (append new_entity "submoduletest") - (lambda - (parallel - ##a 7 - ##hello - (print "sub hello\n") - ) - ) - ) - ) - "1JHmʕ_z" - ) - new_entity -) +(declare + {create_new_entity (true) new_entity (null)} + (let + { + _ (lambda + { + a ##a 1 + b ##b (true) + c ##c 0.1 + d ##d 100000000 + hello ##hello + (print "hello\n") + } + ) + } + (if + create_new_entity + (assign + "new_entity" + (first + (create_entities new_entity _) + ) + ) + (assign_entity_roots new_entity _) + ) + ) + (set_entity_rand_seed new_entity "X~wb3") + (set_entity_rand_seed + (first + (create_entities + (append new_entity "submoduletest") + (lambda + (parallel + ##a 7 + ##hello + (print "sub hello\n") + ) + ) + ) + ) + "DA30W^vha&" + ) + (set_entity_rand_seed + (first + (create_entities + (append new_entity "submoduletest2") + (lambda + (parallel + ##a 8 + ##hello + (print "sub hello 2\n") + ) + ) + ) + ) + "= \0Fyf@)" + ) + new_entity +) --load_persistent_entity-- -(declare - {create_new_entity (true) new_entity (null)} - (let - { - _ (lambda - (parallel - ##a 8 - ##hello - (print "hello\n") - ) - ) - } - (if - create_new_entity - (assign - "new_entity" - (first - (create_entities new_entity _) - ) - ) - (assign_entity_roots new_entity _) - ) - ) - (set_entity_rand_seed new_entity "X@QM") - (set_entity_rand_seed - (first - (create_entities - (append new_entity "NewModule") - (lambda - (associate "a" 1 "b" 2) - ) - ) - ) - "=G]\\F-/!]" - ) - (set_entity_rand_seed - (first - (create_entities - (append new_entity "psm") - (lambda - (parallel - ##a 5 - ##hello - (print "hello from psm\n") - ) - ) - ) - ) - "_cJ3'" - ) - new_entity -) -(declare - {create_new_entity (true) new_entity (null)} - (let - { - _ (lambda - (parallel - ##a 1 - ##hello - (print "hello\n") - ) - ) - } - (if - create_new_entity - (assign - "new_entity" - (first - (create_entities new_entity _) - ) - ) - (assign_entity_roots new_entity _) - ) - ) - (set_entity_rand_seed new_entity "X@QM") - (set_entity_rand_seed - (first - (create_entities - (append new_entity "psm") - (lambda - (parallel - ##a 8 - ##hello - (print "hello from psm\n") - ) - ) - ) - ) - "_cJ3'" - ) - new_entity -) +(declare + {create_new_entity (true) new_entity (null)} + (let + { + _ (lambda + (parallel + ##a 8 + ##hello + (print "hello\n") + ) + ) + } + (if + create_new_entity + (assign + "new_entity" + (first + (create_entities new_entity _) + ) + ) + (assign_entity_roots new_entity _) + ) + ) + (set_entity_rand_seed new_entity "1a2.Ww") + (set_entity_rand_seed + (first + (create_entities + (append new_entity "NewModule") + (lambda + (associate "a" 1 "b" 2) + ) + ) + ) + "-O[3yCŒ" + ) + (set_entity_rand_seed + (first + (create_entities + (append new_entity "psm") + (lambda + (parallel + ##a 5 + ##hello + (print "hello from psm\n") + ) + ) + ) + ) + "&$ܴ@n>\"FN" + ) + new_entity +) +(declare + {create_new_entity (true) new_entity (null)} + (let + { + _ (lambda + (parallel + ##a 1 + ##hello + (print "hello\n") + ) + ) + } + (if + create_new_entity + (assign + "new_entity" + (first + (create_entities new_entity _) + ) + ) + (assign_entity_roots new_entity _) + ) + ) + (set_entity_rand_seed new_entity "1a2.Ww") + (set_entity_rand_seed + (first + (create_entities + (append new_entity "psm") + (lambda + (parallel + ##a 8 + ##hello + (print "hello from psm\n") + ) + ) + ) + ) + "&$ܴ@n>\"FN" + ) + new_entity +) Load Root: PersistTreeRoot Load Inter: -["PersistTreeRoot" "PersistTreeInter"] +["PersistTreeRoot" "PersistTreeInter"] Load Leaf: -["PersistTreeRoot" "PersistTreeInter" "PersistTreeLeaf"] +["PersistTreeRoot" "PersistTreeInter" "PersistTreeLeaf"] Root contained: -["PersistTreeInter"] +["PersistTreeInter"] Root b: 2 Inter contained: -["PersistTreeLeaf"] +["PersistTreeLeaf"] Leaf f: 2 Leaf f: 6 --store-- -[1 2 3 4] -(parallel - #".#blah" 1 -) +[1 2 3 4] +(parallel + #".#blah" 1 +) retrieved: 1 loaded from file: -(parallel - #".#blah" 1 -) +(parallel + #".#blah" 1 +) retrieved: 1 --store other file formats--- [This is text!] -(seq - (print "hello") -) - -contained entities in quackers before file: ["!@#$%^&*)(_+=-'][{}.marbles" "buklulu is good.amlg"] - -contained entity in quackers2 loaded back from file: ["!@#$%^&*)(_+=-'][{}.marbles"] - -[ - [6.4 2.8 5.6 2.2 "virginica"] - [4.9 2.5 4.5 1.7 "virg\"inica"] - [(null)] - [(null) (null) (null) (null)] - [4.9 3.1 1.5 0.1 "set\nosa" 3] - [4.4 3.2 1.3 0.2 "setosa"] -] +(seq + (print "hello") +) + +contained entities in quackers before file: ["!@#$%^&*)(_+=-'][{}.marbles" "buklulu is good.amlg"] + +contained entity in quackers2 loaded back from file: ["buklulu is good.amlg" "!@#$%^&*)(_+=-'][{}.marbles"] + +[ + [6.4 2.8 5.6 2.2 "virginica"] + [4.9 2.5 4.5 1.7 "virg\"inica"] + [(null)] + [(null) (null) (null) (null)] + [4.9 3.1 1.5 0.1 "set\nosa" 3] + [4.4 3.2 1.3 0.2 "setosa"] +] --store_entity-- store to .amlg: -2 -2 -Compression difference: [(declare - {_ (null) new_entity (null)} - (clone_entities _ new_entity) -) +2 +2 +Compression difference: [(declare + {_ (null) new_entity (null)} + (clone_entities _ new_entity) +) ] store to .json in amlg format -[ - {a 3 b 4} - {c "c" d (null)} -] +[ + {a 3 b 4} + {c "c" d (null)} +] store to .json normally -[ - {a 3 b 4} - {c "c" d (null)} -] +[ + {a 3 b 4} + {c "c" d (null)} +] --contains_entity-- -(true) +(true) -(false) +(false) --contained_entities-- -[ - "Child1" - "Child2" - "Child3" - "Child4" - "Child5" - "Child6" - "Child7" -] +[ + "Child1" + "Child2" + "Child3" + "Child4" + "Child5" + "Child6" + "Child7" +] --query_select-- -["Child1" "Child2" "Child3"] -["Child2" "Child3" "Child4"] -["Child3" "Child4" "Child5" "Child6" "Child7"] -["Child1" "Child5"] -["Child3" "Child4"] -["Child6" "Child7"] -["Child1" "Child2" "Child3" "Child4"] -["Child1" "Child2" "Child5" "Child7"] -["Child4" "Child6"] +["Child1" "Child2" "Child3"] +["Child2" "Child3" "Child4"] +["Child3" "Child4" "Child5" "Child6" "Child7"] +["Child1" "Child5"] +["Child3" "Child4"] +["Child6" "Child7"] +["Child1" "Child2" "Child6" "Child7"] +["Child2" "Child3" "Child5" "Child6"] +["Child4" "Child6"] --query_sample-- -["Child5"] -["Child2" "Child3"] -["Child4"] -["Child3"] +["Child4"] +["Child6" "Child5"] +["Child1"] +["Child6"] --query_weighted_sample-- -["Child1"] -["Child2"] -[ - "Child1" - "Child1" - "Child2" - "Child2" - "Child1" - "Child1" - "Child2" - "Child7" - "Child1" - "Child1" - "Child2" - "Child7" - "Child2" - "Child1" - "Child2" - "Child1" - "Child1" - "Child2" - "Child1" - "Child2" -] -[ - "Child1" - "Child1" - "Child2" - "Child2" - "Child1" - "Child1" - "Child2" - "Child1" - "Child1" - "Child1" - "Child2" - "Child1" - "Child2" - "Child1" - "Child2" - "Child1" - "Child2" - "Child2" - "Child1" - "Child1" -] -[ - "Child2" - "Child2" - "Child2" - "Child7" - "Child2" - "Child2" - "Child2" - "Child2" - "Child2" - "Child2" -] -["Child2" "Child3"] +["Child1"] +["Child2"] +[ + "Child2" + "Child2" + "Child2" + "Child6" + "Child1" + "Child1" + "Child1" + "Child2" + "Child2" + "Child2" + "Child4" + "Child2" + "Child2" + "Child2" + "Child1" + "Child1" + "Child2" + "Child2" + "Child2" + "Child1" +] +[ + "Child1" + "Child2" + "Child2" + "Child2" + "Child1" + "Child1" + "Child1" + "Child1" + "Child1" + "Child1" + "Child2" + "Child2" + "Child1" + "Child1" + "Child1" + "Child2" + "Child1" + "Child2" + "Child2" + "Child1" +] +[ + "Child2" + "Child2" + "Child2" + "Child2" + "Child5" + "Child2" + "Child2" + "Child2" + "Child5" + "Child2" +] +["Child2" "Child6"] --query_in_entity_list-- -["Child6" "Child7"] +["Child6" "Child7"] --query_not_in_entity_list-- -["Child1" "Child2" "Child3" "Child4" "Child5"] +["Child1" "Child2" "Child3" "Child4" "Child5"] --query_count-- 7 6 --query_exists-- -["Child5"] -[] -["Child5"] +["Child5"] +[] +["Child5"] --query_not_exists-- -["Child1" "Child2" "Child3" "Child4" "Child6" "Child7"] -["Child5"] +["Child1" "Child2" "Child3" "Child4" "Child6" "Child7"] +["Child5"] --query_equals-- -["Child5"] -["Child5"] +["Child5"] +["Child5"] --query_not_equals-- -["Child1" "Child2" "Child6" "Child7"] -["Child1" "Child2" "Child6" "Child7"] -["Child5"] -["Child1" "Child2" "Child6" "Child7"] +["Child1" "Child2" "Child6" "Child7"] +["Child1" "Child2" "Child6" "Child7"] +["Child5"] +["Child1" "Child2" "Child6" "Child7"] --query_between-- -["Child1" "Child6" "Child7"] -["Child1" "Child6" "Child7"] -["Child2"] +["Child1" "Child6" "Child7"] +["Child1" "Child6" "Child7"] +["Child2"] --query_not_between-- -["Child2" "Child3" "Child4"] -["Child5"] -["Child6"] -cascading global query: ["Child3" "Child4" "Child7"] +["Child2" "Child3" "Child4"] +["Child5"] +["Child6"] +cascading global query: ["Child3" "Child4" "Child7"] --query_among-- -among x = 0, 100: ["Child3" "Child4" "Child7"] -among x = 0, 100: ["Child3" "Child4" "Child7"] -among bar = not crunchy: ["Child6"] -among bar = not crunchy: ["Child6"] +among x = 0, 100: ["Child3" "Child4" "Child7"] +among x = 0, 100: ["Child3" "Child4" "Child7"] +among bar = not crunchy: ["Child6"] +among bar = not crunchy: ["Child6"] --query_not_among-- -not_among x = 0, 100: ["Child1" "Child2" "Child6"] -not_among x = 0, 100: ["Child1" "Child2" "Child6"] -not_among bar = not crunchy: ["Child5"] -not_among bar = not crunchy: [] +not_among x = 0, 100: ["Child1" "Child2" "Child6"] +not_among x = 0, 100: ["Child1" "Child2" "Child6"] +not_among bar = not crunchy: ["Child5"] +not_among bar = not crunchy: [] --query_nearest_generalized_distance-- -cascading query_not_equals: ["Child1" "Child6"] -cascading query_not_in_entity_list: ["Child6" "Child7"] -unweighted query: { - Child1 4 - Child2 1 - Child4 100 - Child6 2 - Child7 10 -} -weighted query: { - Child1 1.8 - Child2 0.45 - Child4 2 - Child6 0.04 - Child7 0.2 -} -weighted query list of lists: [ - ["Child6" "Child7" "Child2" "Child1" "Child3"] - [0.04 0.2 0.45 1.8 2] -] -weighted query list of lists: [ - ["Child2" "Child6" "Child1" "Child7" "Child3"] - [1 2 4 10 100] - [-1 2 4 10 100] -] -weighted query list of lists with multiple values: [ - ["Child2" "Child6" "Child1" "Child7" "Child4"] - [1 2 4 10 100] - [-1 2 4 10 100] - [-1 1 3 0 100] -] -[ - [ - "_4078733666" - "_2755125480" - "_2680661914" - "_2088412283" - "_2512172342" - "_3364810234" - "_1970117516" - "_3959194799" - ] - [ - 8.333333333333327 - 4.545454545454546 - 3.333333333333333 - 3.333333333333333 - 3.333333333333333 - 2.499999999999999 - 2 - 1.9999999999999991 - ] -] +cascading query_not_equals: ["Child1" "Child6"] +cascading query_not_in_entity_list: ["Child6" "Child7"] +unweighted query: { + Child1 4 + Child2 1 + Child4 100 + Child6 2 + Child7 10 +} +weighted query: { + Child1 1.8 + Child2 0.45 + Child3 2 + Child6 0.04 + Child7 0.2 +} +weighted query list of lists: [ + ["Child6" "Child7" "Child2" "Child1" "Child3"] + [0.04 0.2 0.45 1.8 2] +] +weighted query list of lists: [ + ["Child2" "Child6" "Child1" "Child7" "Child4"] + [1 2 4 10 100] + [-1 2 4 10 100] +] +weighted query list of lists with multiple values: [ + ["Child2" "Child6" "Child1" "Child7" "Child3"] + [1 2 4 10 100] + [-1 2 4 10 100] + [-1 1 3 0 100] +] +[ + [ + "_707361356" + "_3291871546" + "_481900944" + "_3093653952" + "_13979459" + "_915883338" + "_1398353331" + "_121841470" + ] + [ + 8.333333333333327 + 4.545454545454546 + 3.333333333333333 + 3.333333333333333 + 3.333333333333333 + 2.499999999999999 + 2 + 1.9999999999999991 + ] +] test code and string distances -1: ["Child1" "Child4"] -2: ["Child1" "Child2" "Child4" "Child5"] -3: ["Child1" "Child2" "Child4" "Child5"] -4: ["Child1" "Child2" "Child4" "Child5"] -5: ["Child1" "Child2" "Child6"] +1: ["Child1" "Child4"] +2: ["Child1" "Child2" "Child4" "Child5"] +3: ["Child1" "Child2" "Child4" "Child5"] +4: ["Child1" "Child2" "Child4" "Child5"] +5: ["Child1" "Child2" "Child6"] --query_max-- -["Child1" "Child3" "Child4"] -["Child1" "Child3" "Child4"] +["Child1" "Child3" "Child4"] +["Child1" "Child3" "Child4"] --query_min-- -["Child2" "Child7"] -["Child2" "Child7"] +["Child2" "Child7"] +["Child2" "Child7"] --query_sum-- 203 4.92 @@ -4186,672 +4211,672 @@ test code and string distances 97 199 --query_value_masses-- -{ - "-1" 1 - 0 1 - 1 1 - 3 1 - 100 2 -} - -{ - "-1" 0.45 - 0 0.02 - 1 0.02 - 3 0.45 - 100 0.04 -} - -{crunchy 1 "not crunchy" 1} +{ + "-1" 1 + 0 1 + 1 1 + 3 1 + 100 2 +} + +{ + "-1" 0.45 + 0 0.02 + 1 0.02 + 3 0.45 + 100 0.04 +} + +{crunchy 1 "not crunchy" 1} --query_less_or_equal_to-- -["Child1" "Child2" "Child6" "Child7"] -["Child1" "Child2" "Child6" "Child7"] +["Child1" "Child2" "Child6" "Child7"] +["Child1" "Child2" "Child6" "Child7"] --query_greater_or_equal_to-- -["Child3" "Child4"] -["Child3" "Child4"] +["Child3" "Child4"] +["Child3" "Child4"] --query_within_generalized_distance-- -["Child1" "Child2" "Child4" "Child6" "Child7"] -["Child1" "Child2" "Child4" "Child6" "Child7"] +["Child1" "Child2" "Child4" "Child6" "Child7"] +["Child1" "Child2" "Child4" "Child6" "Child7"] --query_nearest_generalized_distance-- -["Child2" "Child4"] -["Child2" "Child4"] -["Child1" "Child2" "Child4" "Child6" "Child7"] -["Child1" "Child2" "Child4" "Child6" "Child7"] -["Child2" "Child4"] -["Child2" "Child4" "Child7"] -["Child2" "Child4" "Child7"] -assoc-based: ["Child2" "Child4" "Child7"] -["Child2" "Child4" "Child6"] +["Child2" "Child4"] +["Child2" "Child4"] +["Child1" "Child2" "Child4" "Child6" "Child7"] +["Child1" "Child2" "Child4" "Child6" "Child7"] +["Child2" "Child4"] +["Child2" "Child4" "Child7"] +["Child2" "Child4" "Child7"] +assoc-based: ["Child2" "Child4" "Child7"] +["Child2" "Child4" "Child6"] --contained_entities caching and permissions-- -(false) +(false) (null) -(parallel - ##^a 3 - ##b (contained_entities) - ##c - (+ x 1) - ##d - (call_entity - "Child5" - "q" - {x x} - ) - ##!e 12 - ##x 4 - ##y 5 -) +(parallel + ##^a 3 + ##b (contained_entities) + ##c + (+ x 1) + ##d + (call_entity + "Child5" + "q" + {x x} + ) + ##!e 12 + ##x 4 + ##y 5 +) 1 0 0 1 -[ - (parallel - ##x 0 - ##y 0 - ) - (parallel - ##x 1 - ##y 0 - ) - (parallel - ##x 0 - ##y 1 - ) -] -[ - (parallel - ##x 0 - ##y 0 - ) - (parallel - ##x 1 - ##y 0 - ) - (parallel - ##x 0 - ##y 1 - ) - (parallel - ##x 0 - ##y 0.5 - ) -] -[ - (parallel - ##x 0 - ##y 0 - ) - (parallel - ##x 0 - ##y 1 - ) -] +[ + (parallel + ##x 0 + ##y 0 + ) + (parallel + ##x 1 + ##y 0 + ) + (parallel + ##x 0 + ##y 1 + ) +] +[ + (parallel + ##x 0 + ##y 0 + ) + (parallel + ##x 1 + ##y 0 + ) + (parallel + ##x 0 + ##y 1 + ) + (parallel + ##x 0 + ##y 0.5 + ) +] +[ + (parallel + ##x 0 + ##y 0 + ) + (parallel + ##x 0 + ##y 1 + ) +] --compute_on_contained_entities-- -{ - Child5 { - q (+ - x - (call_container "^a") - ) - } -} -{ - Child1 7 - Child2 2 - Child4 -200 - Child6 3 - Child7 10 -} -{ - Child1 7 - Child2 2 - Child4 -200 - Child6 3 - Child7 10 -} -{Child2 2 Child4 -200} +{ + Child5 { + q (+ + x + (call_container "^a") + ) + } +} +{ + Child1 7 + Child2 2 + Child4 -200 + Child6 3 + Child7 10 +} +{ + Child1 7 + Child2 2 + Child4 -200 + Child6 3 + Child7 10 +} +{Child2 2 Child4 -200} --compute_entity_convictions-- case convictions: -{ - entity1 1.8849070781661639 - entity2 0.6863118922121982 - entity3 0.8222276770849821 - entity4 1.9468118839925106 - entity5 0.7797040417153973 -} +{ + entity1 1.8849070781661639 + entity2 0.6863118922121982 + entity3 0.8222276770849821 + entity4 1.9468118839925106 + entity5 0.7797040417153973 +} case convictions: -{ - entity1 0.655877894152981 - entity2 4.719518200776451 - entity3 3.1299148442694946 - entity4 0.6588967213280371 - entity5 0.7011374455603876 -} +{ + entity1 0.655877894152981 + entity2 4.719518200776451 + entity3 3.1299148442694946 + entity4 0.6588967213280371 + entity5 0.7011374455603876 +} case convictions unweighted: -{ - entity1 2.2695667753739017 - entity2 0.6731896181878543 - entity3 1.1557765434908727 - entity4 38.384973496395396 - entity5 0.45815851485891435 -} +{ + entity1 2.2695667753739017 + entity2 0.6731896181878543 + entity3 1.1557765434908727 + entity4 38.384973496395396 + entity5 0.45815851485891435 +} case convictions weighted by object (with erroneously long nominal): -{ - TestContainerExec 0.2828909712209332 - vert0 1.2974898602334366 - vert1 1.2974898602334366 - vert2 1.1342260882087178 - vert3 1.2974898602334366 - vert4 73.7945497230898 - vert5 3.880438191446671 -} +{ + TestContainerExec 0.2828909712209332 + vert0 1.2974898602334366 + vert1 1.2974898602334366 + vert2 1.1342260882087178 + vert3 1.2974898602334366 + vert4 73.7945497230898 + vert5 3.880438191446671 +} case convictions x exists before: -{entity3 1.0000000933277426 entity4 0.9999998458521889 entity5 1.0000000608201045} +{entity3 1.0000000933277426 entity4 0.9999998458521889 entity5 1.0000000608201045} case convictions x exists after: -{ - entity3 {x 16} - entity4 {x 8} - entity5 {x 32} -} +{ + entity3 {x 16} + entity4 {x 8} + entity5 {x 32} +} case convictions object = 1: -{ - vert0 0.9999999999999484 - vert1 0.9999999999999976 - vert2 1.0000000000000566 - vert3 0.9999999999999976 -} +{ + vert0 0.9999999999999484 + vert1 0.9999999999999976 + vert2 1.0000000000000566 + vert3 0.9999999999999976 +} case convictions on a subset: -{vert0 0.5 vert3 0} +{vert0 0.5 vert3 0} --compute_entity_group_kl_divergence-- 0.01228960638554566 --compute_entity_distance_contributions-- -{ - TestContainerExec 4.721359549995793 - vert0 0.8284271247461902 - vert1 0.8284271247461902 - vert2 0.8284271247461902 - vert3 0.8284271247461902 - vert4 0.7071067811865476 - vert5 1.17157287525381 -} +{ + TestContainerExec 4.721359549995793 + vert0 0.8284271247461902 + vert1 0.8284271247461902 + vert2 0.8284271247461902 + vert3 0.8284271247461902 + vert4 0.7071067811865476 + vert5 1.17157287525381 +} (these values should match the values of the subset of these keys in the previous assoc): -{vert0 0.8284271247461902 vert1 0.8284271247461902 vert2 0.8284271247461902} -{ - vert0 0.8284271247461902 - vert1 0.8284271247461902 - vert2 0.8284271247461902 - vert3 0.8284271247461902 - vert4 0.7071067811865476 - vert5 1.17157287525381 -} +{vert0 0.8284271247461902 vert1 0.8284271247461902 vert2 0.8284271247461902} +{ + vert0 0.8284271247461902 + vert1 0.8284271247461902 + vert2 0.8284271247461902 + vert3 0.8284271247461902 + vert4 0.7071067811865476 + vert5 1.17157287525381 +} (these values should match the values of the subset of these keys in the previous assoc): -{vert4 0.7071067811865476 vert5 1.17157287525381} +{vert4 0.7071067811865476 vert5 1.17157287525381} --compute_entity_kl_divergences-- -{ - vert0 0.00018681393615961172 - vert1 0.00035266794463499965 - vert2 0.005341750456218763 - vert3 0.00018681393615961172 - vert4 0.006401917906003654 - vert5 0.010670757326457676 -} -(these values should match the values of the subset of these keys in the previous assoc):{vert0 0.00018681393615961172 vert3 0} +{ + vert0 0.00018681393615961172 + vert1 0.0003526679446349979 + vert2 0.005341750456218763 + vert3 0.00018681393615961172 + vert4 0.006401917906003654 + vert5 0.010670757326457676 +} +(these values should match the values of the subset of these keys in the previous assoc):{vert0 0.00018681393615961172 vert3 0} additional conviction calculations: -case conviction:{ - vert0 0.8000570855094574 - vert1 0.7468655552274358 - vert3 6.2015767755691655 - vert5 0.8000570855094727 -} -case conviction:{ - vert0 0.6770361498076789 - vert1 3.8439118699400026 - vert3 1.3354696017896601 - vert5 0.6604923501807921 -} -cyclic feature nearest neighbors: {cyclic1 1 cyclic5 0.5} +case conviction:{ + vert0 0.8000570855094574 + vert1 0.7468655552274358 + vert3 6.2015767755691655 + vert5 0.8000570855094727 +} +case conviction:{ + vert0 0.6770361498076789 + vert1 3.8439118699400026 + vert3 1.3354696017896601 + vert5 0.6604923501807921 +} +cyclic feature nearest neighbors: {cyclic1 1 cyclic5 0.5} cyclic test expected: 155, 200, 190 ... deg values of 0 8 and 12: -200: 0.05555555555555555 (null - ##deg 8 -) -155: 0.1 (null - ##deg 0 -) -190: 0.045454545454545456 (null - ##deg 12 -) +155: 0.1 (null + ##deg 0 +) +190: 0.045454545454545456 (null + ##deg 12 +) +200: 0.05555555555555555 (null + ##deg 8 +) --contains_label-- -(true) +(true) -(false) +(false) -(true) +(true) -(false) +(false) --assign_to_entities-- -#a2e (null) -" or " -3 -(true) -5 +#a2e (null) +" or " +3 +(true) +5 (parallel #asgn_test 12) -(true) -4 -(parallel - ##a 2 - ##b 3 - ##c 4 -) -(+ - ##three 12 - 4 -) +(true) +4 +(parallel + ##a 2 + ##b 3 + ##c 4 +) +(+ + ##three 12 + 4 +) --direct_assign_to_entities-- -#a 12 -(true) -#a 7 +#a 12 +(true) +#a 7 --accum_to_entities-- 7 -#i2e2 -[1 2 3 4] +#i2e2 +[1 2 3 4] --retrieve_from_entity-- -" and " -12 -12 -[12 13] -{a 12 b 13} +" and " +12 +12 +[12 13] +{a 12 b 13} --direct_retrieve_from_entity-- -7 -#a 7 +7 +#a 7 --call_entity-- -[ - "Child1" - "Child2" - "Child3" - "Child4" - "Child5" - "Child6" - "Child7" -] -(parallel - ##^a 3 - ##b (contained_entities) - ##c - (+ x 1) - ##d - (call_entity - "Child5" - "q" - {x x} - ) - ##!e 12 - ##x 4 - ##y 5 -) -3 -[ - "Child1" - "Child2" - "Child3" - "Child4" - "Child5" - "Child6" - "Child7" -] -6 +[ + "Child1" + "Child2" + "Child3" + "Child4" + "Child5" + "Child6" + "Child7" +] +(parallel + ##^a 3 + ##b (contained_entities) + ##c + (+ x 1) + ##d + (call_entity + "Child5" + "q" + {x x} + ) + ##!e 12 + ##x 4 + ##y 5 +) +3 +[ + "Child1" + "Child2" + "Child3" + "Child4" + "Child5" + "Child6" + "Child7" +] +6 execution limits tests 87 --call_entity_get_changes-- -4 -6 -[ - (true) - (seq - (create_entities - ["CEGCTest" "Contained"] - (null - #a 4 - #b 6 - ) - ) - (print "4\r\n") - (assign_to_entities - ["CEGCTest" "Contained"] - {a 6 b 10} - ) - (print "6\r\n") - (set_entity_rand_seed - ["CEGCTest" "Contained"] - "bbbb" - (false) - ) - (destroy_entities - ["CEGCTest" "Contained"] - ) - ) -] +4 +6 +[ + (true) + (seq + (create_entities + ["CEGCTest" "Contained"] + (null + #a 4 + #b 6 + ) + ) + (print "4\r\n") + (assign_to_entities + ["CEGCTest" "Contained"] + {a 6 b 10} + ) + (print "6\r\n") + (set_entity_rand_seed + ["CEGCTest" "Contained"] + "bbbb" + (false) + ) + (destroy_entities + ["CEGCTest" "Contained"] + ) + ) +] --call_container-- 8 8 (null) --circular, repeated, and preevaluated references-- -{a 1 b 2} -(associate "a" 1 "b" 2) +{a 1 b 2} +(associate "a" 1 "b" 2) (null) 1 a -[ - {a 1} - @(get - (target 2) - 0 - ) - 1 -] -[ - {a 1} - @(get - (target 2) - 0 - ) - 1 -] +[ + {a 1} + @(get + (target 2) + 0 + ) + 1 +] +[ + {a 1} + @(get + (target 2) + 0 + ) + 1 +] 3 -[ - {a 3} - @(get - (target 2) - [0 "a"] - ) -] - -[ - {a 3} - @(get - (target 2) - [0 "a"] - ) -] +[ + {a 3} + @(get + (target 2) + [0 "a"] + ) +] + +[ + {a 3} + @(get + (target 2) + [0 "a"] + ) +] entity cyclic test: -(declare - {create_new_entity (true) new_entity (null)} - (let - { - _ (lambda - ##label_target - [ - {a 3} - @(get - (target 2) - [0 "a"] - ) - ] - ) - } - (if - create_new_entity - (assign - "new_entity" - (first - (create_entities new_entity _) - ) - ) - (assign_entity_roots new_entity _) - ) - ) - (set_entity_rand_seed new_entity "2[Nk&") - new_entity -) +(declare + {create_new_entity (true) new_entity (null)} + (let + { + _ (lambda + ##label_target + [ + {a 3} + @(get + (target 2) + [0 "a"] + ) + ] + ) + } + (if + create_new_entity + (assign + "new_entity" + (first + (create_entities new_entity _) + ) + ) + (assign_entity_roots new_entity _) + ) + ) + (set_entity_rand_seed new_entity "ܑ$[$0") + new_entity +) 3 -(declare - {create_new_entity (true) new_entity (null)} - (let - { - _ (lambda - ##label_target - [ - {a 3} - @(get - (target 2) - [0 "a"] - ) - ] - ) - } - (if - create_new_entity - (assign - "new_entity" - (first - (create_entities new_entity _) - ) - ) - (assign_entity_roots new_entity _) - ) - ) - (set_entity_rand_seed new_entity "2[Nk&") - new_entity -) +(declare + {create_new_entity (true) new_entity (null)} + (let + { + _ (lambda + ##label_target + [ + {a 3} + @(get + (target 2) + [0 "a"] + ) + ] + ) + } + (if + create_new_entity + (assign + "new_entity" + (first + (create_entities new_entity _) + ) + ) + (assign_entity_roots new_entity _) + ) + ) + (set_entity_rand_seed new_entity "ܑ$[$0") + new_entity +) cyclic lookup test: -{ - original { - auto_derive_on_train {series_id_features "id"} - } - pointer [ - [@(get (target 4) ["original" "auto_derive_on_train" "series_id_features"])] - ] -} +{ + original { + auto_derive_on_train {series_id_features "id"} + } + pointer [ + [@(get (target 4) ["original" "auto_derive_on_train" "series_id_features"])] + ] +} cyclic lookup test 2: -{ - ".f1_rate_1" { - auto_derive_on_train { - ordered_by_features ["date"] - } - } - ".f3_rate_1" { - auto_derive_on_train { - ordered_by_features [@(get (target 5) [".f1_rate_1" "auto_derive_on_train" "ordered_by_features" 0])] - } - } -} +{ + ".f1_rate_1" { + auto_derive_on_train { + ordered_by_features ["date"] + } + } + ".f3_rate_1" { + auto_derive_on_train { + ordered_by_features [@(get (target 5) [".f1_rate_1" "auto_derive_on_train" "ordered_by_features" 0])] + } + } +} --null equality tests-- -(= (null) (null)): (true) +(= (null) (null)): (true) -(= (+ (null)) (null)): (true) +(= (+ (null)) (null)): (true) -["Entity3"] -["EntityNull" "EntityNaN"] -["EntityNull" "EntityNaN"] -["Entity3" "EntityNull" "EntityNaN"] +["Entity3"] +["EntityNull" "EntityNaN"] +["EntityNull" "EntityNaN"] +["Entity3" "EntityNull" "EntityNaN"] --combo tests-- 4.5 5 -(null - #A 10 - #duped - ["b"] - @(get - (target 2) - 1 - ) -) - -["hello" "!"] -{a1 1.4142135623730951 a2 2 a3 1.4142135623730951} -{a1 1.4142135623730951 a3 1.4142135623730951} -{a3 1.4142135623730951} -{a1 5.0990195135927845 a2 2 a3 5.0990195135927845} -{a1 1 a3 1 a4 0} +(null + #A 10 + #duped + ["b"] + @(get + (target 2) + 1 + ) +) + +["hello" "!"] +{a1 1.4142135623730951 a2 2 a3 1.4142135623730951} +{a1 1.4142135623730951 a3 1.4142135623730951} +{a3 1.4142135623730951} +{a1 5.0990195135927845 a2 2 a3 5.0990195135927845} +{a1 1 a3 1 a4 0} --accuracy tests-- 1036.1581794564518 24.769501899470985 4.3464184709105573e-45 -{point1 1036.1581794564518 point2 978.5569789822398 point3 1036.1581794564518} +{point1 1036.1581794564518 point2 978.5569789822398 point3 1036.1581794564518} distance symmetry tests -[ - [ - "B" - "I" - "C" - "F" - "A" - "D" - "G" - "E" - ] - [ - 0 - 1 - 1 - 1 - 1 - 1 - 1024 - 1024 - ] -] -[ - [ - "B" - "C" - "I" - "A" - "F" - "D" - "E" - "G" - ] - [ - 0 - 1 - 1 - 1 - 1 - 1 - 1024 - 1024 - ] -] +[ + [ + "B" + "I" + "D" + "F" + "C" + "A" + "J" + "E" + ] + [ + 0 + 1 + 1 + 1 + 1 + 1 + 1024 + 1024 + ] +] +[ + [ + "B" + "C" + "F" + "D" + "A" + "I" + "E" + "G" + ] + [ + 0 + 1 + 1 + 1 + 1 + 1 + 1024 + 1024 + ] +] distance contributions -dc: [ - ["vert0" "vert1" "vert2" "vert3"] - [1 1 1 1.4142135623730951] -] -weighted dc: { - vert0 2 - vert1 1 - vert2 1 - vert3 1.4142135623730951 -} +dc: [ + ["vert0" "vert1" "vert2" "vert3"] + [1 1 1 1.4142135623730951] +] +weighted dc: { + vert0 2 + vert1 1 + vert2 1 + vert3 1.4142135623730951 +} removal conviction -kl: { - vert0 0.012498962161828123 - vert1 0.0014999155151563248 - vert2 0.012940692023868397 - vert3 0.012498962161828303 -} -weighted kl: { - vert0 0.043840314666364594 - vert1 0.01215014552815915 - vert2 0.023216985559271874 - vert3 0.00033148949739295053 -} -convictions: { - vert0 0.7888361319935541 - vert1 6.573458882210904 - vert2 0.7619092508719576 - vert3 0.7888361319935426 -} -further parameterized convictions: { - vert0 0.7888361319935541 - vert1 6.573458882210904 - vert2 0.7619092508719576 - vert3 0.7888361319935426 -} -weighted convictions: { - vert0 0.4535718770297335 - vert1 1.6365840035999841 - vert2 0.8564735401170989 - vert3 59.98601454701778 -} +kl: { + vert0 0.012498962161828123 + vert1 0.0014999155151563248 + vert2 0.012940692023868397 + vert3 0.012498962161828303 +} +weighted kl: { + vert0 0.043840314666364594 + vert1 0.01215014552815915 + vert2 0.023216985559271874 + vert3 0.00033148949739295053 +} +convictions: { + vert0 0.7888361319935541 + vert1 6.573458882210904 + vert2 0.7619092508719576 + vert3 0.7888361319935426 +} +further parameterized convictions: { + vert0 0.7888361319935541 + vert1 6.573458882210904 + vert2 0.7619092508719576 + vert3 0.7888361319935426 +} +weighted convictions: { + vert0 0.4535718770297335 + vert1 1.6365840035999841 + vert2 0.8564735401170989 + vert3 59.98601454701778 +} group kl divergence: 0.0014999155151563318 weighted group kl divergence: 0.012150145528158986 addition conviction -kl: { - vert0 0.0118919309314467 - vert1 0.0015341620278852101 - vert2 0.012738870517593676 - vert3 0.01189193093144647 -} -weighted kl: { - vert0 0.04280308290362862 - vert1 0.013070224898692417 - vert2 0.023586134873106707 - vert3 0.0003283237047790495 -} -convictions: { - vert0 0.8000570855094574 - vert1 6.2015767755691655 - vert2 0.7468655552274358 - vert3 0.8000570855094727 -} -further parameterized convictions: { - vert0 0.8000570855094574 - vert1 6.2015767755691655 - vert2 0.7468655552274358 - vert3 0.8000570855094727 -} -weighted convictions: { - vert0 0.466016469887516 - vert1 1.5261360649614566 - vert2 0.8457062465879276 - vert3 60.753888021808535 -} +kl: { + vert0 0.0118919309314467 + vert1 0.0015341620278852101 + vert2 0.012738870517593676 + vert3 0.01189193093144647 +} +weighted kl: { + vert0 0.04280308290362862 + vert1 0.013070224898692417 + vert2 0.023586134873106707 + vert3 0.0003283237047790495 +} +convictions: { + vert0 0.8000570855094574 + vert1 6.2015767755691655 + vert2 0.7468655552274358 + vert3 0.8000570855094727 +} +further parameterized convictions: { + vert0 0.8000570855094574 + vert1 6.2015767755691655 + vert2 0.7468655552274358 + vert3 0.8000570855094727 +} +weighted convictions: { + vert0 0.466016469887516 + vert1 1.5261360649614566 + vert2 0.8457062465879276 + vert3 60.753888021808535 +} group kl divergence: 0.0015341620278852813 weighted group kl divergence: 0.013070224898692494 adding a case -noncyclic KL: { - vert0 0.01467982549299679 - vert1 0.0027281364373075885 - vert2 0.0027281364373075885 - vert3 0.016383251387214498 - vert4 0.0051662807478393205 -} +noncyclic KL: { + vert0 0.01467982549299679 + vert1 0.0027281364373075885 + vert2 0.0027281364373075885 + vert3 0.016383251387214498 + vert4 0.0051662807478393205 +} noncyclic group kl divergence: 0.005166280747839411 -cyclic KL: { - vert0 0.06449882851689671 - vert1 0.0020695242435298626 - vert2 0.0020695242435298626 - vert3 0.03622271709266012 - vert4 0.06081391029364311 -} -cyclic conviction: { - vert0 0.5137287240708814 - vert1 16.01087833672136 - vert2 16.01087833672136 - vert3 0.9147547047144656 - vert4 0.5448572656824459 -} +cyclic KL: { + vert0 0.06449882851689671 + vert1 0.0020695242435298626 + vert2 0.0020695242435298626 + vert3 0.03622271709266012 + vert4 0.06081391029364311 +} +cyclic conviction: { + vert0 0.5137287240708814 + vert1 16.01087833672136 + vert2 16.01087833672136 + vert3 0.9147547047144656 + vert4 0.5448572656824459 +} cyclic group kl divergence: 0.06081391029364306 surprisal transforms -probabilities: [ - ["vert0" "vert1" "vert2" "vert3"] - [2.7535180455541748e-05 2.7535180455541748e-05 5.043471233780792e-07 9.237449443012879e-09] -] - -weighted probabilities: [ - ["vert0" "vert2" "vert3" "vert1"] - [5.506960272483319e-05 5.043471233780792e-07 9.237449443012879e-09 0] -] - -surprisal contribution: {testvert 9.797630298091489} -weighted surprisal contribution: {testvert 9.797630298091489} +probabilities: [ + ["vert0" "vert1" "vert2" "vert3"] + [2.7535180455541748e-05 2.7535180455541748e-05 5.043471233780792e-07 9.237449443012879e-09] +] + +weighted probabilities: [ + ["vert0" "vert2" "vert3" "vert1"] + [5.506960272483319e-05 5.043471233780792e-07 9.237449443012879e-09 0] +] + +surprisal contribution: {testvert 9.797630298091489} +weighted surprisal contribution: {testvert 9.797630298091489} --concurrency tests-- hello hello @@ -4862,61 +4887,61 @@ hello mod : 1 max : 10 min : 1 -and : (true) +and : (true) -or : (true) +or : (true) -xor : (true) +xor : (true) -= : (false) += : (false) -!= : (false) +!= : (false) -< : (false) +< : (false) -<= : (true) +<= : (true) -> : (false) +> : (false) ->= : (false) +>= : (false) -~ : (true) +~ : (true) -list : [1 1 1 2] +list : [1 1 1 2] -associate : { - a 1 - b 1 - c 1 - d 2 -} +associate : { + a 1 + b 1 + c 1 + d 2 +} -assoc : { - a 1 - b 1 - c 1 - d 2 -} +assoc : { + a 1 + b 1 + c 1 + d 2 +} -map list : [2 4 6 8] +map list : [2 4 6 8] -map assoc : { - a 2 - b 4 - c 6 - d 8 -} +map assoc : { + a 2 + b 4 + c 6 + d 8 +} -filter list : [3 4] +filter list : [3 4] -filter assoc : {10 1} +filter assoc : {10 1} -filter assoc 2 : {10 1 20 2} +filter assoc 2 : {10 1 20 2} Expecting 1000: 1000 --concurrent entity writes-- -concurrent entity writes successful: (true) +concurrent entity writes successful: (true) --clean-up test files-- --total execution time-- -0.5610730648040771 +1.4600541591644287