SSA88


【機能】

    直線と2円に接する円の情報を得る(2D)


【使用形式】

    CALL  SSA88(XS,YS,XE,YE,XC1,YC1,R1,XC2,YC2,
                     R2,XYC,IR)


【引数説明】

    [INPUT]
        XS, YS, XE, YE  : 直線の2通過点の座標
       XC1, YC1, R1    : 円1の中心座標、半径
        XC2, YC2, R2    : 円2の中心座標、半径

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

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

【機能説明】

    ・直線と2円に接する円の中心座標、半径、2円との接点を
   出力する。
    ・(XS, YS)=(XE, YE)またはR1≦0またはR2≦0の場合のみIR=-1を
   出力する。

【使用ルーチン】

    SSG40, SSA011, SSG48, SSG42, SSA20