my %d = map {split//} qw/sx S- r4 w2 x1 -0/;