SSA89


【機能】

    3円に接する円の情報を得る(2D)


【使用形式】

    CALL  SSA89(XC1,YC1,R1,XC2,YC2,R2,XC3,YC3,R3,
                     XYC,IR)


【引数説明】

    [INPUT]
       XC1, YC1, R1    : 円1の中心座標、半径1
        XC2, YC2, R2    : 円2の中心座標、半径2
        XC3, YC3, R3    : 円3の中心座標、半径3


    [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 ; 入力エラー

【機能説明】

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

【使用ルーチン】

    SSA011, SSG48, SSG42