- scl.jdg [c+]
[..] La fonction [jdg] wparabscl
Code
int wparab_jdg(){
scltracefa(§, ƒ, ∅);
scltracefc("scl-%s (%s) : %s\n\n", sclver(), sclsec(), temps_char(0));
int wn=1001, wi;
double *wtp=newtablin(wn, 0, 3*2*π);
double *wpb=new double[wn];
for(wi=0;wi<wn;wi++){
wpb[wi]=wparab(wtp[wi]);
}
scl::string_c imgname=scl::string_c(ƒ)+".svg",
imgpath="./srt/"+imgname;
graf_dis(imgpath.c_str(), wn, wtp, wpb, "grid", "on",
"title", "Parabolic pulse wave",
"subtitlex", imgname.c_str(), /*"subtitle", subtitle.c_str(),*/
"linespec", "-l", "linespeca", "-a",
"background-color", "w",
"aymin", -0.1, "aymax", 1.1,
"xlabel", "wtp [rad]", /*"ylabel", "[rad]",*/ ∅);
scltracefe(§, ƒ, ∅);
return 0;
}
/* ƒ décorée par
le 13-03-2026 18:30:39 */
Sortie
[>..\xpl\src\scl.jdg.cpp.wparab_jdg]
scl-26.03 (gwin64) : 13-03-2026 18:30:39
<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
<< END OF DISLIN / VERSION 11.3.2 <<
<< Date : 13.03.2026 Time : 18:30:39 Pageformat: DA4L <<
<< Vectors : 2329 Warnings: 0 Fileformat: SVG <<
<< Metafile: ./srt/wparab_jdg.svg <<
<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
[<..\xpl\src\scl.jdg.cpp.wparab_jdg]