IF YOU CAN SEE THIS go to http://www.cs.cornell.edu/Info/People/sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
reduce fac pres isprimefac1 1. a : 2. b : 3. f : {a..b} 4. j : {a..b}
5. 0<f(j)
6. is_prime_factorization(a; b; f)
is_prime_factorization(a; b; reduce_factorization(f; j))