process
local stream s variable initial {"apple", "orange"}
local integer i initial {number of s}
put #main-output 'The number of fruit elements is %d(i).'