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

Timestamp:

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

Author:

knoop

Message:

Code annotations made doxygen readable

File:

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

palm/trunk/SOURCE/prandtl_fluxes.f90

@@ -1 @@
- SUBROUTINE prandtl_fluxes
-
+!> @file prandtl_fluxes.f90
 !--------------------------------------------------------------------------------!
 ! This file is part of PALM.
@@ -20 +19 @@
 ! Current revisions:
 ! -----------------
-! 
+! Code annotations made doxygen readable 
 ! 
 ! Former revisions:
@@ -77 +76 @@
 ! Description:
 ! ------------
-! Diagnostic computation of vertical fluxes in the Prandtl layer from the
-! values of the variables at grid point k=1
+!> Diagnostic computation of vertical fluxes in the Prandtl layer from the
+!> values of the variables at grid point k=1
 !------------------------------------------------------------------------------!
+ SUBROUTINE prandtl_fluxes
+ 
 
     USE arrays_3d,                                                             &
@@ -100 +101 @@
     IMPLICIT NONE
 
-    INTEGER(iwp) ::  i            !:
-    INTEGER(iwp) ::  j            !:
-    INTEGER(iwp) ::  k            !:
-
-    LOGICAL      ::  coupled_run  !:
-
-    REAL(wp)     ::  a            !:
-    REAL(wp)     ::  b            !:
-    REAL(wp)     ::  e_q          !:
-    REAL(wp)     ::  rifm         !:
-    REAL(wp)     ::  uv_total     !:
-    REAL(wp)     ::  z_p          !:
+    INTEGER(iwp) ::  i            !<
+    INTEGER(iwp) ::  j            !<
+    INTEGER(iwp) ::  k            !<
+
+    LOGICAL      ::  coupled_run  !<
+
+    REAL(wp)     ::  a            !<
+    REAL(wp)     ::  b            !<
+    REAL(wp)     ::  e_q          !<
+    REAL(wp)     ::  rifm         !<
+    REAL(wp)     ::  uv_total     !<
+    REAL(wp)     ::  z_p          !<
 
 !