program main integer, dimension(10) :: I logical, dimension(7, -7) :: L character(1), dimension(100) :: C integer, dimension(-7, *) :: R end