From 73f01092a6dfc38540299731706adceae8c3433e Mon Sep 17 00:00:00 2001
From: RickMethot <richard.methot@noaa.gov>
Date: Tue, 12 Apr 2022 15:10:21 -0700
Subject: [PATCH] cleanup the reporting

---
 SS_benchfore.tpl    |  2 --
 SS_write_report.tpl | 60 ---------------------------------------------
 2 files changed, 62 deletions(-)

diff --git a/SS_benchfore.tpl b/SS_benchfore.tpl
index aa78b6a8..fb42a29c 100644
--- a/SS_benchfore.tpl
+++ b/SS_benchfore.tpl
@@ -572,8 +572,6 @@ FUNCTION void Get_Benchmarks(const int show_MSY)
         for (g=1;g<=6;g++) {report5<<" "<<equ_catch_fleet(g,s,f);}
         report5<<endl;
       }
-      report5 <<"equil_Z"<<endl<<equ_Z<<endl;
-      report5 <<"equil_catage"<<endl<<equ_catage<<endl;
     }
 
 //  SPAWN-RECR:   calc equil spawn-recr in YPR; need to make this area-specific
diff --git a/SS_write_report.tpl b/SS_write_report.tpl
index deba40a7..3529a077 100644
--- a/SS_write_report.tpl
+++ b/SS_write_report.tpl
@@ -3400,20 +3400,6 @@ FUNCTION void SPR_profile()
       }
     }
 
-    SS2out<<"Fecundity: "<<fec(1)<<endl;
-    for (f=1;f<=Nfleet;f++){
-      if(fleet_type(f)<=2){
-        for(s=1;s<=nseas;s++) SS2out<<f<<" "<<s<<" sel_dead_bio: "<<sel_dead_bio(s,f,1)<<endl;
-      }}
-    for (f=1;f<=Nfleet;f++){
-      if(fleet_type(f)<=2){
-        for(s=1;s<=nseas;s++) SS2out<<f<<" "<<s<<" sel_num: "<<sel_num(s,f,1)<<endl;
-      }}
-    for (f=1;f<=Nfleet;f++){
-      if(fleet_type(f)<=2){
-        for(s=1;s<=nseas;s++) SS2out<<f<<" "<<s<<" sel_dead_num: "<<sel_dead_num(s,f,1)<<endl;
-      }}
-        
     SS2out<<"SPRloop Iter Bycatch Fmult F_report SPR YPR_dead YPR_dead*Recr YPR_ret*Recr Revenue Cost Profit SSB Recruits SSB/Bzero Tot_Catch ";
     for (f=1;f<=Nfleet;f++) {if(fleet_type(f)<=2) SS2out<<" "<<fleetname(f)<<"("<<f<<")Dead";}
     for (f=1;f<=Nfleet;f++) {if(fleet_type(f)<=2) SS2out<<" "<<fleetname(f)<<"("<<f<<")Ret";}
@@ -3581,52 +3567,6 @@ FUNCTION void SPR_profile()
         else if(SPRloop1==2)
           {Fmult2+=Fmultchanger2;}
       }
-      if(SPRloop1==6){
-      SS2out<<"seas fleet Hrate encB deadB retB encN deadN retN: "<<endl;
-      for (s=1;s<=nseas;s++)
-      for (f=1;f<=Nfleet;f++)
-      if(fleet_type(f)<=2)
-      {
-        SS2out<<s<<" "<<f<<" "<<Hrate(f,bio_t_base+s);
-        for (g=1;g<=6;g++) {SS2out<<" "<<Recr_msy*equ_catch_fleet(g,s,f);}
-        SS2out<<endl;
-      }
-    SS2out<<"Equil_N_at_age_at_MSY_each"<<endl<<"Seas Area GP Sex subM"<<age_vector<<endl;
-     for (s=1;s<=nseas;s++)
-     for (p=1;p<=pop;p++)
-     for (g=1;g<=gmorph;g++)
-     {if(use_morph(g)>0) SS2out<<s<<" "<<p<<" "<<GP4(g)<<" "<<sx(g)<<" "<<GP2(g)<<" "<<Recr_msy*equ_numbers(s,p,g)(0,nages)<<endl;}
-
-    SS2out<<"Equil_N_at_age_at_MSY_sum"<<endl<<"GP Sex N"<<age_vector<<endl;
-    for (gg=1;gg<=gender;gg++)
-    for (gp=1;gp<=N_GP;gp++)
-    {
-      tempvec_a.initialize();
-      for (p=1;p<=pop;p++)
-      for (g=1;g<=gmorph;g++)
-      if(use_morph(g)>0)
-      {
-        if(GP4(g)==gp && sx(g)==gg) tempvec_a+= value(Recr_msy*equ_numbers(1,p,g)(0,nages));
-      }
-      if(nseas>1)
-      {
-        tempvec_a(0)=0.;
-        for (s=1;s<=nseas;s++)
-        for (p=1;p<=pop;p++)
-        for (g=1;g<=gmorph;g++)
-        if(use_morph(g)>0 && Bseas(g)==s)
-        {
-          if(GP4(g)==gp && sx(g)==gg) tempvec_a(0) += value(Recr_msy*equ_numbers(1,p,g,0));
-        }
-      }
-      SS2out <<gp<<" "<<gg<<" N "<<tempvec_a<<endl;
-    }
-      SS2out <<"natM"<<endl<<natM<<endl;
-      SS2out <<"sel_dead_num"<<endl<<sel_dead_num<<endl;
-      SS2out <<"equil_Z"<<endl<<equ_Z<<endl;
-      SS2out <<"equil_catage"<<endl<<equ_catage<<endl;
-        
-      }
     }
 
     SS2out<<"Finish SPR/YPR profile"<<endl;