Newsgroups: fj.comp.texhax
Path: galaxy.trc.rwcp.or.jp!coconuts.jaist!wnoc-tyo-news!aist-nara!wnoc-kyo-news!kuis-news!kudpc!sakunami!akiu!wapiko!tsran3!i-wada
From: i-wada@SRA.CO.JP (Isamu Wada)
Subject: Re: [Q] /kintou
In-Reply-To: matsumot@cit.nihon-u.ac.jp's message of 10 Feb 1995 10:40:50 GMT
Nntp-Posting-Host: tsrasv
References: <3hffri$l3h@citsvr1.cit.nihon-u.ac.jp>
Sender: news@tsran3.sra.co.jp (USENET News)
Organization: Software Research Associates, Inc., Japan
Date: Sat, 11 Feb 1995 10:00:06 GMT
Message-ID: <I-WADA.95Feb11185906@tsrasv.SRA.CO.JP>
Distribution: fj
Lines: 39
Xref: galaxy.trc.rwcp.or.jp fj.comp.texhax:5839
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.comp.texhax&nb=5839&hd=a
X-reformat-date: Mon, 18 Oct 2004 15:18:22 +0900
X-reformat-comment: Tabs were expanded into 4 column tabstops by the Galaxy's archiver. See http://katsu.watanabe.name/ancientfj/galaxy-format.html for more info.

$BOBED!w(BSRA$B$G$9!#(B

  | $B$I$J$?$+!"Y92;(B, $BB%2;$K$bBP1~$9$k%^%/%mEy$r(B
  | $B$4B8CN$NJ}!"65$($F$$$?$@$1$J$$$G$7$g$&$+!#(B
  | $B$h$m$7$/$*4j$$CW$7$^$9!#(B

$B$3$s$J$U$&$K$7$F;H$$$^$7$?$,!D(B
\$B6QEy(B{$B%P!<%9%G!<%Q!<%F%#!<(B}{12cm}
\$B6QEy(B{$B$U$#$k$?!<(B}{12cm}
$B0J2<$N%^%/%m$G$I$&$G$7$g$&$+!)(B($B$3$A$i$O!"(BASCII TeX $B$G$d$C$F$$$^$9!#!K(B

%%%%%
\newif\iffirstchar

\def\$B$-$s$H$&(B#1{%
\ifx\end#1%
  \let\next=\relax%
\else%
  \iffirstchar%
   \firstcharfalse%
   #1%
  \else%
   \hss#1%
  \fi%
  \let\next=\$B$-$s$H$&(B%
\fi
\next}

\def\$B6QEy(B#1#2{
\setbox0=\hbox{#1}
\ifdim \wd0 > #2
 \noindent\hbox{\bf\gt#1}
\else
 \firstchartrue\noindent\hbox to #2{\bf\gt\$B$-$s$H$&(B #1\end}
\fi
}
%%%%%
--
// i-wada@sra.co.jp //
