Grapes/win 2.8
[Don't Edit] 3.14
----------
BGstretchOn BGfile
0 
----------
UserFunction
0
----------
y = f(x)
1 1 1
k
0 16777215 2 1 1
----------
0 = f(x,y)
0
----------
Point
22 5 0 6 7 10 0 0 2 3 4 8 9 0 0 0 0 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
P
1 6 2
P
(C+[AB]/2 roll(@)).x
(C+[AB]/2 roll(@)).y
0


t 0.1
0 0
255 16711680 16777215 1 0 0 1 1 0 0
3 0 1 0
Q
0 0 1
R
2 7 2
R
(mid(A,T)).x
(mid(A,T)).y
[AT]/2


t 0.1
0 0
48896 48896 16777215 1 0 0 1 1 0 0
1 0 2 0
S
2 7 2
S
(mid(B,T)).x
(mid(B,T)).y
[BT]/2


t 0.1
0 0
48896 48896 16777215 1 0 0 1 1 0 0
1 0 2 0
T
1 7 2
T
(perp(P,A,B)).x
(perp(P,A,B)).y
0


t 0.1
0 0
0 16711680 16777215 1 0 0 1 1 0 0
1 0 1 0
U
0 0 1
V
0 0 1
A
1 8 2
A
-1
0
0


t 0.1
0 0
0 16711680 16777215 1 0 1 1 1 0 0
1 0 1 0
B
1 9 2
B
1
0
0


t 0.1
0 0
0 16711680 16777215 1 0 1 1 1 0 0
1 0 1 0
C
2 7 2
C
(mid(A,B)).x
(mid(A,B)).y
[AB]/2


t 0.1
0 0
0 16711680 16777215 1 0 0 1 1 0 0
1 0 2 0
D
1 1 2
D
(intr(P,A,R,-R.r)).x
(intr(P,A,R,-R.r)).y
0


t 0.1
0 0
255 16711680 16777215 1 0 0 1 1 0 0
3 0 1 0
E
1 3 2
E
(intr(P,B,S,-S.r)).x
(intr(P,B,S,-S.r)).y
0


t 0.1
0 0
255 16711680 16777215 1 0 0 1 1 0 0
3 0 1 0
F
0 0 1
G
0 0 1
H
0 0 1
I
0 0 1
J
0 0 1
K
0 0 1
L
0 0 1
M
0 0 1
N
0 0 1
O
1 0 2
O
0
0
0


t 0.1
0 0
16777215 16711680 16777215 1 0 0 1 1 0 0
3 0 1 0
----------
Segments
5
1 1 1 0 16777215 1 0 1 0 0
0 
8 9 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
1 1 1 0 16777215 2 0 1 0 0
0 
1 8 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
1 1 1 0 16777215 2 0 1 0 0
0 
1 9 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
2 1 1 255 16777215 2 0 1 0 0
0 
11 12 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
1 3 1 0 16777215 2 0 1 0 0
0 
1 5 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
----------
paramater
14
1 0
1 1 0.1 1 0
1 0
1 1 0.1 1 0
1 0
1 1 0.1 1 0
1 0
1 1 0.1 1 0
1 0
1 1 0.1 1 0
1 0
1 1 0.1 1 0
1 0
1 1 0.1 1 0
1 0
1 1 0.1 1 0
1 0
1 1 0.1 1 0
1 0
1 1 0.1 1 0
1 0
1 1 0.1 1 0
1 0
1 1 0.1 1 0
7.5203581 0
1 1 0.10471975511966 1 1
5 0
1 1 1 1 2
1 1 104
----------
KakuMode ScanWidth LogMode ThetaMode AreaMode capStyle
1 4 2 1 1 0 1 1 0 1 0 32 0
DrawMode SegmentShowSync
1 1
AfterImageColorNo, CanAImg,MaxAimgN0
2 1 3001
circleMode
1
----------
ScaleX
Vlow,VHigh,label
0 1029 x
x
AxesVisible,ScaleVisible,Svaluevisible,AddDegreeLetter,ScaleGuidevisible
0 0 0 0 1
NUmber,Base,Linterval,numberR
7 1 1 7
High,Low
1.4347426517208 -1.38443543047098
----------
ScaleY
Vlow,VHigh,label
0 914 y
AxesVisible,ScaleVisible,Svaluevisible,ScaleGuidevisible
0 0 0 1 0
NUmber,Base,Linterval,NumbeerR
6 1 1 6
High,Low
1.27880334033048 -1.2548521580269
----------
ScaleS
SquareQ AreaRectify PsMesh AxisWidth FontSize AxisOn letterCenterShowPOsition ShowEquation AxisType PolorNum Areafixed
1 1 0 1 18 0 0 0 0 0 12 0 0 0
----------
Yvalue
1 1
----------
Iinterval
Svalue Evalue sliceNo
1 -1
1 1
40 10
Dfuncno Efuncno AreaQ
1 0 0
----------
Yvalue Function List
6
y1
y2
y3
y4
y5
y6
----------
Panel Position
0 0 0 0 0 52 112 85 0 0 0 0 1 0 1 0
1
----------
PetaMEMO SECTION
Style, Color, BGcolor , Size, PositionX, positionY
3 0 0 12 0 0 0

16
円周上の任意の点Ｐから、直径ABに
垂線ＰＴを下ろし、ＡＴ，ＢＴを直径と
する円Ｒ，Ｓを描く。
この２円と、ＰＡ，ＰＢとの交点を
Ｄ，Ｅとすると、直線<RED><B>ＤＥ</B></RED>は、
２円<GREEN><B>Ｒ，Ｓ</B></GREEN>の共通接線である。

アニメーションのスピードは、
{k}の値{(1<=k<=10}程度)で
調節して下さい。


#//点Ｐを１周させる。
# for @:=1.3 to 2Pi+1.3 step k*Pi/250
# draw
# next @


----------
11
4 27 1
7 39 0
7 39 0
7 39 0
7 39 0
7 39 0
7 39 0
7 39 0
4 26 0
4 26 0
4 24 0
----------
Table SECTION
RowNo, ColumnNo
0 10 200
Table Data


60 60 60 60 60 60 60 60 60 60
----------
SimpleMemo SECTION
0
----------