/*
  user procedure interface
  name: TK_start
*/

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  _task_name;
   /* CALL   */ T_MSG  _argument;
   /* RETURN */ T_ANA  _task_id;
} str_arg;

#define TASK_NAME        (arg->_task_name)
#define ARGUMENT         (arg->_argument)
#define TASK_ID          (arg->_task_id)
