Return to ucmp.t.an CVS log

Up to [Research Unix] / researchv10no / cmd / troff / ancient.nroff / macros.d

Annotation of researchv10no/cmd/troff/ancient.nroff/macros.d/ucmp.t.an, revision 1.1.1.1

1.1       root        1: .nr)s 0
                      2: .ift .if \ns .nr )s 1
                      3: .nr)t 0
                      4: .ift .if !\ns .nr )t 1
                      5: .if\n()s \{.nr )L 9i
                      6: .nrLL 4.75i
                      7: .nr)O .75i
                      8: .nr)S 9
                      9: .nr)V 10 \}
                     10: .if\n()t \{.nr )L 11i
                     11: .nrLL 6.5i
                     12: .nr)O .463i
                     13: .nr)S 10
                     14: .nr)V 12 \}
                     15: .ift \{.ds R \(rg
                     16: .dsS \s\n()S
                     17: 'br\}
                     18: .ifn \{.nr )L 11i
                     19: .nrLL 6.5i
                     20: .nr)O .463i
                     21: .dsR (Reg.)
                     22: .dsS
                     23: 'br\}
                     24: .if\nT .nr LL 80n
                     25: .if\nV>1 \{
                     26: .nrLL 82n
                     27: .nr)L 84v
                     28: .rmul \}
                     29: .nr)p 0 1
                     30: .ds]I \\\\n(]
                     31: .ds]R \\\\n()
                     32: .if\nd0 .nr m \n(mo-1
                     33: .if\nm0 .ds ]m January
                     34: .if\nm1 .ds ]m February
                     35: .if\nm2 .ds ]m March
                     36: .if\nm3 .ds ]m April
                     37: .if\nm4 .ds ]m May
                     38: .if\nm5 .ds ]m June
                     39: .if\nm6 .ds ]m July
                     40: .if\nm7 .ds ]m August
                     41: .if\nm8 .ds ]m September
                     42: .if\nm9 .ds ]m October
                     43: .if\nm10 .ds ]m November
                     44: .if\nm11 .ds ]m December
                     45: .ifn \{.nr m \nm+1
                     46: .ie\nd .ds ]W (last mod. \nm/\nd/\ny)
                     47: .el.ds ]W (printed \n(mo/\n(dy/\n(yr)
                     48: 'br\}
                     49: .if\n()s .ds ]W
                     50: .if\n()t \{.ie \nd .ds ]W \*(]m \nd, 19\ny
                     51: .el.ds ]W \*(]m \n(dy, 19\n(yr
                     52: 'br\}
                     53: .pl\n()Lu
                     54: .ll\n(LLu
                     55: .lt\n(LLu
                     56: .po\n()Ou
                     57: .}f
                     58: .if\n()s .nr :m 3.5v
                     59: .if\n()t .nr :m 6v
                     60: .ifn .nr :m 7v
                     61: .ift .nr )M 3.6m
                     62: .ifn .nr )M 5n
                     63: .em}K

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.