number

number 
      ::= n [ "." [ n ] ] [ "E" [ "+" | "-" ] n ] 

This rule is called by

constant
exp_set