SSA87

【機能】

    2直線と円に接する円の情報を得る（2D）


【使用形式】

    CALL  SSA87(X1S,Y1S,X1E,Y1E,X2S,Y2S,X2E,Y2E,
                     XC,YC,R,XYC,IR)


【引数説明】

    ［INPUT］
        X1S, Y1S, X1E, Y1E  : 直線1の2通過点の座標
       X2S, Y2S, X2E, Y2E  : 直線2の2通過点の座標
        XC, YC, R           : 円の中心座標、半径

    ［OUTPUT］
        XYC(9, 8)  : 接円情報テーブル
           +---+---+---+---+---+---+---+---+---+
           |XC :YC | RT|XT1:YT1|XT2:YT2|XT3:YT3| 接円1
           |   :   |   |   :   |   :   |   :   | 接円2
           |   :   |   |   :   |   :   |   :   | 接円3
           |   :   |   |   :   |   :   |   :   | 接円4
           |   :   |   |   :   |   :   |   :   | 接円5
           |   :   |   |   :   |   :   |   :   | 接円6
           |   :   |   |   :   |   :   |   :   | 接円7
           |   :   |   |   :   |   :   |   :   | 接円8
           +---+---+---+---+---+---+---+---+---+
           :......::...::.....: :.....: :......:
          接円の中心 ↑ 直線1との ↑   直線3との接点
                    半径  接点  直線2との接点

        IR      : リターンフラグ
                    0〜8 ; 接円の数
                     -1 ; 入力エラー

【機能説明】

    ・2直線と円に接する円の中心座標、半径、2直線と円との接
   点座標を出力する。
    ・(X1S, Y1S)=(X1E, Y1E)または(X2S, Y2S)=(X2E, Y2E)場合の
      みIR=-1を出力する。

【使用ルーチン】

    SSG40, SSA011, SSA011, SSG48, SSG42, SSA20