MKL Link to Fortran

Program Mult
       
        real a(3,3)
        real b(3,3)
        real c(3,3)
        integer i, j
       
       
        Write(*,*)'Here'
        do 100 i = 1,3
            do 200 j = 1,3
                a(i,j) = i
                b(i,j) = j
                write(*,*)a(i,j),b(i,j)
200         end do
100     end do   

        call gemm(a, b, c, 'N','N',1,1)



    end Program

I have linked to the mkl library, I have tried several variations on the gemm routine and I have tried the samples.

Unresolved external symbol

I realize it is easy but at the moment it appears hard

JMN