SSA85

【機能】

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


【使用形式】

    CALL  SSA85(X,Y,XC1,YC1,R1,XC2,YC2,R2,XYC,IR)


【引数説明】

    ［INPUT］
        X, Y      : 点の座標
       XC1, YC1  : 円1の中心座標
    R1        : 円1の半径
        XC2, YC2  : 円2の中心座標
        R2        : 円2の半径

    ［OUTPUT］
        XYC(7, 4)  : 接円情報テーブル
           +----+----+----+-----+-----+-----+-----+
           | XC : YC | RT | XT1 : YT1 | XT2 : YT2 |  接円1
           |    :    |    |     :     |     :     |  接円2
           |    :    |    |     :     |     :     |  接円3
           |    :    |    |     :     |     :     |  接円4
           +----+----+----+-----+-----+-----+-----+
           :.........: ↓ :..........: :..........:
           接円の中心 半径  円1との接点    ↓
                                         円2との接点
        IR      : リターンフラグ
                    0〜4 ; 接円の数
                     -1 ; 入力エラー

【機能説明】

    ・1点を通り2円に接する円の中心座標、半径、2円との接点座
   標を出力する。
    ・R1≦0またはR2≦0の場合のみIR=-1を出力する。

【使用ルーチン】

    SSG40, SSA021, SSA20, SSA01