prevLine

$line prevLine args: returns previous line in chain, invokes method if given

obj method line prevLine args {
  foreach line [$self firstDot lines] {
    if {$line eq $self} continue
    if {[$line group] ne [my group]} continue
    return [$line {*}$args]
  }
}