Changeset 3 for palm/trunk/SOURCE/global_min_max.f90
- Timestamp:
- Feb 13, 2007 11:30:58 AM (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/global_min_max.f90
r1 r3 9 9 ! Former revisions: 10 10 ! ----------------- 11 ! $Log: global_min_max.f90,v $ 11 ! $Id$ 12 ! RCS Log replace by Id keyword, revision history cleaned up 13 ! 12 14 ! Revision 1.11 2003/04/16 12:56:58 raasch 13 15 ! Index values of the extrema are limited to the range 0..nx, 0..ny 14 !15 ! Revision 1.10 2003/03/16 09:39:21 raasch16 ! Two underscores (_) are placed in front of all define-strings17 !18 ! Revision 1.9 2003/03/14 13:42:50 raasch19 ! IF clause extracted from loop which determines the absolut array maximum,20 ! because otherwise it prevents vectorization of that loop21 !22 ! Revision 1.8 2002/12/19 14:51:03 raasch23 ! Speed optimization by removing MINVAL/MAXVAL calls and by handling24 ! the "abs" case in a different way than the min/max cases,25 ! translation of remaining variables26 !27 ! Revision 1.7 2002/06/11 13:08:16 raasch28 ! Last change limited to IBM since it does not work on 64-bit machines29 !30 ! Revision 1.6 2002/05/02 18:50:36 18:50:36 raasch (Siegfried Raasch)31 ! Type of fmax, fmax_l, fmin and fmin_l changed to REAL (KIND=4).32 !33 ! Revision 1.5 2001/01/22 06:51:02 raasch34 ! Module test_variables removed35 !36 ! Revision 1.4 2000/12/20 12:19:57 letzel37 ! All comments translated into English.38 !39 ! Revision 1.3 1998/07/06 12:14:37 raasch40 ! + USE test_variables41 !42 ! Revision 1.2 1997/08/11 06:16:54 raasch43 ! Indices des ermittelten Minumums/Maximums werden an PEs gesendet44 16 ! 45 17 ! Revision 1.1 1997/07/24 11:14:03 raasch
Note: See TracChangeset
for help on using the changeset viewer.