# NOT RUN {
# create an alphabet object
a<-Alphabet(symbols=c(0,1));
# check consistency
print(checkConsistency(a));
# mess up with the internals
a$.symbols[1]<-"BAD";
# NOT run: cosistency check now will throw an error
# }
# NOT RUN {
print(checkConsistency(a));
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab