begin
  integername p,p2
  integer q, q2
    q = 1
    q = 1
    q = '*'
    q = '    '
    q = M'abcd'
    q = K'7777'
    q = B'0101010101'
    q = 123
    q = X'CAFE' + 1
    q = (400+24) + 242
    q = 123 & 12 + 234 ! 23 * 345 !! 34 - 45 - (5 // 2) << 2 >> 3 ^^ 2 ^^ 2
    q = 1
    q = '*'
    q = '    '
    q = M'abcd'
    q = K'7777'
    q = B'0101010101'
    q = 123
    q = X'CAFE' + 1
    q = (400+24) + 242
    q = 123 & 12 + 234 ! 23 * 345 !! 34 - 45 - (5 // 2) << 2 >> 3 ^^ 2 ^^ 2
    q = 1
    q = q2
    p == q
    p == p2
    p = 1
    p = q
endofprogram