IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
remove prime factor1 1. a :
2. b :
3. f : {a..b}
4. p :
5. is_prime_factorization(a; b; f)
6. prime(p)
7. p | {a..b}(f)
8. p {a..b}
9. 0<f(p)
{a..b}(f) = p{a..b}(reduce_factorization(f; p))