Execute a Markov algorithm: Difference between revisions

Content added Content deleted
(C)
Line 412:
'''Solution''':<lang j>require'strings regex'
 
markovLexer =: verb define
rules =. LF cut TAB&=`(,:&' ')}y
rules =. a: -.~ (dltb@:{.~ i:&'#')&.> rules
Line 420:
 
replace =: dyad define
'index patternLength replacement'=. x
'head tail' =. index split y
Line 426:
)
matches =: E. i. 1:
markovStrictmarkov =: dyad define
ruleIdx =. 0 [ rules =. markovLexer x
while. ruleIdx < #rules do.
Retrieved from "https://rosettacode.org/wiki/Execute_a_Markov_algorithm"