4705 IF CY(1)>0 THEN A(I,CY(1))=NGX