Grapes/win 2.6 [Don't Edit] ---------- BGstretchOn BGfile 0 ---------- UserFunction 0 ---------- y = f(x) 0 ---------- 0 = f(x,y) 1 x^2/A.x^2+y^2/A.y^2=1 0 4 2 1 4 1 0 1 ---------- Point 20 P 6 6 1 P A.xcost A.ysint 0 360 t 1.00000000000000E+0000 0 0 1 0 0 1 0 1 1 1 0 3 0 2 Q 1 0 2 Q ((-A.xsint,A.ycost)/2).x ((-A.xsint,A.ycost)/2).y t 1.00000000000000E-0001 0 0 0 1 0 1 0 0 1 1 0 3 0 1 R 0 0 1 S 1 7 2 S (P-Q).x (P-Q).y t 1.00000000000000E-0001 0 0 1 1 0 1 0 0 1 1 0 2 0 1 T 1 7 2 T (P+Q).x (P+Q).y t 1.00000000000000E-0001 0 0 1 1 0 1 0 0 1 1 0 2 0 1 A 1 3 1 A 5.00 Sqrt(x^2-F.x^2) t 1.00000000000000E-0001 0 0 12 1 0 0 1 1 1 1 0 3 0 1 B 0 0 1 C 0 0 1 D 0 0 1 E 0 0 1 F 1 7 1 F 3.80 +0 t 1.00000000000000E-0001 0 0 3 1 0 1 0 1 1 1 0 3 0 1 G 1 7 1 F' -F.x +0 t 1.00000000000000E-0001 0 0 3 1 0 1 0 0 1 1 0 3 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 t 1.00000000000000E-0001 0 0 0 1 0 1 0 0 1 1 0 3 0 1 ---------- Segments 7 3 1 1 2 0 1 1 1 0 11 1 0 0 0 0 0 0 0 0 0 3 1 1 2 0 1 1 1 0 1 12 0 0 0 0 0 0 0 0 0 1 2 1 12 0 2 0 1 0 6 250 0 0 0 0 0 0 0 0 0 1 2 1 12 0 2 0 1 0 6 251 0 0 0 0 0 0 0 0 0 8 1 1 5 13 1 0 1 0 11 1 4 0 0 0 0 0 0 0 0 8 1 1 5 14 1 0 1 0 5 1 12 0 0 0 0 0 0 0 0 2 1 1 1 0 1 0 1 0 5 4 0 0 0 0 0 0 0 0 0 ---------- paramater 14 5.12500000000000E-0002 0 1 1 5.00000000000000E+0000 -3.57619254585096E-0002 0 1 1 5.00000000000000E+0000 -8.78457750000000E-0001 0 1 1 5.00000000000000E+0000 4.89631186165231E+0000 0 1 1 5.00000000000000E+0000 1.00000000000000E+0000 0 1 1 5.00000000000000E+0000 5.00000000000000E+0001 0 1 1 5.00000000000000E+0000 1.00000000000000E+0000 0 1 1 5.00000000000000E+0000 1.00000000000000E+0000 0 1 1 5.00000000000000E+0000 1.00000000000000E+0000 0 1 1 5.00000000000000E+0000 4.62564998942993E+0001 0 1 1 5.00000000000000E+0000 4.18221532017848E+0000 0 1 1 5.00000000000000E+0000 2.19221532017848E+0000 0 1 1 5.00000000000000E+0000 4.50000000000000E+0001 0 1 1 5.00000000000000E+0000 0.00000000000000E+0000 0 1 1 5.00000000000000E+0000 1 1 40 ---------- KakuMode ScanWidth LogMode ThetaMode AreaMode capStyle 2 2 1 2 1 0 DrawMode 1 AfterImageColorNo, CanAImg 2 1 circleMode 1 ---------- ScaleX Vlow,VHigh,label 0 700 x x AxesVisible,ScaleVisible,Svaluevisible,AddDegreeLetter 1 0 0 0 NUmber,Base 1 1.00000000000000E+0000 High,Low 5.52770533200227E+0000 -5.27476380380020E+0000 ---------- ScaleY Vlow,VHigh,label 0 700 y AxesVisible,ScaleVisible,Svaluevisible 1 0 0 NUmber,Base 1 1.00000000000000E+0000 High,Low 6.61935285785786E+0000 -4.18311627794461E+0000 ---------- ScaleS SquareQ AreaRectify PsMesh AxisWidth FontSize AxisOn letterCenter 1 1 0 1 12 0 0 ---------- Yvalue 1 1 ---------- Iinterval Svalue Evalue sliceNo 1 -1 1 1 40 Dfuncno Efuncno AreaQ 1 0 0 ---------- Yvalue Function List 9 y1 y2 y3 y4 y5 y6 y7 y8 y9 ---------- Panel Position 703 0 620 367 281 703 83 0 0 1 1 1 1 0 1 0 1 ---------- MEMO SECTION Style, Color, BGcolor , Size, PositionX, positionY 3 1 1 10 0 0 0 10 楕円の接線と焦点の 関係を調べます.  点{P}をドラッグして  みましょう.   ∠FPS = !{[arg(F,P,S)]|4}°   ∠F'PT = !{[arg(T,P,G)]|4}° #HideScript//初期化 # On F Change # Calc # ClrAImg ---------- 9 4 24 1 4 24 1 4 24 1 4 24 1 4 24 1 4 24 1 4 24 1 4 24 1 4 24 1 ----------