This is an old question but I've stumbled with this issue. What worked for me was: if 'f' is an array the command

ArrayTools:-Dimensions(f);

returns a list with the dimensions of the array 'f'. The array is empty iff nops(ArrayTools:-Dimensions(f))=0.