program tw40844;

{$ifdef FPC}{$mode DELPHI}{$endif}

uses
  uw40844a
  ;

begin

end.