Commit 0653261b authored by Bjarne Buchmann's avatar Bjarne Buchmann
Browse files

Updated timing for m3d UEx/VEx

parent 1179ea98
...@@ -508,7 +508,9 @@ ...@@ -508,7 +508,9 @@
end if end if
#endif #endif
call tic(TIM_INTEGR3D)
UEx=_ZERO_ ; VEx=_ZERO_ UEx=_ZERO_ ; VEx=_ZERO_
call toc(TIM_INTEGR3D)
#ifndef NO_BAROTROPIC #ifndef NO_BAROTROPIC
if (kmax .gt. 1) then if (kmax .gt. 1) then
#ifndef NO_BOTTFRIC #ifndef NO_BOTTFRIC
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment