Verify operation of Dot and Dyadic
Nodes of different colours represent the following:
Solid arrows point from a procedure to one which it calls. Dashed arrows point from an interface to procedures which implement that interface. This could include the module procedures in a generic interface or the implementation in a submodule of an interface in a parent module.
subroutine testDot
!! Verify operation of Dot and Dyadic
real(wp),dimension(3)::u,v
real(wp),dimension(3,3)::D
real(wp)::r
u = [1.0_wp,2.0_wp,0.0_wp]
v = [0.0_wp,2.0_wp,3.0_wp]
r = u.o.v
D = u.d.v
end subroutine testDot