/* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1984. */
/* $Header: b2typ.h,v 1.1 84/06/28 00:48:53 timo Exp $ */

/* Type matching */

typedef value btype;
btype valtype();
btype loctype();
/* Procedure must_agree(); */