#include <oxstd.h>
#include "dhtfile.h"

#include "dhtfile.ox"


main()
{
    decl file_x = new DhtFile(), file_y = new DhtFile();

    file_x->OpenRead("dhttst2x"); // no extension
    file_x->Info();               // check to see what is read

    file_y->OpenRead("dhttst2y"); // no extension
    file_y->Info();               // check to see what is read

    print("Reading all rows from x:", "%9.5g", file_x->Readr(0));
    print("Reading all rows from y:", "%9.5g", file_y->Readr(0));

    decl m;
    m = file_x->Readv("X2") ~ file_y->Readv("Y2");
    print("column X2 and Y2:", m, "packed version:", deleter(m));

    delete file_x;                // clean up
    delete file_y;
}
