Move bwasw.R from R-2.12 to R