3814 JD=VAL(A$)