/*
  user procedure interface
  name: mb_open
*/

typedef long  T_BOO;
typedef long  T_ANA;
typedef float T_REAL;
typedef long  T_TMR;
typedef char  *T_MSG;

typedef struct {
   /* CALL   */ T_MSG  _mbx_name;
   /* CALL   */ T_ANA  _mode;
   /* RETURN */ T_ANA  _mbx_id;
} str_arg;

#define MBX_NAME         (arg->_mbx_name)
#define MODE             (arg->_mode)
#define MBX_ID           (arg->_mbx_id)
