diff --git a/src/turtle/_impl/_lsystem_comm.scad b/src/turtle/_impl/_lsystem_comm.scad index f4a16f42..c2a166ca 100644 --- a/src/turtle/_impl/_lsystem_comm.scad +++ b/src/turtle/_impl/_lsystem_comm.scad @@ -10,17 +10,15 @@ function _join(str_lt) = [for(i = 0, s = str_lt[0]; i < leng; i = i + 1, s = str(s, str_lt[i])) s][leng - 1]; function c_or_v(c, v, rules, rules_pr, leng, i = 0) = - i == leng ? c : ( - let(idx = search([v[i]], rules, num_returns_per_match=0, index_col_num = 1)[0][0]) - rand(0, 1) <= rules_pr[idx] ? v[i] : c_or_v(c, v, rules, rules_pr, leng, i + 1) - ); + i == leng ? c : + let(idx = search([v[i]], rules, num_returns_per_match=0, index_col_num = 1)[0][0]) + rand(0, 1) <= rules_pr[idx] ? v[i] : c_or_v(c, v, rules, rules_pr, leng, i + 1); function _derive1_p(base, rules, rules_pr) = _join([ for(c = base) let(v = [for(r = rules) if(r[0] == c) r[1]]) - v == [] ? c : - c_or_v(c, v, rules, rules_pr, len(v)) + v == [] ? c : c_or_v(c, v, rules, rules_pr, len(v)) ]); function _derive_p(base, rules, rules_pr, n, i = 0) =