{
   gROOT->LoadMacro("TMyDir.cxx+");

   TFile *file = new TFile("mydir.root", "RECREATE");

   file->cd();

   TMyDir *mydir = new TMyDir("MyDir", "MyDirectory");
      
   file->Close();

   delete file;

   file = new TFile("mydir.root", "UPDATE");

   file->ls();
   
   file->Get("MyDir;1");

   file->Close();
}