stdout.write('>')
var commLine = readLine(stdin)
while not commLine.isEmptyOrWhitespace():
  var comm : seq[string] = commLine.split(' ')
  if comm[0] == "alph":
    alphabet = readAlph(comm[1..comm.len-1])
  elif comm[0] == "lsAlph":
    lsAlph(alphabet)
  elif comm[0] == "sys":
    system = readSys(alphabet)
  elif comm[0] == "lsSys":
    lsSys(system)
  elif comm[0] == "run":
    let word : string = comm[1]
    run.Drun(system, alphabet, word)
  stdout.write('>')
  commLine = readLine(stdin)