SSA21

【機能】

    点の円への投影点を求める（2D）


【使用形式】

    CALL  SSA21(X,Y,XC,YC,R,XYP,IR)


【引数説明】

    ［INPUT］
        X, Y     : 点の座標
        XC, YC   : 円の中心座標
        R        : 円の半径座標

    ［OUTPUT］
        XYP(2,2) : 投影点の座標テーブル

　　　　　　　　　　　　　　　　┼─┼─┼
　　　　　　　　　　　　　　　　│Ｘ│Ｙ│ 投影点1
　　　　　　　　　　　　　　　　│　│　│ 投影点2
　　　　　　　　　　　　　　　　┼─┼─┼

        IR       : リターンフラグ
                    2 ; 投影点2個存在する
                        （点が円上に存在する時も含む）
                   -1 ; 入力エラー
                   -2 ; 点が円の中心と重なる


【機能説明】

  ・R≦0の時のみIR=-1を出力する。


【使用ルーチン】

    SSA01