For SARC, now want fr1 to multiply the production term cb1*Stilde*nuwiggle, as specified in AIAA J 38(5):784,2000, where Stilde=vort+nuwiggle*fv2/(kappa^2*d^2) (in Aerospace Science & Tech. 1(5):297,1997 it multiplies cb1*vort*nuwiggle). Ends up making very little difference.
For SARC, now want fr1 to multiply the production term
cb1*Stilde*nuwiggle, as specified in AIAA J 38(5):784,2000,
where Stilde=vort+nuwiggle*fv2/(kappa^2*d^2)
(in Aerospace Science & Tech. 1(5):297,1997 it
multiplies cb1*vort*nuwiggle). Ends up making very little difference.

chengdi123000/CFL3D,chengdi123000/CFL3D