Broadcast array multiplication in Fortran 90/95

Question

I was wondering that would there be a better (succinct) way to code this in Fortran? I am trying to multiply each column of a(3, 3) by each value in b(3)<

Answer 1

The expression

a * SPREAD(b,1,3)

will produce the same result as your loop. I'll leave it to you and to others to judge whether this is more succinct or in any way better than the loop.