Generate and show all primes with strictly descending decimal digits.

See also
 OEIS:A052014 - Primes with distinct digits in descending order
Related

Ascending primes


   extend=: {{ y;y,L:0(1+each i.1-{:y)}}
   ($~ q:@$)(#~ 1 p: ])10#.&>([:~.@;extend each)^:# >:i.9
    2     3    31    43     41  431  421    5   53  541  521 5431    61   653   643   641   631  6521  6421     7     73     71    761    751     743    7643     7621     7541     7321
76543 76541 76421 75431 764321   83  863  853  821 8761 8753 8741  8731  8641  8543  8521  8431 87643 87641 87631  87541  87421  86531 876431  865321 8765321  8764321       97      983
  971   953   941  9871   9851 9743 9721 9643 9631 9521 9431 9421 98731 98641 98621 98543 98321 97651 96431 94321 987631 987541 986543 975421 9875321 9754321 98765431 98764321 97654321