#!/usr/bin/env raku use Test; use lib $?FILE.IO.parent(2).add('lib'); use Darts; cmp-ok( # begin: 9033f731-0a3a-4d9c-b1c0-34a1c8362afb score-dart( :x(-9), :y(9) ), &infix:<==>, 0, "Missed target", ); # end: 9033f731-0a3a-4d9c-b1c0-34a1c8362afb cmp-ok( # begin: 4c9f6ff4-c489-45fd-be8a-1fcb08b4d0ba score-dart( :x(0), :y(10) ), &infix:<==>, 1, "On the outer circle", ); # end: 4c9f6ff4-c489-45fd-be8a-1fcb08b4d0ba cmp-ok( # begin: 14378687-ee58-4c9b-a323-b089d5274be8 score-dart( :x(-5), :y(0) ), &infix:<==>, 5, "On the middle circle", ); # end: 14378687-ee58-4c9b-a323-b089d5274be8 cmp-ok( # begin: 849e2e63-85bd-4fed-bc3b-781ae962e2c9 score-dart( :x(0), :y(-1) ), &infix:<==>, 10, "On the inner circle", ); # end: 849e2e63-85bd-4fed-bc3b-781ae962e2c9 cmp-ok( # begin: 1c5ffd9f-ea66-462f-9f06-a1303de5a226 score-dart( :x(0), :y(0) ), &infix:<==>, 10, "Exactly on center", ); # end: 1c5ffd9f-ea66-462f-9f06-a1303de5a226 cmp-ok( # begin: b65abce3-a679-4550-8115-4b74bda06088 score-dart( :x(-0.1), :y(-0.1) ), &infix:<==>, 10, "Near the center", ); # end: b65abce3-a679-4550-8115-4b74bda06088 cmp-ok( # begin: 66c29c1d-44f5-40cf-9927-e09a1305b399 score-dart( :x(0.7), :y(0.7) ), &infix:<==>, 10, "Just within the inner circle", ); # end: 66c29c1d-44f5-40cf-9927-e09a1305b399 cmp-ok( # begin: d1012f63-c97c-4394-b944-7beb3d0b141a score-dart( :x(0.8), :y(-0.8) ), &infix:<==>, 5, "Just outside the inner circle", ); # end: d1012f63-c97c-4394-b944-7beb3d0b141a cmp-ok( # begin: ab2b5666-b0b4-49c3-9b27-205e790ed945 score-dart( :x(-3.5), :y(3.5) ), &infix:<==>, 5, "Just within the middle circle", ); # end: ab2b5666-b0b4-49c3-9b27-205e790ed945 cmp-ok( # begin: 70f1424e-d690-4860-8caf-9740a52c0161 score-dart( :x(-3.6), :y(-3.6) ), &infix:<==>, 1, "Just outside the middle circle", ); # end: 70f1424e-d690-4860-8caf-9740a52c0161 cmp-ok( # begin: a7dbf8db-419c-4712-8a7f-67602b69b293 score-dart( :x(-7.0), :y(7.0) ), &infix:<==>, 1, "Just within the outer circle", ); # end: a7dbf8db-419c-4712-8a7f-67602b69b293 cmp-ok( # begin: e0f39315-9f9a-4546-96e4-a9475b885aa7 score-dart( :x(7.1), :y(-7.1) ), &infix:<==>, 0, "Just outside the outer circle", ); # end: e0f39315-9f9a-4546-96e4-a9475b885aa7 cmp-ok( # begin: 045d7d18-d863-4229-818e-b50828c75d19 score-dart( :x(0.5), :y(-4) ), &infix:<==>, 5, "Asymmetric position between the inner and middle circles", ); # end: 045d7d18-d863-4229-818e-b50828c75d19 done-testing;