shithub: riscv

Info  •  Files  •  Log  •  Branches

fplot: add abs

--- a/sys/src/cmd/fplot.c

+++ b/sys/src/cmd/fplot.c

@@ -53,6 +53,7 @@

 void div(void) { sp--; *sp /= *(sp+1); }

 void mod(void) { sp--; *sp = fmod(*sp, *(sp+1)); }

 void pot(void) { sp--; *sp = pow(*sp, *(sp+1)); }

+void oabs(void) { *sp = fabs(*sp); }

 void osin(void) { *sp = sin(*sp); }

 void ocos(void) { *sp = cos(*sp); }

 void otan(void) { *sp = tan(*sp); }

@@ -79,6 +80,7 @@

 	"/",	OBINARY,	0,	200,	div,

 	"%",	OBINARY,	0,	200,	mod,

 	"^",	OBINARY,	1,	300,	pot,

+	"abs",	OUNARY,		0,	400,	oabs,

 	"sin",	OUNARY,		0,	400,	osin,

 	"cos",	OUNARY,		0,	400,	ocos,

 	"tan",	OUNARY,		0,	400,	otan,