SSA33

【機能】

    点をX,Y軸方向に直線に投影した点を得る（2D）


【使用形式】

    CALL  SSA33(IDIR,X,Y,XS,YS,XE,YE,XYP,IR)

【引数説明】

    ［INPUT］
        IDIR           : 投影方向の指定フラグ
                          1 ; X軸方向
                          2 ; Y軸方向
        X, Y           : 点の座標
        XS, YS, XE, YE : 直線の通過点の座標
 
    ［OUTPUT］
        XYP(2)         : 投影点の座標テーブル
        IR             : リターンフラグ
                           0〜1 ; 投影点の数
                           　-1 ; 入力エラー


【機能説明】

  ・与えられた点をIDIRにより指定された方向に直線に投影した点
  　の座標を出力する。


【使用ルーチン】

    SSG40