CRLIST ( lstype, list, ifail )
==============================

  Create list entity

    Can be called from the GO.

Receives:
  KI_cod_tyli              *lstype         --- type of list to be created,
                                           --- from range TYLI00

Returns:
  KI_tag_list              *list           --- new list
  KI_cod_error             *ifail          --- failure indicator


Description:
  An empty list entity of the given type is created.

  The type must be one of:
               TYLIIN   ---  integer
               TYLIRL   ---  real
               TYLITG   ---  tag