File: mkcontrib.awk

package info (click to toggle)
octave 4.0.3-3
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 94,200 kB
  • ctags: 52,925
  • sloc: cpp: 316,850; ansic: 43,469; fortran: 23,670; sh: 13,805; yacc: 8,204; objc: 7,939; lex: 3,631; java: 2,127; makefile: 1,746; perl: 1,022; awk: 988
file content (12 lines) | stat: -rw-r--r-- 352 bytes parent folder | download | duplicates (8) 
1
2
3
4
5
6
7
8
9
10
11
12
 
{ x[NR] = $0; } END {
  print "@multitable @columnfractions .33 .33 .33";
  rem = NR % 3;
  n = NR - rem;
  for (i = 1; i <= n; i += 3)
    printf ("@item %s @tab %s @tab %s\n", x[i], x[i+1], x[i+2]);
  if (rem == 1)
    printf ("@item %s\n", x[NR]);
  else if (rem == 2)
    printf ("@item %s @tab %s\n", x[NR-1], x[NR]);
  print "@end multitable";
}