Letter frequency: Difference between revisions

Line 4,068:

close(fn)

integer count = 0

for i=' ' to #7E do

if lc[i]!=0 then

~~printf(~~1~~<span~~ ~~style="color: #0000FF;">,"'%c': %d%s"~~~~,{i~~~~<span~~ style="color: #0000FF;">,lc[i],iff(mod(i,32)=~~31?'\n':'\t'~~)})

count = mod(count+1,10)

printf(1,"'%c': %d%s",{i,lc[i],iff(count=0?'\n':'\t')})

end if

end for

Line 4,077:

Line 4,079:

<pre>

' ': 77 '!': 1 '"': 4 '#': 3 '$': 1 '%': 3 ''': 10 '(': 9 ')': 9 '+~~': 1 ',': 8 '-': 1 '0~~': 2 ~~'1': 5 '2': 1 '3': 2 '7': 3 ':': 2 '<': 1 '=': 10 '>': 1 '?': 1~~

' ': 92 '!': 1 '"': 4 '#': 3 '$': 1 '%': 3 ''': 10 '(': 9 ')': 9 '+': 2

'E': 2 'F': 1 '[': 4 '\': 2 ']': 4 '_': 2

',': 8 '-': 1 '0': 5 '1': 6 '7': 3 ':': 2 '<': 1 '=': 12 '>': 1 '?': 1

'a': 4 'b': 1 'c': ~~15 'd': 11 'e': 23 'f':~~ 14 'g': 2 'h': 11 ~~'i': 19~~ '~~k': 1 'l': 8 'm~~': 3 'n': ~~19 'o': 9~~ '~~p': 3 'q~~': 1 'r': 6 '~~s': 3 't~~': 11 ~~'u': 1 'w': 3 'x': 1 'y': 1 '{': 2 '}': 2~~

'E': 2 'F': 1 '[': 4 '\': 2 ']': 4 '_': 3 'a': 7 'b': 1 'c': 21 'd': 11

'e': 26 'f': 14 'g': 3 'h': 12 'i': 22 'j': 1 'k': 1 'l': 8 'm': 4 'n': 25

'o': 14 'p': 4 'q': 1 'r': 8 's': 6 't': 20 'u': 6 'v': 1 'w': 4 'x': 1

'y': 1 '{': 2 '}': 2

</pre>

@@ Line 4,068: / Line 4,068: @@
  <span style="color: #7060A8;">close</span><span style="color: #0000FF;">(</span><span style="color: #000000;">fn</span><span style="color: #0000FF;">)</span>
+ <span style="color: #004080;">integer</span> <span style="color: #000000;">count</span> <span style="color: #0000FF;">=</span> <span style="color: #000000;">0</span>
  <span style="color: #008080;">for</span> <span style="color: #000000;">i</span><span style="color: #0000FF;">=</span><span style="color: #008000;">' '</span> <span style="color: #008080;">to</span> <span style="color: #000000;">#7E</span> <span style="color: #008080;">do</span>
      <span style="color: #008080;">if</span> <span style="color: #000000;">lc</span><span style="color: #0000FF;">[</span><span style="color: #000000;">i</span><span style="color: #0000FF;">]!=</span><span style="color: #000000;">0</span> <span style="color: #008080;">then</span>
-         <span style="color: #7060A8;">printf</span><span style="color: #0000FF;">(</span><span style="color: #000000;">1</span><span style="color: #0000FF;">,</span><span style="color: #008000;">"'%c': %d%s"</span><span style="color: #0000FF;">,{</span><span style="color: #000000;">i</span><span style="color: #0000FF;">,</span><span style="color: #000000;">lc</span><span style="color: #0000FF;">[</span><span style="color: #000000;">i</span><span style="color: #0000FF;">],</span><span style="color: #008080;">iff</span><span style="color: #0000FF;">(</span><span style="color: #7060A8;">mod</span><span style="color: #0000FF;">(</span><span style="color: #000000;">i</span><span style="color: #0000FF;">,</span><span style="color: #000000;">32</span><span style="color: #0000FF;">)=</span><span style="color: #000000;">31</span><span style="color: #0000FF;">?</span><span style="color: #008000;">'\n'</span><span style="color: #0000FF;">:</span><span style="color: #008000;">'\t'</span><span style="color: #0000FF;">)})</span>
+         <span style="color: #000000;">count</span> <span style="color: #0000FF;">=</span> <span style="color: #7060A8;">mod</span><span style="color: #0000FF;">(</span><span style="color: #000000;">count</span><span style="color: #0000FF;">+</span><span style="color: #000000;">1</span><span style="color: #0000FF;">,</span><span style="color: #000000;">10</span><span style="color: #0000FF;">)</span>
+         <span style="color: #7060A8;">printf</span><span style="color: #0000FF;">(</span><span style="color: #000000;">1</span><span style="color: #0000FF;">,</span><span style="color: #008000;">"'%c': %d%s"</span><span style="color: #0000FF;">,{</span><span style="color: #000000;">i</span><span style="color: #0000FF;">,</span><span style="color: #000000;">lc</span><span style="color: #0000FF;">[</span><span style="color: #000000;">i</span><span style="color: #0000FF;">],</span><span style="color: #008080;">iff</span><span style="color: #0000FF;">(</span><span style="color: #000000;">count</span><span style="color: #0000FF;">=</span><span style="color: #000000;">0</span><span style="color: #0000FF;">?</span><span style="color: #008000;">'\n'</span><span style="color: #0000FF;">:</span><span style="color: #008000;">'\t'</span><span style="color: #0000FF;">)})</span>
      <span style="color: #008080;">end</span> <span style="color: #008080;">if</span>
  <span style="color: #008080;">end</span> <span style="color: #008080;">for</span>
@@ Line 4,077: / Line 4,079: @@
 {{out}}
 <pre>
-' ': 77 '!': 1  '"': 4  '#': 3  '$': 1  '%': 3  ''': 10 '(': 9  ')': 9  '+': 1  ',': 8  '-': 1  '0': 2  '1': 5  '2': 1  '3': 2  '7': 3  ':': 2  '<': 1  '=': 10 '>': 1  '?': 1
+' ': 92 '!': 1  '"': 4  '#': 3  '$': 1  '%': 3  ''': 10 '(': 9  ')': 9  '+': 2
-'E': 2  'F': 1  '[': 4  '\': 2  ']': 4  '_': 2
+',': 8  '-': 1  '0': 5  '1': 6  '7': 3  ':': 2  '<': 1  '=': 12 '>': 1  '?': 1
-'a': 4  'b': 1  'c': 15 'd': 11 'e': 23 'f': 14 'g': 2  'h': 11 'i': 19 'k': 1  'l': 8  'm': 3  'n': 19 'o': 9  'p': 3  'q': 1  'r': 6  's': 3  't': 11 'u': 1  'w': 3  'x': 1    'y': 1  '{': 2  '}': 2
+'E': 2  'F': 1  '[': 4  '\': 2  ']': 4  '_': 3  'a': 7  'b': 1  'c': 21 'd': 11
+'e': 26 'f': 14 'g': 3  'h': 12 'i': 22 'j': 1  'k': 1  'l': 8  'm': 4  'n': 25
+'o': 14 'p': 4  'q': 1  'r': 8  's': 6  't': 20 'u': 6  'v': 1  'w': 4  'x': 1
+'y': 1  '{': 2  '}': 2
 </pre>