编辑代码

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