FIRST     Отщепление от начала выражения указанного количества термов

 SYSTEM FIRST

 <FIRST SnEx>
                   где Sn - символ-целое число,
                       Ex - произвольное объектное выражение

   Отщепляет от начала выражения указанное количество термов.

   Значение:  Если Ex представляет собой последовательность из менее,
              чем Sn термов, результатом замены является выражение
                   '*'Ex
              Если же длина Ex не меньше, чем Sn термов, результатом
              замены является
                   (Ea)Eb
              где Ea и Eb - такие выражения, что Ex = EaEb
              и при этом Ea является  последовательностью из
              ровно Sn объектных термов.

  -------------------------------- Пример ----------------------------------

         <FIRST /2/'A'('B')'C'>   -->  ('A'('B'))'C'
         <FIRST /5/'A'('B')'C'>   -->  '*A'('B')'C'

Seealso:


 LAST  
 LENGR  
 LENGW  
 MULTE  
 TYPE