tmac/lj4.tmac

   1 .\" lj4.tmac
   2 .\"
   3 .nr _C \n(.C
   4 .cp 0
   5 .ftr CW CR
   6 .ftr C CR
   7 .ftr CX CBI
   8 .ftr H UR
   9 .ftr HR UR
  10 .ftr HB UB
  11 .ftr HBI UBI
  12 .ftr HI UI
  13 .ftr HO UI
  14 .ftr HX UBI
  15 .\" This is designed so that \(ul, \(rn and \(br form corners.
  16 .if !c\[br] .char \[br] \Z'\v'.25m'\D'R .04m -1m''
  17 .if !c\[ru] .char \[ru] \Z'\v'-.02m'\D'R .54m .04m''\h'.5m'
  18 .if !c\[rn] .char \[rn] \Z'\v'-.77m'\D'R .54m .04m''\h'.5m'
  19 .if !c\[ul] .char \[ul] \Z'\v'.23m'\D'R .54m .04m''\h'.5m'
  20 .cp \n(_C