{
  TH1S *h = new TH1S("h","Gaussian histogram w/ 2000 bins, drawn w/ \"p\"",2000,-3,3);
  h->FillRandom("gaus",1000000);

  TCanvas *c = new TCanvas("c","c",800,1200);
  c->Divide(1,2);
  c->cd(1);
  h->Draw("p");

  TH1S *hc = (TH1S*)h->Clone("hc");
  hc->GetXaxis()->SetRange(1,1878);
  hc->SetTitle("The same histo. w/ SetRange(1,1878), drawn in the same way");
  c->cd(2);
  hc->Draw("p");
}