SSB51

【機能】

    2つのスプライン間の最短距離を求める（2D）

【使用形式】

    CALL  SSB51(N1,QTB1,TS1,TE1,N1,QTB2,TS2,TE2,
                     ID,NI,XYTB,ISE,ZDI,IR)

【引数説明】
    ［INPUT］
        NI             : スプライン1定義点数
       QTB1(ID, N1 )   : スプライン1定義点座標
        TS1, TE1       : スプライン1パラメータ始終値
        N2             : スプライン2定義点数
        QTB2(ID, N2)   : スプライン2定義点座標
        TS2, TE2       : スプライン2パラメータ始終値
        ID             : スプラインの定義点配列の次元
                           2 ; 2次元
                           3 ; 3次元
    ［OUTPUT］                      
        NI          : 交点数（交点以外のときNI=1）NI≦20
        XYTB(6, NI) : アイテム上の最短距離点座標とパラメータ値
                   1     2     3     4     5     6
                +-----+-----+-----+-----+-----+-----+
             1  | X1  | Y1  | X2  | Y2  | T1  | T2  |
             :  +-----+-----+-----+-----+-----+-----+
             :  +-----+-----+-----+-----+-----+-----+
             NI +-----+-----+-----+-----+-----+-----+
                :.........: :..........: :..........:
                スプライン１スプライン２  スプライン１スプライン２
        ISE(2, NI)  : アイテム上の点位置フラグ
                       0 ; 始終点以外
                       1 ; 始点
                       2 ; 終点
                                 1            2
                          +------------+-------------+
                       1  |スプライン１|スプライン２ |
                       :  +------------+-------------+ 
                       :  +------------+-------------+
                       NI +------------+-------------+
        ZDI         : 最短距離
        IR          : リターンコード      
                         0 ; 正常
                         1 ; 入力エラー
【機能説明】

    ・2つのスプライン間の最短距離を求める。
    ・2つのスプラインが指示範囲で交わっているとき、最短距離は
      ゼロとなる。