long IntuitionBase;

extern long OpenLibrary();

main()
{
    IntuitionBase = OpenLibrary("intuition.library", 0);
    if (IntuitionBase) {
        puts ("closing the workbench screen");
        if (CloseWorkBench() == 0)
            puts ("unable to close the workbench screen");
        CloseLibrary(IntuitionBase);
    } else {
        puts ("unable to open intuition.library");
    }
}