dim_na function

Set the dimension of an object