Arithmetic evaluation: Difference between revisions

Content added Content deleted
m (→‎{{header|REXX}}: removed extra blanks at the top of the REXX section header. -- ~~~~)
m (→‎{{header|REXX}}: replaced missing blank in a REXX comment. -- ~~~~)
Line 3,364: Line 3,364:
if pos(_,nchars)==0 then leave
if pos(_,nchars)==0 then leave
lets=lets+datatype(_,'M') /*keep track of # of exponents. */
lets=lets+datatype(_,'M') /*keep track of # of exponents. */
#=# || translate(_,'EEEEE','eDdQq') /*keep buildingthe num.*/
#=# || translate(_,'EEEEE','eDdQq') /*keep building the num*/
end /*j*/
end /*j*/
j=j-1
j=j-1