File: levenshtein-1-2-3.c

package info (click to toggle)
isl 0.27-1
  • links: PTS
  • area: main
  • in suites: forky, sid, trixie
  • size: 20,476 kB
  • sloc: ansic: 230,339; python: 19,348; cpp: 7,165; sh: 4,701; makefile: 767; lisp: 207; perl: 9
file content (30 lines) | stat: -rw-r--r-- 700 bytes parent folder | download | duplicates (26)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
S1(0, 0);
for (int c0 = 1; c0 <= N; c0 += 1) {
  S2(c0, 0);
  for (int c1 = 1; c1 < c0; c1 += 1)
    S6(c0, c1);
  S3(c0, c0);
}
S7(N + 1, 0);
for (int c1 = 1; c1 <= N; c1 += 1) {
  S6(N + 1, c1);
  S8(N + 1, c1);
}
for (int c0 = N + 2; c0 < 2 * M - N - 1; c0 += 1) {
  S7(c0, -N + (N + c0 + 1) / 2 - 1);
  if ((N + c0) % 2 == 0) {
    S5(c0, (-N + c0) / 2);
    S8(c0, (-N + c0) / 2);
  }
  for (int c1 = -N + (N + c0) / 2 + 1; c1 < (N + c0 + 1) / 2; c1 += 1) {
    S6(c0, c1);
    S8(c0, c1);
  }
  if ((N + c0) % 2 == 0) {
    S4(c0, (N + c0) / 2);
    S8(c0, (N + c0) / 2);
  }
}
for (int c0 = 2 * M - N - 1; c0 < 2 * M - 1; c0 += 1)
  for (int c1 = -M + c0 + 1; c1 < M; c1 += 1)
    S6(c0, c1);