下記のソースで、次にFD上にAF=FGとなる点Gをとり、線分EGをひきたいのですが、
良い方法が思いつきません。直線を引くのには2点を与えるか、1点とベクトルを与えるか、
1点と方向角を与えるかなのでしょうが、この場合どれにも当てはまりません。
良い方法がありましたら、ご教授ください。

\documentclass[14pt]{jsarticle}
\usepackage[dvipdfm]{graphicx}
\usepackage{emathP}
\usepackage{emathPp}
\usepackage[remake]{emathPs}
\usepackage{emathMw}
\usepackage{emathEy}
\usepackage{emathW}
\usepackage{emathWs}
\setlength{\topmargin}{0pt}
\iftombow
        \addtolength{\topmargin}{-1in}
\else
        \addtolength{\topmargin}{-1truein}
\fi
\setlength{\textheight}{37\baselineskip}
\addtolength{\textheight}{\topskip}
\begin{document}

\title{無理数と平方根}
\author{}
\date{}
\maketitle

\section{無理数}
\begin{picture}[ul=1truecm](6,6)(-1,0)
        \def\A{(0,5)} \def\B{(0,0)}\def\C{(5,0)} \def\D{(5,5)}
        \Drawline{\A\B\C\D\A}
        \Put\A[nw]{A}
        \Put\B[sw]{B}
        \Put\C[se]{C}
        \Put\D[ne]{D}
        \Drawline{\B\D}        
        \put(0,0){\ougigata{5}{45}{90}}
        \CandL\B{5}\B\D\P\E
        \Put\E[se]{E}
        \Landl\A\D\E{(-1,1)}\F \Put\F[n]{F}
        \Hasen{\B\F}
        \Drawline{\F\E} \tyokkakukigou{\F\E\D}
        \touhenkigou<2>{\A\F;\F\E;\E\D}
\end{picture}
\end{document}

▼関連発言
│
└◆7437:ご教授ください [少しだけemath] 08/18 21:11
　└◆7439:Re:ご教授ください [tDB] 08/18 21:53
　　├◆7440:Re[2]:ご教授ください [田中徹] 08/18 22:31
　　│└◆7442:Re[3]:ご教授ください [少しだけemath] 08/19 04:41
　　│　└◆7444:Re[4]:\tenretu** [石原　守] 08/19 05:56
　　└◆7441:Re[2]:ご教授ください [少しだけemath] 08/19 04:30
　　　└◆7443:Re[3]:内分と外分 [石原　守] 08/19 05:49
　　　　└◆7445:Re[4]:内分と外分 [少しだけemath] 08/19 21:00<-last