emath saloon (Read Only)

新規発言一覧最新記事過去一覧検索HOME

No.112  Re:サラスの方法
発言者: 田中徹
発言日: 2006 10/29 03:26
> もうすこし円弧のつながりを綺麗にしたいのですが,
> どのようにすればよいでしょうか?

元々長方形でない平行四辺形の対辺の端点の中点を中心とし、
端点を hazimeten , owariten としたら上手くつながらない
(いわゆる微分不可能)状態になると思います。

次のソースは無理矢理長方形を作ってやってみました。
あおりで両端が揃いません。
ソース中、ifClipping の true と false のコメントアウトを入れ替えると
一応両端は揃うのですが、きっとご不満でしょう。
適当に LandL 等を用いて伸ばしてください。> genio さん

# \hamidasisenbun に sensyu=\Arrowline が許されるなら...

またオリジナルのソースと点の定義が変わっています。
行列式を描いてから dviout を見ながら少しずつ変更し
最後にエディタでごっそり順序を入れ替えるという
(姑息な)手段をとりました。

# emath BBS の JellyBeans も genio genio さんだったと、今確認しました。

\documentclass[b5j]{jarticle}
\usepackage[papersize]{emathP}

\newif\ifClipping%
\let\ifClipping\iffalse%
%\let\ifClipping\iftrue%
\begin{document}
\makeatletter%
\def\MoveP#1#2#3#4#5{%
\Suisen#3#1#2\@MPoint%
\Subvec#3\@MPoint\@AddVec%
\Addvec#1\@AddVec#4%
\Addvec#2\@AddVec#5%
}
\makeatother%
\begin{zahyou*}[ul=10mm,Yohaku=1.5\unitlength](0.5,3.5)(0.5,3.5)%
\def\iv{0}%
\def\iii{1}%
\def\ii{2}%
\def\i{3}%
\def\z{4}%
\def\L{0}%
\def\A{1}%
\def\B{2}%
\def\C{3}%
\def\R{4}%
\tenretu*{Lz(\L,\z);Li(\L,\i);Lii(\L,\ii);Liii(\L,\iii);Liv(\L,\iv)}%
\tenretu*{Az(\A,\z);Ai(\A,\i);Aii(\A,\ii);Aiii(\A,\iii);Aiv(\A,\iv)}%
\tenretu*{Bz(\B,\z);Bi(\B,\i);Bii(\B,\ii);Biii(\B,\iii);Biv(\B,\iv)}%
\tenretu*{Cz(\C,\z);Ci(\C,\i);Cii(\C,\ii);Ciii(\C,\iii);Civ(\C,\iv)}%
\tenretu*{Rz(\R,\z);Ri(\R,\i);Rii(\R,\ii);Riii(\R,\iii);Riv(\R,\iv)}%
{\thicklines%
\hamidasisenbun\LT\LB{0.05}{0.05}%
\hamidasisenbun\RT\RB{0.05}{0.05}%
}%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\Arrowline{\Lz\Riv}%
\Put\Riv[se]{$+$}%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\Drawline{\Li\Civ}%
\MoveP\Li\Civ\Ci\P\Q%
\ifClipping%
\LandL\Rz\Riv\P\Q\Temp%
\Addvec\Temp{(0,0)}\Q%
\fi%
\Arrowline{\P\Q}%
\Put\Q[se]{$+$}%
\Bunten\Li\P{1}{1}\M%
\Kyori\M\P\R%
\Enko\M\R{hazimeten=\P}{owariten=\Li}%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\Arrowline{\Az\Riii}%
\Put\Riii[se]{$+$}%
\MoveP\Az\Riii\Aiii\P\Q%
\ifClipping%
\LandL\Liv\Riv\P\Q\Temp%
\Addvec\Temp{(0,0)}\Q%
\fi%
\Drawline{\P\Q}%
\Bunten\Az\P{1}{1}\M%
\Kyori\M\P\R%
\Enko\M\R{hazimeten=\Az}{owariten=\P}%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\ArrowLine<sensyu=\protect\hasen>\Rz\Liv%
\Put\Liv[sw]{$-$}%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\Hasen{\Aiv\Ri}%
\MoveP\Aiv\Ri\Ai\P\Q%
\ifClipping%
\LandL\Lz\Liv\P\Q\Temp%
\Addvec\Temp{(0,0)}\P%
\fi%
\ArrowLine<sensyu=\protect\hasen>\Q\P%
\Put\P[sw]{$-$}
\Bunten\Q\Ri{1}{1}\M%
\Kyori\M\Q\R%
\Enko<hasen=[0.6][0.8]>\M\R{hazimeten=\Ri}{owariten=\Q}%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\ArrowLine<sensyu=\protect\hasen>\Cz\Liii%
\Put\Liii[sw]{$-$}
\MoveP\Cz\Liii\Ciii\P\Q%
\ifClipping%
\LandL\Liv\Riv\P\Q\Temp%
\Addvec\Temp{(0,0)}\Q%
\fi%
\Hasen{\Q\P}%
\Bunten\P\Cz{1}{1}\M%
\Kyori\M\P\R%
\Enko<hasen=[0.6][0.8]>\M\R{hazimeten=\P}{owariten=\Cz}%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\Put\Ai[c]{\colorbox{white}{\large $a_1$}}%
\Put\Aii[c]{\colorbox{white}{\large $a_2$}}%
\Put\Aiii[c]{\colorbox{white}{\large $a_3$}}%
\Put\Bi[c]{\colorbox{white}{\large $b_1$}}%
\Put\Bii[c]{\colorbox{white}{\large $b_2$}}%
\Put\Biii[c]{\colorbox{white}{\large $b_3$}}%
\Put\Ci[c]{\colorbox{white}{\large $c_1$}}%
\Put\Cii[c]{\colorbox{white}{\large $c_2$}}%
\Put\Ciii[c]{\colorbox{white}{\large $c_3$}}%
\end{zahyou*}%

\end{document}




▼関連発言

110:サラスの方法 [genio] 10/28 23:07
 ├111:--- [---] 10/29 03:21
 ├112:Re:サラスの方法 [田中徹] 10/29 03:26
 ├117:--- [---] 10/29 16:01
 └118:Re:サラスの方法 [tDB] 10/29 16:10
  └119:Re[2]:サラスの方法 [genio] 10/29 17:14<-last

Pass 保存


CGIROOM