fiddles:  make bmelt=-1 in frozen areas; add nondefault k,Wr; rename to clarify decoupled