SSB47

【機能】

    直線とコニック間の最短距離を求める（2D）


【使用形式】

    CALL  SSB47(PS1,PE1,ZCF,PS2,PE2,ITYPE,NI,XYTB,
                     ISE,ZDI,IR)


【引数説明】

    ［INPUT］
        PS1(2), PE1(2)  : 直線始終点座標
       ZCF(6)          : コニック係数
        PS2(2), PE2(2)  : コニック始終点（閉じた楕円のときは使
             用しない）
        ITYPE           : コニックのタイプ
                           0 ; 完楕円
                           1 ; 楕円弧
                           2 ; 双曲線
                           3 ; 放物線

    ［OUTPUT］
        NI          : 交点数（交点以外のときNI=1）
        XYTB(4, NI) : アイテム上の最短距離点座標
                          1    2   3   4
                         +---+---+---+---+
                       1  |X1 |Y1 |X2 |Y2 |
                          +---+---+---+---+
                          +---+---+---+---+
                       NI +---+---+---+---+
                           直線  コニック
       ISE(2, NI)  : アイテム上の点位置フラグ
                       0 ; 始終点以外            1   2
                       1 ; 始点               +----+----+
                    2 ; 終点            1  |直線|ｺﾆｯｸ|
                                                +----+----+
                                                +----+----+
                                             NI +----+----+

        ZDI          : 最短距離
        IR           : リターンコード
                         0 ; 正常
                         1 ; 入力エラー
【機能説明】
    ・直線とコニック間の最短距離を求める。
    ・直線とコニックが指示範囲で交わっているとき、最短距離は
   ゼロとなる。