Pascal's triangle/Puzzle: Difference between revisions

Content added Content deleted
(Updated to work with Nim 1.4. Many changes to make code more idiomatic, especially regarding identifier case and indentation. Avoided float division. Some simplifications.t)
m (→‎{{header|Factor}}: add works with template)
Line 1,189: Line 1,189:


=={{header|Factor}}==
=={{header|Factor}}==
{{works with|Factor|0.98}}
<lang factor>USING: arrays backtrack combinators.extras fry grouping.extras
<lang factor>USING: arrays backtrack combinators.extras fry grouping.extras
interpolate io kernel math math.ranges sequences ;
interpolate io kernel math math.ranges sequences ;
IN: rosetta-code.pascals-triangle-puzzle


: base ( ?x ?z -- seq ) 2dup + swap '[ _ 11 _ 4 _ ] >array ;
: base ( ?x ?z -- seq ) 2dup + swap '[ _ 11 _ 4 _ ] >array ;