begin
  string (6) s
  string (6) name sp
  real r
  realname rp
  integer i
  integername ip
  short integer si
  short integer name sip
  byte integer bi
  byte integer name bip
  sp == s
  rp == r
  ip == i
  sip == si
  bip == bi
endofprogram