- scl.jdg [c+]
[..] La fonction [jdg] cosinintscl 
Code
int cosinint_jdg(){
scltracefa(§, ƒ, ∅);
scltracefc("scl-%s (%s) : %s\n\n", sclver(), sclsec(), temps_char(0));
int xn=1001, xi; double *cx=newtablin(xn+1, 0, 25.0);
double *x= &cx[1]; //x>0
double *y_c=new double[xn], *y_s=new double[xn];
for(xi=0;xi<xn;xi++){
cosinint(x[xi], &y_c[xi], &y_s[xi]);
}
scl::string_c imgname=scl::string_c(ƒ)+".svg",
imgpath="./srt/"+imgname;
graf_dis(imgpath.c_str(), xn, x, y_c,
"curve", xn, x, y_s,
"grid", "on",
"title", "Trigonometric integrals",
"subtitlex", imgname.c_str(), /*"subtitle", subtitle.c_str(),*/
"linespec", "-t;-l", "linespeca", "-a",
/*"axmin", -0.3, "axmax", 5.3,*/
"aymin", -2, "aymax", 2,
"legend", "Ci(x);Si(x)", "legcorn", "lra",
"background-color", "w",
/*"xlabel", "[rad]",*/ ∅);
scltracefe(§, ƒ, ∅);
return 0;
}
/* ƒ décorée par
le 05-06-2026 14:32:11 */
Sortie
[>..\xpl\src\scl.jdg.cpp.cosinint_jdg]
scl-26.05 (gwin64) : 05-06-2026 14:32:11
<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
<< END OF DISLIN / VERSION 11.3.2 <<
<< Date : 05.06.2026 Time : 14:32:11 Pageformat: DA4L <<
<< Vectors : 2646 Warnings: 0 Fileformat: SVG <<
<< Metafile: ./srt/cosinint_jdg.svg <<
<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
[<..\xpl\src\scl.jdg.cpp.cosinint_jdg]