Ignore:
File:
1 edited

Legend:

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

    r3 r1  
    11 SUBROUTINE init_slope
    22
    3 !------------------------------------------------------------------------------!
     3!-------------------------------------------------------------------------------!
    44! Actual revisions:
    55! -----------------
     
    88! Former revisions:
    99! -----------------
    10 ! $Id$
    11 ! RCS Log replace by Id keyword, revision history cleaned up
    12 !
     10! $Log: init_slope.f90,v $
    1311! Revision 1.5  2006/02/23 12:35:34  raasch
    1412! nanz_2dh renamed ngp_2dh
     13!
     14! Revision 1.4  2003/03/16 09:40:02  raasch
     15! Two underscores (_) are placed in front of all define-strings
     16!
     17! Revision 1.3  2001/03/30 07:33:59  raasch
     18! Translation of remaining German identifiers (variables, subroutines, etc.)
     19!
     20! Revision 1.2  2001/01/22 07:21:35  raasch
     21! Module test_variables removed
    1522!
    1623! Revision 1.1  2000/04/27 07:06:24  raasch
     
    2431! Remember: when a sloping surface is used, only one constant temperature
    2532!           gradient is allowed!
    26 !------------------------------------------------------------------------------!
     33!-------------------------------------------------------------------------------!
    2734
    2835    USE arrays_3d
Note: See TracChangeset for help on using the changeset viewer.