Corrected 13-han scores

This commit is contained in:
Correl Roush 2012-05-08 00:45:41 -04:00
parent 3cadb3bdbc
commit 2e653f1f9a
2 changed files with 2 additions and 2 deletions

View file

@ -58,7 +58,7 @@ score(_Fu, Han, Limit) when (Han >= 5) and (Limit == true) ->
3000; 3000;
Han < 11 -> Han < 11 ->
4000; 4000;
Han < 14 -> Han < 13 ->
6000; 6000;
true -> true ->
8000 8000

View file

@ -71,7 +71,7 @@ score_yaku_limit_test_() ->
{10, 4000}, {10, 4000},
{11, 6000}, {11, 6000},
{12, 6000}, {12, 6000},
{13, 6000}, {13, 8000},
{14, 8000}, {14, 8000},
{1000, 8000} {1000, 8000}
] ]