Changeset 1682 for palm/trunk/SOURCE/check_for_restart.f90

Timestamp:

Oct 7, 2015 11:56:08 PM (9 years ago)

Author:

knoop

Message:

Code annotations made doxygen readable

File:

• palm/trunk/SOURCE/check_for_restart.f90 (modified) (4 diffs)

palm/trunk/SOURCE/check_for_restart.f90

@@ -1 @@
- SUBROUTINE check_for_restart
-
+!> @file check_for_restart.f90
 !--------------------------------------------------------------------------------!
 ! This file is part of PALM.
@@ -20 +19 @@
 ! Current revisions:
 ! -----------------
-! 
+! Code annotations made doxygen readable 
 ! 
 ! Former revisions:
@@ -56 +55 @@
 ! Description:
 ! ------------
-! Set stop flag, if restart is neccessary because of expiring cpu-time or
-! if it is forced by user
+!> Set stop flag, if restart is neccessary because of expiring cpu-time or
+!> if it is forced by user
 !------------------------------------------------------------------------------!
+ SUBROUTINE check_for_restart
+ 
 
     USE control_parameters,                                                    &
@@ -72 +73 @@
 
 
-    LOGICAL :: terminate_run_l           !:
-    LOGICAL :: do_stop_now = .FALSE.     !:
-    LOGICAL :: do_restart_now = .FALSE.  !:
-
-    REAL(wp) ::  remaining_time !:
+    LOGICAL :: terminate_run_l           !<
+    LOGICAL :: do_stop_now = .FALSE.     !<
+    LOGICAL :: do_restart_now = .FALSE.  !<
+
+    REAL(wp) ::  remaining_time !<