Changeset 3 for palm/trunk/SOURCE/poisfft.f90

Timestamp:

Feb 13, 2007 11:30:58 AM (17 years ago)

Author:

raasch

Message:

RCS Log replace by Id keyword, revision history cleaned up

File:

• palm/trunk/SOURCE/poisfft.f90 (modified) (3 diffs)

palm/trunk/SOURCE/poisfft.f90

@@ -8 +8 @@
 ! Former revisions:
 ! -----------------
-! $Log: poisfft.f90,v $
+! $Id$
+! RCS Log replace by Id keyword, revision history cleaned up
+!
 ! Revision 1.24  2006/08/04 15:00:24  raasch
 ! Default setting of the thread number tn in case of not using OpenMP
@@ -15 +17 @@
 ! Additional compiler directive in routine tridia_1dd for preventing loop
 ! exchange on NEC-SX6
-!
-! Revision 1.22  2005/05/18 15:53:00  raasch
-! Missing argument in ffty
-!
-! Revision 1.21  2005/03/26 20:51:59  raasch
-! Use of module indices removed from routine split_1dd since it caused errors
-! in case of nx /= ny
 !
 ! Revision 1.20  2004/04/30 12:38:09  raasch
@@ -30 +25 @@
 ! is now a 1d-array, variables passed by modules instead of using parameter
 ! lists, enlarged transposition arrays introduced
-!
-! Revision 1.19  2003/04/16 13:11:16  raasch
-! Internal fft method calls substituted by calls of fft_x_1dd and fft_y_1dd
-!
-! Revision 1.18  2003/03/16 09:44:45  raasch
-! Two underscores (_) are placed in front of all define-strings
-!
-! Revision 1.17  2003/03/12 16:36:34  raasch
-! System specific version for NEC included (equivalent to CRAY scilib
-! calls, but different subroutine names; the CRAY names are replaced with
-! NEC names by cpp), size of array work1 is expanded because NEC routines
-! need more memory
-!
-! Revision 1.15  2002/06/11 13:14:31  raasch
-! System specific version for IBM included (parallel case only)
-!
-! Revision 1.13  2001/01/25 22:19:18  letzel
-! All comments translated into English.
-!
-! Revision 1.12  2001/01/23 01:53:04  raasch
-! Total revision of parallel and non-paralle fft-routines. Additional
-! implementation of the singleton algorithm.
-!
-! Revision 1.9  1998/07/27 08:12:56  schroeter
-! Berechnung von l in maketri geschieht nun ausserhalb
-! der k-Schleife, da unabhaengig von k, dadurch
-! Rechenzeitersparnis
-!
-! Revision 1.8  1998/07/24 07:52:09  schroeter
-! Anpassung des Druckloesealgorithmusses an Vorgehensweise
-! von Schmidt, Schumann und Volkert
-! (DFVLR-Mitteilung 84-15, S. 20-26)
 !
 ! Revision 1.1  1997/07/24 11:24:14  raasch