From 7e33c93fa40fe8153bdc31fd5d4c8d4f63f3bc88 Mon Sep 17 00:00:00 2001 From: Ralph Campbell Date: Thu, 10 Mar 1983 00:22:51 -0800 Subject: [PATCH] date and time created 83/03/09 16:22:51 by ralph SCCS-vsn: old/lib2648/mat.c 4.1 --- usr/src/old/lib2648/mat.c | 20 ++++++++++++++++++++ 1 file changed, 20 insertions(+) create mode 100644 usr/src/old/lib2648/mat.c diff --git a/usr/src/old/lib2648/mat.c b/usr/src/old/lib2648/mat.c new file mode 100644 index 0000000000..f01ef2bda5 --- /dev/null +++ b/usr/src/old/lib2648/mat.c @@ -0,0 +1,20 @@ +/* mat.c 4.1 83/03/09 */ +/* + * mat: retrieve the value in m[r, c]. + * rows and cols are the size of the matrix in all these routines. + */ + +#include "bit.h" + +int +mat(m, rows, cols, r, c) +register bitmat m; +register int c; +int rows, cols, r; +{ + register int thisbyte; + + thisbyte = m[r*((cols+7)>>3) + (c>>3)] & 0xff; + thisbyte &= 0x80 >> (c&7); + return (thisbyte != 0); +} -- 2.20.1