SSB45


【機能】

    直線と円又は円弧間の最短距離を求める(2D)


【使用形式】

    CALL  SSB45(PS1,PE1,PC,R,ZK,PS2,PE2,NI,XYTB,
                     ISE,ZDI,IR)


【引数説明】

    [INPUT]
        PS1(2), PE1(2)  : 直線の始終点座標
       PC(2)           : 円又は円弧の中心座標
        R               : 円の半径(円弧のときR=0)
        ZK              : 円弧の回転方向(円のとき使用しない)
                            >0 ; 反時計廻り
                            <0 ; 時計廻り
        PS2(2), PE2(2)  : 円弧の始終点座標(円のときは使用しな
             い)

    [OUTPUT]                      
        NI          : 交点の数(交点以外ならばNI=1) 
        XYTB(4, NI) : 最短距離点
                       交点セットのときは     直線     円OR円弧
                        XYTB(1, )=XYTB(3, )   1    2   3   4  
                        XYTB(2, )=XYTB(4, )  +---+---+---+---+
                                          1  |X1 |Y1 |X2 |Y2 |
                                             +---+---+---+---+
                                             +---+---+---+---+
                                          NI +---+---+---+---+
       ISE(2, NI)(1, NI) : 最短距離点位置フラグ(直線)   
                  (2, NI) : 最短距離点位置フラグ(円又は円弧)
                          0 ; 始終点以外 
                          1 ; 始点      
                          2 ; 終点 
        ZDI          : 最短距離
        IR           : リターンコード      
                         0 ; 正常
                         1 ; 入力エラー

【機能説明】

    ・直線と円又は円弧の最短距離を求める。
    ・直線と円又は円弧が指示範囲で交わっているとき、最短距離は
   ゼロとなる。