Geant4
9.6.p02
Main Page
Related Pages
Modules
Namespaces
Classes
Files
File List
File Members
All
Classes
Namespaces
Files
Functions
Variables
Typedefs
Enumerations
Enumerator
Friends
Macros
Groups
Pages
geant4_9_6_p02
source
geometry
solids
BREPS
src
G4Sort.cc
Go to the documentation of this file.
1
//
2
// ********************************************************************
3
// * License and Disclaimer *
4
// * *
5
// * The Geant4 software is copyright of the Copyright Holders of *
6
// * the Geant4 Collaboration. It is provided under the terms and *
7
// * conditions of the Geant4 Software License, included in the file *
8
// * LICENSE and available at http://cern.ch/geant4/license . These *
9
// * include a list of copyright holders. *
10
// * *
11
// * Neither the authors of this software system, nor their employing *
12
// * institutes,nor the agencies providing financial support for this *
13
// * work make any representation or warranty, express or implied, *
14
// * regarding this software system or assume any liability for its *
15
// * use. Please see the license in the file LICENSE and URL above *
16
// * for the full disclaimer and the limitation of liability. *
17
// * *
18
// * This code implementation is the result of the scientific and *
19
// * technical work of the GEANT4 collaboration. *
20
// * By using, copying, modifying or distributing the software (or *
21
// * any work based on the software) you agree to acknowledge its *
22
// * use in resulting scientific publications, and indicate your *
23
// * acceptance of all terms of the Geant4 Software license. *
24
// ********************************************************************
25
//
26
//
27
// $Id$
28
//
29
// ----------------------------------------------------------------------
30
// GEANT 4 source file
31
//
32
// G4Sort.cc
33
//
34
// ----------------------------------------------------------------------
35
36
#include "
G4Sort.hh
"
37
38
39
void
sort_double
(
G4double
v
[],
G4int
left
,
G4int
right
)
40
{
41
// G4Sort elements in array from v[left] to v[right]
42
// used recursively
43
// algorithm comes from Kernighan and Ritchie, "The C Programming
44
// Language", second edition, p.87
45
46
G4int
i, last;
47
if
( left >= right )
// do nothing if array contains
48
return
;
// fewer than two elements
49
50
swap_double
( v, left, ( left + right ) / 2 );
// move part. elt.
51
last =
left
;
// to v[0]
52
53
for
( i = left+1; i <=
right
; i++ )
// partition
54
if
( v[i] < v[left] )
55
swap_double
( v, ++last, i );
56
57
swap_double
( v, left, last );
// restore partition element
58
59
sort_double
( v, left, last-1 );
60
sort_double
( v, last+1, right );
61
return
;
62
}
63
64
65
void
swap_double
(
G4double
v
[],
G4int
i,
G4int
j )
66
{
67
/* interchange elements i and j in an array */
68
G4double
temp;
69
temp = v[i];
70
v[i] = v[j];
71
v[j] = temp;
72
}
Generated on Sat May 25 2013 14:33:13 for Geant4 by
1.8.4