void radcorsquare()
{
   //
   // To see the output of this macro, click begin_html <a href="gif/feynman.gif">here</a>. end_html
   //
  //   TCanvas *c1 = new TCanvas("c1", "A canvas", 800,400);
  //   c1->Divide(3,2);
   TCanvas *c1 = new TCanvas("c1", "A canvas", 800,500);
   c1->Divide(3,2);
   gStyle->SetLineWidth(3);

   for (int i=1;i<6;i++){
     c1->cd(i);
     TPad* p1 = (TPad*)c1->GetPad(i);
     p1->Range(-20., -40., 130., 200.);


     TArrow * muarr = new TArrow( 55,55 , 5,5, .05, "-|>-");
     TArrow * nubarmuarr = new TArrow( 105,5 , 55,55, .05, "-|>-");
     TArrow * Warr = new TArrow( 55,55 , 55,105, .1, "--->-");
     TArrow * earr = new TArrow( 105,155 , 55,105, .05, "-|>-");
     TArrow * nuearr = new TArrow( 55,105 ,105,55, .05, "-|>-");
     Warr->SetLineStyle(2);
     muarr->Draw();
     nubarmuarr->Draw();
     Warr->Draw();
     earr->Draw();
     nuearr->Draw();
     TLatex t;
     t.SetTextAlign(22);
     t.SetTextSize(0.15);
     t.DrawLatex(0,10,"#mu^{+}");
     t.DrawLatex(110,10,"#bar{#nu}_{#mu}");
     t.DrawLatex(110,150,"e^{+}");
     t.DrawLatex(110,45,"#nu_{e}");
     t.DrawLatex(50,85,"W^{+}");
     
     if (i==1) { 
       t.DrawLatex(5,140,"(a)");
       TCurlyArc * gamarr=new TCurlyArc(30,30,20,45,225,0.5,0.2);
       gamarr->SetWavy();
       gamarr->Draw();
       t.DrawLatex(20,70,"#gamma");
     }
     if (i==2) {
       t.DrawLatex(5,140,"(b)");
       TCurlyArc * gamarr=new TCurlyArc(80,130,20,45,225,0.5,0.2);
       gamarr->SetWavy();
       gamarr->Draw();
       t.DrawLatex(70,170,"#gamma");
     }
     if (i==3) {
       t.DrawLatex(5,140,"(c)");
       TCurlyArc * gamarr=new TCurlyArc(65,80,45,80,235,0.5,0.2);
       gamarr->SetWavy();
       gamarr->Draw();
       t.DrawLatex(40,150,"#gamma");

     }
     if (i==4) { 
       t.DrawLatex(5,140,"(d)");
       TCurlyLine * gamlin=new TCurlyLine(20,20,40,190,0.2,0.03);
       gamlin->SetWavy();
       gamlin->Draw();
       t.DrawLatex(20,100,"#gamma");       

     }
     if (i==5) {
       t.DrawLatex(5,140,"(e)");
       TCurlyLine * gamlin=new TCurlyLine(70,120,90,290,0.2,0.03);
       gamlin->SetWavy();
       gamlin->Draw();
       t.DrawLatex(65,170,"#gamma");       

     }
   }


   c1->Update();
}