// file: tr_lxt_set_1.cc
//
 
// isip include files
//
#include "train_lex_tree.h"
#include "train_lex_tree_constants.h"
 
// method: set_head_cc
//
// arguments:
//  Train_Lex_node* node : (input) the head node for the lexical tree
//
// return:  a logical_1 indicating success
//
logical_1 Train_Lex_tree::set_head_cc(Train_Lex_node* node_a) {

  // set the head node
  //
  head_d = node_a;
  
  // exit gracefully
  //
  return ISIP_TRUE;
}
