#include
#include
CLIPPER b_isndp()
{
union {
unsigned equip;
struct {
unsigned diskette : 1;
unsigned math_copr : 1;
unsigned sys_mem : 2;
unsigned video_mode : 2;
unsigned num_drives : 2;
unsigned dma : 1;
unsigned serial_ports : 3;
unsigned game_adapter : 1;
unsigned serial_printer : 1;
unsigned num_printers : 2;
} equipment;
} eq;
eq.equip = _bios_equiplist();
_retl(eq.equipment.math_copr ? 1 : 0);
}