OFFSET
1,1
PROG
(PARI) isok(m) = !issquarefree(fromdigits(Vecrev(digits(m)))); \\ Michel Marcus, Feb 16 2021
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Benoit Cloitre, Jun 01 2002
STATUS
approved