SSF441

【機能】

    2直線間の共通法線を求める（3D）


【使用形式】

    CALL  SSF441(PS1,PE1,PS2,PE2,XYTB,IR)


【引数説明】

    ［INPUT］
        PS1(3), PE1(3)   : 直線1の通過点座標
        PS2(3), PE2(3)   : 直線2の通過点座標

    ［OUTPUT］
        XYTB(6)   : 共通法線情報テーブル
                        1    2    3    4    5    6
                      +----+----+----+----+----+----+
                      | X1 | Y1 | Z1 | X2 | Y2 | Z2 |
                      +----+----+----+----+----+----+
                       :............:  :...........:
                           直線1          直線2
        IR        : リターンフラグ
                      0 ; 正常終了
                     -1 ; 2直線が平行で定義不可能

【機能説明】

    ・2直線間の通過点を与えて共通法線を求める。