From a049db580776ed41bb4583bfb331d97c5a80900a Mon Sep 17 00:00:00 2001 From: Mattias Andrée Date: Sun, 19 Jun 2016 02:50:31 +0200 Subject: Add examples: sum, prod, avg, median MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Signed-off-by: Mattias Andrée --- examples/03-avg.c | 38 ++++++++++++++++++++++++++++++++++++++ 1 file changed, 38 insertions(+) create mode 100644 examples/03-avg.c (limited to 'examples/03-avg.c') diff --git a/examples/03-avg.c b/examples/03-avg.c new file mode 100644 index 0000000..7aa7645 --- /dev/null +++ b/examples/03-avg.c @@ -0,0 +1,38 @@ +/* Calculates the truncated average of $@ */ + +#include +#include + +#include + +int +main(int argc, char *argv[]) +{ + z_t sum, term; + jmp_buf env; + char *buf; + int i; + + if (setjmp(env)) + return zperror(argv[0]), 1; + + zsetup(env); + zinit(sum); + zinit(term); + zsetu(sum, 0); + + for (i = 1; i < argc; i++) { + zsets(term, argv[i]); + zadd(sum, sum, term); + } + zseti(term, argc); + zdiv(sum, sum, term); + + printf("%s\n", buf = zstr(sum, NULL, 0)); + free(buf); + + zfree(term); + zfree(sum); + zunsetup(); + return 0; +} -- cgit v1.2.3-70-g09d2