Changeset 800 for palm/trunk/SOURCE/wang_kernel.f90

Timestamp:

Dec 21, 2011 6:13:51 PM (13 years ago)

Author:

franke

Message:

last commit documented

File:

• palm/trunk/SOURCE/wang_kernel.f90 (modified) (1 diff)

palm/trunk/SOURCE/wang_kernel.f90

@@ -4 +4 @@
 ! Current revisions:
 ! -----------------
-! speed optimizations and formatting
-! Bugfix: iq=1 is not allowed (routine effic) 
-! Bugfix: replaced stop by ec=0.0 in case of very small ec (routine effic)  
+!
 !
 ! Former revisions:
 ! -----------------
 ! $Id$
+!
+! 799 2011-12-21 17:48:03Z franke
+! speed optimizations and formatting
+! Bugfix: iq=1 is not allowed (routine effic) 
+! Bugfix: replaced stop by ec=0.0 in case of very small ec (routine effic) 
 !
 ! 790 2011-11-29 03:11:20Z raasch