SSA04

【機能】

    2円の交点を求める（2D）


【使用形式】

    CALL  SSA04(XC1,YC1,R1,XC2,YC2,R2,XYP,IR)


【引数説明】

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

    ［OUTPUT］
        XYP(2, 2) : 交点座標テーブル
　　　　　　　　　　　　　　┼──┼──┼
　　　　　　　　　　　　　　│Ｘ１│Ｙ１│ 交点1
　　　　　　　　　　　　　　│Ｘ２│Ｙ２│ 交点2
　　　　　　　　　　　　　　┼──┼──┼

        IR        : リターンフラグ
                     0 ; 交点なし
                     1 ; 交点が1点存在する（内接、または、外接）
                     2 ; 2交点が存在する
                     3 ; 2円が重なる（同一の円である）
                    -1 ; 入力エラー


【機能説明】

  ・R1≦0またはR2≦0の場合のみIR=-1を出力する。