Sequential dot_product in OpenACC Fortran loop

Question

In a Fortran program, I have a large loop with several dot_product calls on small vectors generated within the loop:

program test
        implicit no