;redcode-nano
;assert CORESIZE == 80
;name rdrc: Chiefdom Monogamy
;author Dave Hillis
;strategy -   Created using RedRace.c.
;strategy -   An evolving population playing KOTH.
mov.i  $    39, $    31
mov.i  {     9, }    -1
mov.i  }    25, }    -1
djn.i  $    -2, }    -3
slt.a  <     4, >     9
end   0