SSE69


【機能】

    2円に接する円を求める(3D)


【使用形式】

    CALL  SSE69(PC1,VZ1,R1,PC2,VZ2,R2,RD,PV1,PV2,
                     ZCIR,IR)


【引数説明】

    [INPUT]
        PC1(3), VZ1(3), R1 : 円1の中心座標、法線ベクトル、半径  
        PC2(3), VZ2(3), R2 : 円2の中心座標、法線ベクトル、半径  
        RD                 : 接円の半径                          
        PV1(3, 2)          : 円1の接点の近傍点の座標と指示方向  
                             ベクトル                            
        PV2(3, 2)          : 円2の接点の近傍点の座標と指示方向  
                             ベクトル                            

    [OUTPUT]                      
        ZCIR(3, 4)  : 接円の中心座標、法線ベクトル、2接点の座標
        IR          : リターンフラグ     
                        0 ; 正常終了
                        1 ; 平面チェックエラー
                        2 ; 接円が定義できない

【機能説明】
							
    ・2円の接円を求める。2円は同一平面上になければならない。
      接円が複数の場合、近傍点データにより、最適接円を出力する。
    ・ZCIR(3, 4)
       +-----+-----+-----+
      1| XC  | YC  | ZC  |  中心
      2| Zi  | Zj  | Zk  |  法線ベクトル
      3| XT1 | YT1 | ZT1 |  円1上の接点
      4| XT2 | YT2 | ZT2 |  円2上の接点
       +-----+-----+-----+
    ・PVn(3, 2)
       +----+----+----+
      1| XN | YN | ZN |  近傍点
      2| Vi | Vj | Vk |  方向ベクトル
       +----+----+----+

【使用ルーチン】

    SSH16, SSH20, SSH00, SSH31, SSA69, SSH21