\n""" % (l,d,w))
else: # virtual entries for cave systems
dplong.write("""
%s
""" % find_name(cave))
dplong.write("""
%.1f
%.1f
%.1f
\n""" % (l,d,w))
def parse_csvfile():
caveslist = []
print "Calculating SMK-system extent... ",
os.popen("cavern dataset/loser/smk-system -o noinfo/smk-system.3d")
l,d,w = map(float, chomp(os.popen("cavestats noinfo/smk-system -c ").read()).split("\t"))
caveslist.append(["", l,d,w, {"Name" : "Schwarzmooskogelhöhlensystem", "Autogen file" : ""}])
print "done\nParsing CSV file"
cavetabfile = file("noinfo/CAVETAB2.CSV")
fieldnames=chomp(cavetabfile.next()).replace('"','').split(",")
cavetab = csv.DictReader(cavetabfile, fieldnames)
# Gratuitiously complicated progress bar widget.
k = 0
m = 1
L = 437 #L = len(cavetabfile.readlines()) doesn't work
print "0"+50*"-"+"100%\n|",
for cave in cavetab:
if((50*m)/L > k):
sys.stdout.write("=")
sys.stdout.flush()
k = k + 1
m = m + 1
if(cave["Multiple entrances"] not in ["", "yes"]): continue
number = find_effective_number(cave)
if((cave["Area"]=="1626") and (number not in ['LA11', 'LA12'])): continue
prefix = dataset_prefix(number.lower())
stats = os.popen("cavestats noinfo/all -cs " + prefix).read()
if(stats.find("No") != -1):
continue # don't trust the rather erratic data in the table
#if(cave["Length"]): print number, "length:", cave["Length"]
#if(cave["Depth"]): print number, "depth:", cave["Depth"]
#if(cave["Extent"]): print number, "extent:", cave["Extent"]
else:
try:
l,d,w = map(float, chomp(stats).split("\t"))
caveslist.append([number,l,d,w,cave])
except:
print "Error on", number
raise
print "|\nWriting output file"
return caveslist
# Main routine:
caveslist = parse_csvfile()
dplong = file("dplong.htm", "w")
dplong.write("""
CUCC's deepest and longest caves
Lengths and depths of caves in the 1623 area
This page lists the lengths, depths and horizontal extents of those caves on
the plateau for which we have survey centerline data. At present, that's only
%d out of 250 or so, but the missing ones are mostly very small and obscure;
the notable exceptions are some caves explored by other groups (35, LA25,
BS17), and CUCC caves 71, 76, 92, 96 and 97. Of the latter 76 (by far the most
significant of these) is in the process of being re-explored, and the figures
in the table are for the portions revisited so far.
The eight main constitutent parts of the Schwarzmooskogel master system (40,
41, 78, 88, 115, 116, 136, 144 and 161) are listed separately in the table,
although in some cases there is some ambiguity as to where to draw the lines;
but for comparison I have also included the measurements of the whole system.
In these tables "length" means the total length of survey legs, not just the
horizontal components, but "extent" is the maximum horizontal distance between
any two survey stations. (If anyone knows a good algorithm for finding the
maximum 3D spatial diameter of a set of points, and is willing to implement it,
please do so!)
""" % len(caveslist))
for cave in caveslist:
print_caveline(*cave)
dplong.write("""
The plateau's %d deepest caves
Kat. Nr.
Name
Length (m)
Depth (m)
Extent (m)
""" % N)
caveslist.sort(lambda u, v: cmp(v[2],u[2]))
for cave in caveslist[:N]:
print_caveline(*cave)
dplong.write("""
The plateau's %d longest caves
Kat. Nr.
Name
Length (m)
Depth (m)
Extent (m)
""" % N)
caveslist.sort(lambda u, v: cmp(v[1],u[1]))
for cave in caveslist[:N]:
print_caveline(*cave)
dplong.write("""
This page used to house a list of the deepest and longest caves in Austria,
with ours highlighted. Rather than maintaining our own independent database, it
seems much more sensible to link to the much more frequently updated list here maintained by Theo
Pfarr. For comparison, Bob Gulden of the American NSS maintains a list here of the world's longest
caves.