cnt = 0
sum = 0
repeat with v in the globals
  if integerP(v) then
    cnt = cnt + 1
    sum = sum + v
  end if
end repeat
put cnt
put sum