Raw File
WD42d.r
"WD42d" <-
function (x) 
{
    t(WD4(t(WD4(x))))
}
back to top