Определение размера массива в Fortran?

Я читаю количество строк и столбцов для матрицы «A» из файла «var_and_runs.txt», но он показывает ошибку компиляции — «неожиданный оператор объявления данных»

implicit none
integer i, var, runs
integer  rows, cols
open(unit = 30, file = 'var_and_runs.txt')
    read(30,*) cols,rows

INTEGER, DIMENSION(:, :), ALLOCATABLE :: A

ALLOCATE (A(rows, cols))

open (unit = 40, file = 'read_this.txt')

read(40,*) A
A = transpose(A)
do 80 i = 1,3             
print*, A(i,:)
80    continue
print*, A
end

Пожалуйста помоги!