SSE52


【機能】

    与えられた座標系のX,またはY軸に平行な円の接線の情報を得
    る(3D)

【使用形式】

    CALL  SSE52(IDIR,PC,R,VC,PN,WVC,PS,PE,IR)

【引数説明】

    [INPUT]
        IDIR        : 接線方向の指定フラグ                      
                        1 ; X軸方向                           
                        2 ; Y軸方向                    
        PC(3)       : 円の中心座標                              
        R           : 円の半径                                  
        VC(3)       : 円の法線ベクトル                          
        PN(3, 2)    : 円上の接点の近傍点の座標及び投影ベクトル  
        WVC(3, 3)   : 指定座標系の定義ベクトル                  


    [OUTPUT]                      
        PS(3)    : 円上の接点の座標             
        PE(3)    : 接線の通過点の座標           
        IR       : リターンフラグ       
                     0 ; 正常終了       
                     1 ; 円が指定座標系のXY平面と平行でない
                     2 ; 接線が定義できない                  

【機能説明】

    ・与えられた座標系において、IDIRに指定された軸方向の接線の
      うちで、近傍点を円の存在する平面上に投影した点に近い接点
      を持つものの情報を出力する。

    ・PN(3, 2)
       +----+----+----+
       | XN | YN | ZN |  近傍点
       | Vi | Vj | Vk |  投影ベクトル
       +----+----+----+
    ・WVC(3, 3)
       +-----+-----+-----+
       | XZi | XZj | XZk |X軸定義ベクトル
       | YZi | YZj | YZk |Y軸定義ベクトル
       | ZZi | ZZj | ZZk |Z軸定義ベクトル
       +-----+-----+-----+
【使用ルーチン】

    SSH00, SSH31, SSH20, SSA52, SSH21