4580 JZ=VAL(A$)