%include "I:FS.INC"

%begin
   %integer i
      i = fcomm(']' << 8, "7")
%end %of %program
