Algorithmen & Datenstrukturen mit Java: Ein sehr einfacher erster Test

1. Test	für persistente Implementierung

package tests.persistent.list;
import ds.interfaces.List;
import ds.util.E;
import static ds.persistent.list.LinkedList.empty;
import static ds.persistent.list.LinkedList.stats;
import static ds.util.E.mkE;
import static java.lang.System.out;
public class LinkedList1 {
    public static void main(String [] argv) {
        List l = empty();
        l = l.cons(mkE(4)).cons(mkE(3)).cons(mkE(2)).cons(mkE(1));
        l = l.concat(l); // requires persistent concatenation !!!
        out.println("");
        out.println("l             : " + l);
        out.println("l.isEmpty()   : " + l.isEmpty());
        out.println("l.length()    : " + l.length());
        out.println("l.head()      : " + l.head());
        out.println("l.last()      : " + l.last());
        out.println("l.at(3)       : " + l.at(3));
        out.println("l.member(3)   : " + l.member(mkE(3)));
        out.println("l.member(9)   : " + l.member(mkE(9)));
        
        List l2 = l.tail();
        out.println("l2 = l.tail() : " + l2);
        out.println("l2.length()   : " + l2.length());
        out.println("l2.reverse()  : " + l2.reverse());
        out.println("l2            : " + l2);
        out.println("l             : " + l);
        out.println("l.length()    : " + l.length());
        out.println("\n" + stats());
    }
}

Testlauf	`java tests/persistent/list/LinkedList1`

1. Test	für destruktive Implemetierung

package tests.destructive.list;
import ds.interfaces.List;
import ds.util.E;
import static ds.destructive.list.LinkedList.empty;
import static ds.destructive.list.LinkedList.stats;
import static ds.util.E.mkE;
import static java.lang.System.out;
public class LinkedList1 {
    public static void main(String [] argv) {
        List l = empty();
        l = l.cons(mkE(4)).cons(mkE(3)).cons(mkE(2)).cons(mkE(1));
        l = l.concat(l.copy()); // requires cloning before concat
        out.println("l                 : " + l);
        out.println("l.isEmpty()       : " + l.isEmpty());
        out.println("l.length()        : " + l.length());
        out.println("l.head()          : " + l.head());
        out.println("l.at(3)           : " + l.at(3));
        out.println("l.member(3)       : " + l.member(mkE(3)));
        out.println("l.member(9)       : " + l.member(mkE(9)));
        
        List l2;
        out.println("l2 = l.tail()     : " + (l2 = l.tail()));
        out.println("l2 = l2.reverse() : " + (l2 = l2.reverse()));
        out.println("l2.length()       : " + l2.length());
        out.println("l                 : " + l);
        out.println("\n" + stats());
    }
}

Testlauf	`java tests/destructive/list/LinkedList1`

Quellen
	Test (persistent)
	Test (destrukiv)