「180°-αの三角比」の編集履歴（バックアップ）一覧はこちら
180°-αの三角比 - (2016/02/01 (月) 12:44:53) の最新版との変更点
追加された行は緑色になります。
削除された行は赤色になります。
=============================================
180-alphaの三角関数 16.01.30 cosine_rule.cdy
補角の三角関数の性質を説明する図
&ref(relation180-a.png,,title=,width=400,)
&ref(relation180-a.zip)
・画面に幾何点A, Bをとる
Addax(0);
Drwxy();
／／ 座標軸を最後に描くことを止めて
／／ ここで描く
／／ 注）y軸の一部を後述のShadeで切って文字を書き込むためである
Setcolor([1,0,0,0]);
Circledata([A,B],["Rng=[0,pi]"]);
Setcolor("black");
／／ 半円をシアン色で描く
Putoncurve("C","crAB");
Putpoint("D",[C.x,0]);
Putpoint("E",[-C.x,C.y]);
Putpoint("F",[-C.x,0]);
／／ Cを基にD,E,Fをとっていく
Listplot([A,C,D]);
Listplot([A,E,F]);
Listplot([C,E],["do"]);
／／ 各線分を描く
Anglemark("1",[D,A,E]);
Anglemark("2",[D,A,C],["E=\alpha",1.2]);
／／ 角度のマークをつける
・y軸上の文字を書き込む場所に点Gをとっておく．
Framedata("1",[G,G+[0.2,0.2]],["notex"]);
Shade(["fr1"],0);
／／ Gを中心とする四角形をTeXに書き出さないモードで作成
／／ 注）"nodisp"とすると画面にも出さない
Expr([G,"c","180^{\circ}-\alpha"]);
Expr([C,"ne","\mathrm{P}(X,\ Y)"]);
Expr([E,"nw","\mathrm{Q}(-X,\ Y)"]);
Expr([D,"s1","r",F,"s1","-r"]);
／／ 文字を書き入れる
=============================================
180-alphaの三角関数 16.01.30 cosine_rule.cdy
補角の三角関数の性質を説明する図
&ref(relation180-a.png,,title=,width=400,)
&ref(relation180-a.zip)
・画面に幾何点A, Bをとる
Addax(0);
Drwxy();
／／ 座標軸を最後に描くことを止めて
／／ ここで描く
／／ 注）y軸の一部を後述のShadeで切って文字を書き込むためである
Setcolor([1,0,0,0]);
Circledata([A,B],["Rng=[0,pi]"]);
Setcolor("black");
／／ 半円をシアン色で描く
Putoncurve("C","crAB");
Putpoint("D",[C.x,0]);
Putpoint("E",[-C.x,C.y]);
Putpoint("F",[-C.x,0]);
／／ Cを基にD,E,Fをとっていく
Listplot([A,C,D]);
Listplot([A,E,F]);
Listplot([C,E],["do"]);
／／ 各線分を描く
Anglemark("1",[D,A,E]);
Anglemark("2",[D,A,C],["E=\alpha",1.2]);
／／ 角度のマークをつける
・y軸上の文字を書き込む場所に点Gをとっておく．
Framedata("1",[G,G+[0.2,0.2]],["notex"]);
Shade(["fr1"],0);
／／ Gを中心とする四角形をTeXに書き出さないモードで作成
／／ 注）"nodisp"とすると画面にも出さない
Expr([G,"c","180^{\circ}-\alpha"]);
Expr([C,"ne","\mathrm{P}(X,\ Y)"]);
Expr([E,"nw","\mathrm{Q}(-X,\ Y)"]);
Expr([D,"s1","r",F,"s1","-r"]);
／／ 文字を書き入れる
