Changeset 3fbbfbb for timer.F90

Timestamp:

06/16/10 08:25:47 (14 years ago)

Author:

Jan Meinke <j.meinke@…>

Branches:

master

Children:

5fef0d7

Parents:

9f146fa

Message:

Move to doxygen comments and smmp_p.

Doxygen comments in Fortran are !> ... !! ... !<. I'm planning move the API documentation from the
lyx file into the code. This should make it easier to get documentation for all the common block
variables as well.

Use import smmp_p to indicate the parallel version of the Python bindings.

File:

• timer.F90 (modified) (1 diff)

timer.F90

@@ -59 +59 @@
             ! Initialize timers
             allocate (timingData(initialTimerCount))
-            forall(i = 1:initialTimerCount)
+!            forall(i = 1:initialTimerCount)
+            do i = 1, initialTimerCount
                 timingData(i) = TimingStructure(0, -1.0, -1.0, -1.0, -1.0, 0.0, &
                         0.0, -1.0, -1.0)
-            end forall
+!            end forall
+            end do
         end subroutine init_timer