robertpfeiffer

// Learn more about F# at http://fsharp.net
#light
module Module1

open System
open System.Collections.Generic

type Rope = Rope of int * int * RopeNode
and RopeNode = 
 Concat of Rope * Rope

robertpfeiffer

/* BTrace Script Template */
import com.sun.btrace.annotations.*;
import static com.sun.btrace.BTraceUtils.*;

@BTrace
public class TracingScript {
    private static java.util.Map<String, Integer> myMap = newHashMap();
    private static int methodCountTreshold = 200;
    
	@OnMethod(

robertpfeiffer

(ns de.uni-potsdam.hpi.pentago)

(def empty-board
     [[:_____ :_____ :_____ :_____ :_____ :_____]
      [:_____ :_____ :_____ :_____ :_____ :_____]
      [:_____ :_____ :_____ :_____ :_____ :_____]
      [:_____ :_____ :_____ :_____ :_____ :_____]
      [:_____ :_____ :_____ :_____ :_____ :_____]
      [:_____ :_____ :_____ :_____ :_____ :_____]])