IBM = Character'val(Character'pos(HAL)+1)

HomeShort JokesTaglines MR

IBM = Character'val(Character'pos(HAL)+1);

Related: