#include <oxstd.h>
#import "bprobit"

main()
{
    decl probitobj = new Bprobit();       // create object
                             // load data file into object
    probitobj.LoadIn7("data/finney.in7");
    probitobj.Deterministic(FALSE);     // create constant
                                    // Formulate the model
    probitobj.Select(Y_VAR, { "vaso",0,0 } );
    probitobj.Select(X_VAR, { "Constant",0,0,
        "Lrate",0,0, "Lvolume",0,0 } );
    probitobj.SetSelSample(-1, 1, -1, 1);   // full sample

    probitobj.Estimate();                      // estimate

    delete probitobj;
}
