Skip to content

Commit

Permalink
cleanup the reporting
Browse files Browse the repository at this point in the history
  • Loading branch information
Rick-Methot-NOAA committed Apr 12, 2022
1 parent 0a74f84 commit 73f0109
Show file tree
Hide file tree
Showing 2 changed files with 0 additions and 62 deletions.
2 changes: 0 additions & 2 deletions SS_benchfore.tpl
Original file line number Diff line number Diff line change
Expand Up @@ -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
Expand Down
60 changes: 0 additions & 60 deletions SS_write_report.tpl
Original file line number Diff line number Diff line change
Expand Up @@ -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";}
Expand Down Expand Up @@ -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;
Expand Down

0 comments on commit 73f0109

Please sign in to comment.