Huffman coding: Difference between revisions

m
→‎{{header|REXX}}: use format instead of right to diagnose size poblems
m (→‎{{header|REXX}}: use format instead of right to diagnose size poblems)
Line 5,008:
* 27.12.2013 Walter Pachl
* 29.12.2013 -"- changed for test of s=xrange('00'x,'ff'x)
* 14.03.2018 -"- use format instead of right to diagnose size poblems
* Stem m contains eventually the following node data
* m.i.0id Node id
Line 5,137 ⟶ 5,138:
End
End
Say 'Input ="' s'"'
Say 'result="' sr'"'
 
Exit
Line 5,148 ⟶ 5,149:
Say ' i pp id c f l r d'
Do i=1 To m.0
Say rightformat(i,23) rightformat(m.i.0o,34) rightformat(m.i.0id,23),
rightformat(m.i.0f,23) rightformat(m.i.0l,23) rightformat(m.i.0r,23) m.i.0d m.i.0t
End
Call dbg copies('-',21)
Line 5,328 ⟶ 5,329:
1011110111000000001110111000011011101101011101001111101000110011010001
00111110000110010
Input ="this is an example for huffman encoding"
result ="this is an example for huffman encoding"</pre>
 
=={{header|Ruby}}==
2,289

edits