// file: tr_tok_set_1.cc
//

// isip include files
//
#include "train_token.h"
#include "train_token_constants.h"
 
// method: set_score_cc
//
// arguments:
//  float_8 score : (input) the score value
//
// return: a logical_1 indicating success
//
// this method sets the current score
//
logical_1 Train_Token::set_score_cc(float_8 score_a) {

  // set score value
  //
  score_d = score_a;

  // exit gracefully
  //
  return ISIP_TRUE;
}
