Please send questions to st10@humboldt.edu .
true.

?- change(Show).
Show = [0, 0, 0, 0, 100] ;;
Show = [0, 0, 0, 1, 95] ;;
Show = [0, 0, 0, 2, 90] ;;
Show = [0, 0, 0, 3, 85] ;;
Show = [0, 0, 0, 4, 80] ;;
Show = [0, 0, 0, 5, 75] ;;
Show = [0, 0, 0, 6, 70] ;;
Show = [0, 0, 0, 7, 65] ;;
Show = [0, 0, 0, 8, 60] ;;
Show = [0, 0, 0, 9, 55] ;;
Show = [0, 0, 0, 10, 50] ;;
Show = [0, 0, 0, 11, 45] ;;
Show = [0, 0, 0, 12, 40] ;;
Show = [0, 0, 0, 13, 35] ;;
Show = [0, 0, 0, 14, 30] ;;
Show = [0, 0, 0, 15, 25] ;;
Show = [0, 0, 0, 16, 20] ;;
Show = [0, 0, 0, 17, 15] ;;
Show = [0, 0, 0, 18, 10] ;;
Show = [0, 0, 0, 19, 5] ;;
Show = [0, 0, 0, 20, 0] ;;
Show = [0, 0, 1, 0, 90] ;;
Show = [0, 0, 1, 1, 85] ;;
Show = [0, 0, 1, 2, 80] ;;
Show = [0, 0, 1, 3, 75] ;;
Show = [0, 0, 1, 4, 70] ;;
Show = [0, 0, 1, 5, 65] ;;
Show = [0, 0, 1, 6, 60] ;;
Show = [0, 0, 1, 7, 55] ;;
Show = [0, 0, 1, 8, 50] ;;
Show = [0, 0, 1, 9, 45] ;;
Show = [0, 0, 1, 10, 40] ;;
Show = [0, 0, 1, 11, 35] ;;
Show = [0, 0, 1, 12, 30] ;;
Show = [0, 0, 1, 13, 25] ;;
Show = [0, 0, 1, 14, 20] ;;
Show = [0, 0, 1, 15, 15] ;;
Show = [0, 0, 1, 16, 10] ;;
Show = [0, 0, 1, 17, 5] ;;
Show = [0, 0, 1, 18, 0] ;;
Show = [0, 0, 2, 0, 80] ;;
Show = [0, 0, 2, 1, 75] ;;
Show = [0, 0, 2, 2, 70] ;;
Show = [0, 0, 2, 3, 65] ;;
Show = [0, 0, 2, 4, 60] ;;
Show = [0, 0, 2, 5, 55] ;;
Show = [0, 0, 2, 6, 50] ;;
Show = [0, 0, 2, 7, 45] ;;
Show = [0, 0, 2, 8, 40] ;;
Show = [0, 0, 2, 9, 35] ;;
Show = [0, 0, 2, 10, 30] ;;
Show = [0, 0, 2, 11, 25] ;;
Show = [0, 0, 2, 12, 20] ;;
Show = [0, 0, 2, 13, 15] ;;
Show = [0, 0, 2, 14, 10] ;;
Show = [0, 0, 2, 15, 5] ;;
Show = [0, 0, 2, 16, 0] ;;
Show = [0, 0, 3, 0, 70] ;;
Show = [0, 0, 3, 1, 65] ;;
Show = [0, 0, 3, 2, 60] ;;
Show = [0, 0, 3, 3, 55] ;;
Show = [0, 0, 3, 4, 50] ;;
Show = [0, 0, 3, 5, 45] ;;
Show = [0, 0, 3, 6, 40] ;;
Show = [0, 0, 3, 7, 35] ;;
Show = [0, 0, 3, 8, 30] ;;
Show = [0, 0, 3, 9, 25] ;;
Show = [0, 0, 3, 10, 20] ;;
Show = [0, 0, 3, 11, 15] ;;
Show = [0, 0, 3, 12, 10] ;;
Show = [0, 0, 3, 13, 5] ;;
Show = [0, 0, 3, 14, 0] ;;
Show = [0, 0, 4, 0, 60] ;;
Show = [0, 0, 4, 1, 55] ;;
Show = [0, 0, 4, 2, 50] ;;
Show = [0, 0, 4, 3, 45] ;;
Show = [0, 0, 4, 4, 40] ;;
Show = [0, 0, 4, 5, 35] ;;
Show = [0, 0, 4, 6, 30] ;;
Show = [0, 0, 4, 7, 25] ;;
Show = [0, 0, 4, 8, 20] ;;
Show = [0, 0, 4, 9, 15] ;;
Show = [0, 0, 4, 10, 10] ;;
Show = [0, 0, 4, 11, 5] ;;
Show = [0, 0, 4, 12, 0] ;;
Show = [0, 0, 5, 0, 50] ;;
Show = [0, 0, 5, 1, 45] ;;
Show = [0, 0, 5, 2, 40] ;;
Show = [0, 0, 5, 3, 35] ;;
Show = [0, 0, 5, 4, 30] ;;
Show = [0, 0, 5, 5, 25] ;;
Show = [0, 0, 5, 6, 20] ;;
Show = [0, 0, 5, 7, 15] ;;
Show = [0, 0, 5, 8, 10] ;;
Show = [0, 0, 5, 9, 5] ;;
Show = [0, 0, 5, 10, 0] ;;
Show = [0, 0, 6, 0, 40] ;;
Show = [0, 0, 6, 1, 35] ;;
Show = [0, 0, 6, 2, 30] ;;
Show = [0, 0, 6, 3, 25] ;;
Show = [0, 0, 6, 4, 20] ;;
Show = [0, 0, 6, 5, 15] ;;
Show = [0, 0, 6, 6, 10] ;;
Show = [0, 0, 6, 7, 5] ;;
Show = [0, 0, 6, 8, 0] ..

?- change([H, Q, D, N, P]).
H = 0,
Q = 0,
D = 0,
N = 0,
P = 100 ;;
H = 0,
Q = 0,
D = 0,
N = 1,
P = 95 ;;
H = 0,
Q = 0,
D = 0,
N = 2,
P = 90 ..

?- change([0, 2, 3, 4, 6]).
false.

?- change([1, Q, D, 1, 5]).
Q = 0,
D = 4 ;;
false.

?- halt.