SSA89
【機能】
3円に接する円の情報を得る(2D)
【使用形式】
CALL SSA89(XC1,YC1,R1,XC2,YC2,R2,XC3,YC3,R3,
XYC,IR)
【引数説明】
[INPUT]
XC1, YC1, R1 : 円1の中心座標、半径1
XC2, YC2, R2 : 円2の中心座標、半径2
XC3, YC3, R3 : 円3の中心座標、半径3
[OUTPUT]
XYC(9, 8) : 接円情報テーブル
+---+---+---+---+---+---+---+---+---+
|XC :YC | RT|XT1:YT1|XT2:YT2|XT3:YT3| 接円1
| : | | : | : | : | 接円2
| : | | : | : | : | 接円3
| : | | : | : | : | 接円4
| : | | : | : | : | 接円5
| : | | : | : | : | 接円6
| : | | : | : | : | 接円7
| : | | : | : | : | 接円8
+---+---+---+---+---+---+---+---+---+
:......::...::.....: :.....: :......:
接円の中心 ↑ 円1との ↑ 円3との接点
半径 接点 円2との接点
IR : リターンフラグ
0〜8 ; 接円の数
-1 ; 入力エラー
【機能説明】
・3円に接する円の中心座標、半径、3円との接点を出力する。
・R1≦0またはR2≦0の場合のみIR=-1を出力する。
【使用ルーチン】
SSA011, SSG48, SSG42