129 SubrangeType 130 131 ArrayType 132 133 RecoraType 134 135 136 SetType 137 FileType 138lndexType 139 ComponentType 140 BaseType 141 ResultType 142 143 FieldList 144 145 FixedPart 146 VariantPart 147 148 149 RecordSection 150 VariantSelector 151 Variant 152 TagType 153 TagField = Consl lilt .... " Constant. = "arr<" "'" IndexType {"," IndexType } "]" "of' ('omponentType . = "rec( i Fie/lUst "set ,- '_!" BaseType . = "filE - .. f" ComponentType. Ordin dT\'pe . = Type. Ordin"dType . = Ordin..llTypeldentifier I RealTypeIdentifier I Poi"lerTypeldentijier . [ ( FLI ,dPart [";" VariantPart] I VariantPart) [ '," , ] . Recor,/Section {";" RecordSection } "case VariantSelector "of" Vanf/lf { ";' \cwiant}. ldent!i aList ":" Type. [ Tag! 'I'hl ":"] Tag Type . Const"lIt { "," Constant} ":" "(" FieldList ")" . = Ordin" iT\'peidentifier . = ldentij IT . 154 155------------------- 156 157 Constant 158 [Sign I ( UnsignedNumber I Constantldentijier) ClwracterString . 159 160---------- 161 162 Expression 163 164 SimpleExpression 165 Term 166 Factor 167 168 169 RelationalOperator 170 AddingOperator 171 MultiplyingOperator 172 UnsignedConstant 173 174 FunctionDesignator = Simple I \f'I"cssion [RelationalOperator Simi '1'1: 'pression I . = [ Sign 'I/Tm {AddingOperator Term} FactOl I MultiplyingOperator Factor} . Unsigl 'cd< 'onstant I Boundldentifier I Variable I,' ,('(Constructor I FunctionDesignator I " ." Factor I "(" Expression ")" . = "=" I ,. :">" I "~<~. I "<=" I ">" I ">=" I "in" . "+" I -" I Hor"'. = "*,, I . /" I Hdiv" I "mod" I "and" . = Uns(f?I'cdNumber I CharacterString I Con."ill/tldentifier I "nil". = Functi"l/ldentifier [ActualParameterList] . 

