SSF48

【機能】

    2つの円または円弧間の最短距離を求める（3D）

【使用形式】

    CALL  SSF48(PC1,VZ1,R1,PS1,PE1,PC2,VZ2,R2,PS2,
                     PE2,NI,XYTB,ISE,ZDI,IR)

【引数説明】

    ［INPUT］
        PC1(3)         : 円1または円弧1の中心座標
        VZ1(3)         : 円1または円弧1の放線ベクトル
        R1             : 円1の半径（円弧の時、R1=0）
        PS1(3), PE1(3) : 円弧1の始終点座標（円の時は使用しない）
        PC2(3)         : 円2または円弧2の中心座標
        VZ2(3)         : 円2または円弧2の放線ベクトル
        R2             : 円2の半径（円弧の時、R2=0）
        PS2(3), PE2(3) : 円弧2の始終点座標（円の時は使用しない）

    ［OUTPUT］
        NI           : 交点数（交点以外の時、NI=1）
        XYTB(6, NI)  : 2要素の最短距離点座標
                        1    2    3    4    5    6
                      +----+----+----+----+----+----+
                    1 | X1 | Y1 | Z1 | X2 | Y2 | Z2 |
                    : |----:----:----:----:----:----|
                    : +----+----+----+----+----+----+
                    NI|____|____|____|____|____|____|
                       :............:  :...........:
                         円1or円弧1      円2or円弧2
        ISE(2, NI)   : 2要素上の点位置フラグ
                         0 ; 始終点以外
                         1 ; 始点
                         2 ; 終点
                        -1 ; 二つの要素は同じ
                          +----------+----------+
                        1 |円1or円弧1|円2or円弧2|
                        : +----------+----------+
                        : +----------+----------+
                        NI|__________|__________|

        ZDI          : 最短距離
        IR           : リターンフラグ
                         0 ; 正常終了
                         1 ; 入力エラー
【機能説明】

    ・2つの円または円弧間の最短距離を求める。