# Standard tests
# ==============

# See tests.ex for the standard results. Yours may differ by a few percent.

n100 * n100
n100 * n100 -e
p40 * dr
dr * p40 -e
n[kn3 eg2] * n[pi10] -e
rou[n[kn3 eg2]] * gal[n[pi10]] -e
n[ar20] * n[c20] -b
n[ar20] * n[c20] -bw
n[ar20] * n[c20] -br
n[ar20] * n[c20] -bwr
n[s20 cp] * tow[n[s10]] -v
n[bs20] * n[s20] -b

# Famous battles of our time :-)
# ==============================

# Oleg verses 5 pirates:
n2 wk41 p2 * pi5

# Dogmatix verses Trogenius
n[pk1 gs5 r7 gb4 ha10 p1] * n@1[p16 s15 c9 n@9[p26 c5] n@1] -e

# Dogmatix verses Hotspur in the (unfinished) Chateau Olympique:
n[pk1 gs4 r2 gb2 ha8 p26 c5] * n[wk74] -e

# IN vs AOO at Mt.Olympus
@  nca;    noble+crystal armor; 1   80  120
@  nsw;    noble+magic sword;   1  120   80
n[s2 pk1 w8 ha8 -t180 \
  n[s12] \
  n1 ap32 ap20 \
  n@7[p3 c14] \
  n[s4 pk15 p1] \
  nca[p12 pk8] \
  n[wk3 pk3 p6 s5] \
  n[wk27 p3 pk5] \
  n@1[p2 ar1 c2] \
  n[wk1 s7 pk7] \
  n1 n@9 \
  n[r2 gb8 w4] \
  n[pk6 s8] \
  n[p3 wk17] \
  nsw[s6 pk6] \
  n[pk8 p3 wk3 s6] \
  n[pk8 wk6 s6] \
  n[wk12 pk3 s5] \
  n[p10 wk11] \
  n@9[c26] \
  n[s10 pk4 wk6] \
  n[wk12 pk2 s6] \
  n@9 \
  n[p7] \
  n[p5] \
  n@9[c18] \
  n@9[c30] \
  n[s12] \
  n@9[s7 cp1 wk3] \
  n@9[s12] \
  n1 \
  n[s8] \
  n1 \
  n[s7] \
  n[s33] \
  n[s2] \
  n@9[wk6 c21] \
  n[p2 s3]] \
* \
cas[ n[s11 pk10 c102 sw5 wk15 \
       ap14 \
       n@1[ea28 s1 p39] \
       n[c3 wk3] \
       n[p8 c5 s1] \
       n[p5 wk2 pk1]] \
     n[p3] \
     n[p6 s17 pk6] \
     n[p25] \
     n@2 n@2 ap12 ap14 ap27 n@2 \
     n[un46 wk22 s9] \
     n@2[ar6 c21] \
     n[b4] \
     n[wk35] \
     n1 \
     n1[p23 s45]] 
