hi i was trying to solve it but

 

All i got is

type Matrix=[[Double]]

 

multMM :: Matrix -> Matrix -> Matrix --multiplies two matrices
multMM m t =    [[sum (zipWith (*) (head m)(a)) ] ]where  a = [head a | a<-  t]

 

 

from this i could get only the first multiplication 14    that is by  2*1 + 1*0 + -6*-2 = 14

 

how can i make this go throw all rows and colums to get multiple of matrixs?

 

Thank you~