Quickly check if a number is prime on the HP41 using this MCODE. Much faster than a standard FOCAL program

XEQ PRM? Returns 1 in X if the number in register X is prime, and 0 otherwise. LASTX contains the original number