chk_dmtype: Test Assessment type variable

Called when testing a MDS data.frame is Brown U. canonical

chk_dmtype(x)