for(;s=readline(c=0);print(i<4?-1:c))for(i in s)/^(.)\1|dn/i('UXLI'[i]+(/..$/(s)+s)[i])||c++