### ----------------------------------------------------
### -- Math::Arrow
### -- Licenses: Artistic-2.0
### -- Authors: 
### -- File: t/arrow.rakutest
### ----------------------------------------------------
# Test Knuth Arrow notation

use Test;
use Math::Arrow;

plan 6;

is 3 ↑ 3, 27, "Exponentiation";
is 3 ↑↑ 3, 7625597484987, "Two arrow power tower";
is arrow(3,3,2), 3 ↑↑ 3, "arrow(...) function form";
is 3 ↑↑↑ 2, 3 ↑↑ 3, "Triple arrow";
is 2 ↑↑↑ 2, 4, "Simple ²2 = 4";

use Math::Arrow :constants;

ok &term:<G>.defined, "We defined G, FWIW";

# vim: expandtab shiftwidth=4


