player-dos31demo.sml

(* Example player that uses DOS 3.1. 
   Threads can be composed at any ratio and priority;
   you should make your own player file instead of
   modifying this one in place.
*)
structure PlayerDOS31Demo :> LAYER =
struct
  structure GS = GameState

  (* Just creates two copies of the Ripens dominator. *)
  val (init, taketurn) = 
      DOS.makelayer [("Ripens1", 1.0, Ripens.create ()),
                     ("Ripens2", 1.0, Ripens.create ()),
                     ("NG", 1.0, NumberGenerator.create ())]
end

structure Player = LayerFn(PlayerDOS31Demo)