- scl.jdg [c+]
[..] La conception [jdg] wtrapezscl
Code
int wtrapez_jdg(){
scltracefa(§, ƒ, ∅);
scltracefc("scl-%s (%s) : %s\n\n", sclver(), sclsec(), temps_char(0));
int wn=1001, wi;
double *wtp=newtablin(wn, -3*π, 3*π);
double dc_0_75 = 0.75, dc_0_25 = 0.25;
double *wpl_0_75=new double[wn];
double *wpl_0_25=new double[wn];
for(wi=0;wi<wn;wi++){
wpl_0_75[wi]=wtrapez(wtp[wi], dc_0_75);
wpl_0_25[wi]=wtrapez(wtp[wi], dc_0_25);
}
scl::string_c imgname=scl::string_c(ƒ)+".svg",
imgpath="./srt/"+imgname;
int chan=2, chai=0;
int nyl = (int)round(1400/((double)chan));
graf_dis(imgpath.c_str(), wn, wtp, wpl_0_75, "grid", "on",
"yaxislength", nyl*92/100,
"yaxisposition", 1799-(chan-1-chai)*nyl,
"title", "Trapez. wave",
"subtitlex", imgname.c_str(), /*"subtitle", subtitle.c_str(),*/
"linespec", "-l", "linespeca", "-a",
"background-color", "w",
"aymin", -1.1, "aymax", 1.1,
"legend", "dc=0.75",
/*"ylabel", "[rad]",*/ "append", "on", ∅);
chai++;
graf_dis(imgpath.c_str(), wn, wtp, wpl_0_25, "grid", "on",
"yaxislength", nyl*92/100,
"yaxisposition", 1799-(chan-1-chai)*nyl,
"title", "", "subtitlex", "", "subtitle", "",
"linespec", "-q", "linespeca", "-a",
"aymin", -1.1, "aymax", 1.1,
"legend", "dc=0.25",
"xlabel", "wtp [rad]", /*"ylabel", "[rad]",*/ /*"append", "off",*/ ∅);
scltracefe(§, ƒ, ∅);
return 0;
}
/* ƒ décorée par
le 19-04-2026 19:06:42 */
Sortie
[>..\xpl\src\scl.jdg.cpp.wtrapez_jdg]
scl-26.04 (gwin64) : 19-04-2026 19:06:42
<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
<< END OF DISLIN / VERSION 11.3.2 <<
<< Date : 19.04.2026 Time : 19:06:42 Pageformat: DA4L <<
<< Vectors : 3620 Warnings: 0 Fileformat: SVG <<
<< Metafile: ./srt/wtrapez_jdg.svg <<
<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
[<..\xpl\src\scl.jdg.cpp.wtrapez_jdg]