/* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */

/*
  $Header: b3typ.h,v 1.4 85/08/22 16:48:03 timo Exp $
*/

/* Type matching */

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