global RK_s RK_a RK_b RK_c RK_sh RK_bh RK_CFL RK_em_CFL; rho = 1.56; rho2 = 1.56; RK_CFL = rho; RK_em_CFL = 2.650629191439390; RK_s = 7; RK_sh = 5; RK_a = [0., 0., 0., 0., 0., 0., 0. .3772689153313680, 0., 0., 0., 0., 0., 0. .3772689153313680, .3772689153313680, 0., 0., 0., 0., 0. .2429952205373960, .2429952205373960, .2429952205373960, 0., 0., 0., 0. .1535890676951260, .1535890676951260, .1535890676951260, .2384589328462900, 0., 0., 0. .1130157515526668, 1.499472214875332, .1347534006260629, -1.064212592967825, .2051451700722326, 0., 0. -.5121109307838554, 3.917357807813375, -.4705204619138355e-1, -.2186212920159281, -1.645439959452524, -.4941335793696828, 0.]; RK_b = [.1220975693749007, .4928981734665627, -.2320236146508833, -1.983945810229386, 1.853943921817838, .9655381246675391, -.2185083644465700]; RK_c = [0., .3772689153313680, .7545378306627360, .7289856616121880, .6992261359316680, .8881739441584696, 1.]; RK_bh = [.206734020864804, .206734020864804, .117097251841844, .181802560120140, .287632146308408, 0, 0];