Ignore:
File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/sor.f90

    r1 r3  
    88! Former revisions:
    99! -----------------
    10 ! $Log: sor.f90,v $
     10! $Id$
     11! RCS Log replace by Id keyword, revision history cleaned up
     12!
    1113! Revision 1.9  2005/03/26 21:02:23  raasch
    1214! Implementation of non-cyclic (Neumann) horizontal boundary conditions,
    1315! dx2,dy2 replaced by ddx2,ddy2
    14 !
    15 ! Revision 1.8  2001/03/30 07:52:44  raasch
    16 ! Arrays f1-f3 changed from dummy arguments to allocatable arrays,
    17 ! Translation of remaining German identifiers (variables, subroutines, etc.)
    18 !
    19 ! Revision 1.7  2001/01/30 21:41:25  letzel
    20 ! All comments translated into English.
    21 !
    22 ! Revision 1.6  2001/01/22 08:06:14  raasch
    23 ! Module test_variables removed
    24 !
    25 ! Revision 1.5  1998/07/06 12:33:13  raasch
    26 ! + USE test_variables
    27 !
    28 ! Revision 1.4  1997/09/12 06:30:12  raasch
    29 ! Randbedingungen umbenannt
    30 !
    31 ! Revision 1.3  1997/09/09 08:30:44  raasch
    32 ! Kehrwerte der Gitterweiten implementiert
    33 !
    34 ! Revision 1.2  1997/08/29 09:00:58  raasch
    35 ! omega --> omega_sor
    3616!
    3717! Revision 1.1  1997/08/11 06:25:56  raasch
     
    4222! ------------
    4323! Solve the Poisson-equation with the SOR-Red/Black-scheme.
    44 !-------------------------------------------------------------------------------!
     24!------------------------------------------------------------------------------!
    4525
    4626    USE grid_variables
Note: See TracChangeset for help on using the changeset viewer.