dsum += e_curr[env][k] * g_lim[k] * g_lim[k];
if s_m[k] != 0.0 || (env as i8) == l_a || (env as i8) == la_prev {
dsum += s_m[k] * s_m[k];
dsum += e_curr[env][k] * g_lim[k] * g_lim[k];
if s_m[k] != 0.0 || (env as i8) == l_a || (env as i8) == la_prev {
dsum += s_m[k] * s_m[k];