Sorting algorithms/Quicksort: Difference between revisions
Content added Content deleted
No edit summary |
(→version 1: corrected a state name, added comments, ordered the state names. -- ~~~~) |
||
Line 3,205:
do while $\==0; l=a.$; t=b.$; $=$-1
if t<2 then iterate
h=l+t-1
?=l+t%2
Line 3,219:
do j=j while j<=k & @.j<=p; end /*a tinie-tiny loop*/
do k=k by -1 while j <k & @.k>=p; end /*another tiny loop*/
if j>=k then leave
_=@.j; @.j=@.k; @.k=_
end /*forever*/
Line 3,225:
k=j-1; @.l=@.k; @.k=p
$=$+1
if j<=? then do;
else do;
end /*while $\==0*/
return
/*──────────────────────────────────GEN@ subroutine─────────────────────*/
gen@: @.=
@.1 =" Rivers that form part of a state's (USA) border " /*adj. later,*/
@.2 ='=' /*this value is expanded later. */
@.3 ="
@.4 ="
@.5 ="
@.6 ="
@.7 ="
@.8 ="
@.9 ="
@.10="
@.11="
@.12="
@.13="
@.14="
@.15="
@.16="
@.17="
@.18="
@.19="
@.20="
@.21="
@.22="
@.23="
@.24="
@.25="
@.26="
@.27="
@.28="
@.29="
@.30="
@.31="
@.32="
@.33="
@.34="
@.35="St.
@.36="
@.37="
@.38="
@.39="
@.40="
@.41="
@.42="
@.43="
@.44="
@.45="Rio Grande: New Mexico, Texas, Tamaulipas (Mexico), Nuevo Leon (Mexico), Coahuila De Zaragoza (Mexico), Chihuahua (Mexico)"▼
@.46="
@.47="
@.48="
@.49="
@.50="
@.51="
@.52="
@.53="
@.54="
@.55="
@.56="
▲@.
▲@.57="Bois de Sioux River: South Dakota, Minnesota, North Dakota"
@.58="
@.59="
@.60="
@.61="
@.62="Blackwater River:
@.63="Columbia River:
do highItem=1 while @.highItem\==''
maxL=max(maxL,length(@.highItem)) /* find the maximum width entry.*/
end /*highItem*/
highItem=highItem-1 /*adjust highItem slightly. */
Line 3,307:
show@: widthH=length(highItem) /*maximum width of any line. */
end
say copies('█',maxL+widthH+22)
return</lang>
'''output'''
Line 3,317:
element 1 before sort: ------------------------------------------------ Rivers that form part of a state's (USA) border -------------------------------------------------
element 2 before sort: ==================================================================================================================================================
element 3 before sort:
element 4 before sort:
element 5 before sort:
element 6 before sort:
element 7 before sort:
element 8 before sort:
element 9 before sort:
element 10 before sort:
element 11 before sort:
element 12 before sort:
element 13 before sort:
element 14 before sort:
element 15 before sort:
element 16 before sort:
element 17 before sort:
element 18 before sort:
element 19 before sort:
element 20 before sort:
element 21 before sort:
element 22 before sort:
element 23 before sort:
element 24 before sort:
element 25 before sort:
element 26 before sort:
element 27 before sort:
element 28 before sort:
element 29 before sort:
element 30 before sort:
element 31 before sort:
element 32 before sort:
element 33 before sort:
element 34 before sort:
element 35 before sort: St.
element 36 before sort:
element 37 before sort:
element 38 before sort:
element 39 before sort:
element 40 before sort:
element 41 before sort:
element 42 before sort:
element 43 before sort:
element 44 before sort:
element 45 before sort:
element 46 before sort:
element 47 before sort:
element 48 before sort:
element 49 before sort:
element 50 before sort:
element 51 before sort:
element 52 before sort:
element 53 before sort:
element 54 before sort:
element 55 before sort:
element 56 before sort:
element 57 before sort:
element 58 before sort:
element 59 before sort:
element 60 before sort:
element 61 before sort:
element 62 before sort: Blackwater River:
element 63 before sort: Columbia River:
██████████████████████████████████████████████████████████████████████████████████████████████████████████████████████████████████████████████████████████████████████████
element 1 after sort: ------------------------------------------------ Rivers that form part of a state's (USA) border -------------------------------------------------
element 2 after sort: ==================================================================================================================================================
element 3 after sort: Arkansas River:
element 4 after sort: Arthur Kill: New Jersey, New York (tidal strait)
element 5 after sort: Big Sandy River: Kentucky, West Virginia
element 6 after sort: Big Sioux River: Iowa, South Dakota
element 7 after sort: Blackwater River:
element 8 after sort: Bois de Sioux River:
element 9 after sort: Brule River: Michigan, Wisconsin
element 10 after sort: Byram River: Connecticut, New York
Line 3,392:
element 12 after sort: Chattahoochee River: Alabama, Georgia
element 13 after sort: Chattooga River: Georgia, South Carolina
element 14 after sort: Colorado River: Arizona,
element 15 after sort: Columbia River:
element 16 after sort: Connecticut River: New Hampshire, Vermont
element 17 after sort: Delaware River: Delaware, New
element 18 after sort: Des Moines River: Iowa, Missouri
element 19 after sort: Detroit River: Michigan, Ontario (Canada)
element 20 after sort: Great Miami River (mouth only):
element 21 after sort: Halls Stream: New Hampshire, Canada
element 22 after sort: Hudson River (lower part only): New Jersey, New York
element 23 after sort: Kill Van Kull: New Jersey, New York (tidal strait)
element 24 after sort: Menominee River: Michigan, Wisconsin
element 25 after sort: Mississippi River:
element 26 after sort: Missouri River:
element 27 after sort: Montreal River: Michigan (upper peninsula
element 28 after sort: Monument Creek: Maine, New Brunswick (Canda)
element 29 after sort: Niagara River: New York, Ontario (Canada)
element 30 after sort: Ohio River: Illinois, Indiana,
element 31 after sort: Palmer River: Massachusetts, Rhode Island
element 32 after sort: Pawcatuck River: Connecticut, Rhode Island
element 33 after sort: Pearl River:
element 34 after sort: Perdido River:
element 35 after sort: Pigeon River: Minnesota, Ontario (Canada)
element 36 after sort: Piscataqua River: Maine, New Hampshire
element 37 after sort: Pocomoke River: Maryland, Virginia
element 38 after sort: Poteau River: Arkansas, Oklahoma
element 39 after sort: Potomac River:
element 40 after sort: Poultney River:
element 41 after sort: Rainy River: Minnesota, Ontario (Canada)
element 42 after sort: Red River (Mississippi watershed):
element 43 after sort: Red River of the North: Minnesota, North Dakota
element 44 after sort: Rio Grande: New Mexico, Texas, Tamaulipas (Mexico), Nuevo Leon (Mexico), Coahuila De Zaragoza (Mexico), Chihuahua (Mexico)
element 45 after sort: Runnins River: Massachusetts, Rhode Island
element 46 after sort: Sabine River:
element 47 after sort: Salmon Falls River: New Hampshire, Maine
element 48 after sort: Savannah River: Georgia, South Carolina
element 49 after sort: Snake River: Idaho,
element 50 after sort: St. Clair River: Michigan, Ontario (Canada)
element 51 after sort: St. Croix River: Maine, New Brunswick (Canda)
Line 3,438:
element 58 after sort: St. Marys River: Florida, Georgia
element 59 after sort: St. Marys River: Michigan, Ontario (Canada)
element 60 after sort: Tennessee River:
element 61 after sort: Tug Fork River: Kentucky,
element 62 after sort: Tugaloo River: Georgia, South Carolina
element 63 after sort: Wabash River: Illinois, Indiana
| |||