Wednesday, June 6, 2018

Light Rail as a Spectrum

LRT itself is a broad spectrum and ranges from single unit streetcars running in mixed traffic within city streets at speeds as slow as 25 mph [40 km/h] and even lower up through multiple car trains running on a totally exclusive guideway at speeds of 60 mph [100 km/h] or faster. The streetcar lines in New Orleans are representative of the lower end of this spectrum while the Metrolink system in St. Louis is a good example of the upper end. In much of Europe, these two extremes are often called “trams” and “metros.” In Germany, the terms “strassenbahn” (“street railway”) and “stadtbahn” (“city railway”) are commonly used.

It is important to note how, along any given light rail transit line, one might reasonably include guideway and track elements that are very much like a strassenbahn while a short distance away the route’s character might radically change into that of a stadtbahn. LRT is a continuum and, within the framework of the operating requirements of a given project, the LRT track designer can incorporate appropriate elements from each of the mode’s extreme characteristics plus just about anything in between.

Light rail lines are fairly distinct from metro rail systems (often called “heavy rail”). The latter are always entirely in exclusive rights-of-way, are usually designed to handle long trains of vehicles (6 to 10 cars per train is common) and have a relatively high absolute minimum operating speed along the revenue route (usually 45 mph [72 km/h] or higher). By contrast, LRT trains can operate in shared rights-of-way, very seldom exceed three cars per train, and speeds as low as 10 mph [16 km/h] are tolerated in revenue service track. These differences usually mean that LRT can be constructed at far lower cost than metro rail transit, although the passenger throughput capacity of the latter is also much higher.

If there is any one single characteristic that defines “light rail,” it is likely the ability of the vehicle to operate in mixed traffic in the street when necessary. This draws a line between the St. Louis example above and a light metro rail operation such as SEPTA’s Norristown high speed line. The operational characteristics of each route are virtually the same, but only the St. Louis vehicle could actually operate in the street if necessary. It is a very fine distinction, and, while purists may quibble with some of the finer points of this definition.

Several rail transit projects have utilized diesel-powered light railcars (also known as “diesel mechanical units” or “DMUs”), which do not meet FRA buff strength criteria. Except for the propulsion system, many of these vehicles and the guideways they run upon closely resemble the stadtbahn end of the LRT spectrum. The second edition of the Handbook will not attempt to cover all of the nuances of the DMU mode.

Throughout this volume, the words “railroad” and “railway” will appear. By “railroad” it mean standard gauge rail operations that are part of the general system of railroad transportation. This includes freight railroads and passenger railroads (such as Amtrak and the commuter rail operations in many cities). The word “railway,” on the other hand, is intended as a broader term that includes all transportation operations that utilize a vehicle guidance system based on the use of flanged steel wheels riding upon steel rails.

Properties of Water and Steam

VB 3.0 Properties of Water and Steam, developed 2004 to 2010, Version 1.1, 01/29/04: mistake in calculation of partial derivatives for thermal conductivity corrected

CONST rgaswater = 461.526 'gas constant in J/(kg K)
CONST tcwater = 647.096 'critical temperature in K
CONST pcwater = 220.64 'critical pressure in bar
CONST dcwater = 322# 'critical density in kg/m**3


start:
CLS
COLOR 2, 0
PRINT "Gross Plant Heat Rate and Net Plant Heat Rate"
PRINT "---------------------------------------------"

DIM m.dot
DIM genout
DIM delta.h
DIM eff
DIM aux.power

steam0:
INPUT "Steam Flow to Turbine (tph): "; m.dot
IF m.dot = 0 THEN
m.dot = 47.86945
LOCATE CSRLIN - 1: PRINT "Steam Flow to Turbine set to:"; m.dot; "tph"
END IF
IF m.dot < 0 THEN
LOCATE CSRLIN - 1: PRINT "Steam Flow to Turbine shall > 0, please input again"
PRINT
GOTO steam0
END IF
LOCATE CSRLIN - 1: PRINT "Steam Flow To Turbine set to:"; m.dot; "tph"

genout0:
INPUT "Generator Output (MW): "; genout
IF genout = 0 THEN
genout = 11.31
LOCATE CSRLIN - 1: PRINT "Generator Output set to: "; genout; "MW"
END IF
IF genout < 0 THEN
PRINT "genout shall > 0, please input again"
PRINT
GOTO genout0
END IF
LOCATE CSRLIN - 1: PRINT "Generator Output set to: "; genout; "MW"

inletTemperatureTurbine0:
INPUT "Temperature Inlet Turbine: (øC)"; TemperatureInletTurbine
IF TemperatureInletTurbine = 0 THEN
TemperatureInletTurbine = 470
LOCATE CSRLIN - 1: PRINT "Temperature Inlet Turbine set to: "; TemperatureInletTurbine; "øC"
END IF
IF TemperatureInletTurbine < 0 THEN
PRINT "Temperature Inlet Turbine shall > 0, please input again"
PRINT
GOTO inletTemperatureTurbine0
END IF
LOCATE CSRLIN - 1: PRINT "Temperature Inlet Turbine set to: "; TemperatureInletTurbine; "øC"

inletPressureTurbine0:
INPUT "Pressure Inlet Turbine: (bar)"; PressureInletTurbine
IF PressureInletTurbine = 0 THEN
PressureInletTurbine = 49
LOCATE CSRLIN - 1: PRINT "Pressure Inlet Turbine set to: "; PressureInletTurbine; "bar"
END IF
IF PressureInletTurbine < 0 THEN
PRINT "Pressure Inlet Turbine shall > 0, please input again"
PRINT
GOTO inletPressureTurbine0
END IF
LOCATE CSRLIN - 1: PRINT "Pressure Inlet Turbine set to: "; PressureInletTurbine; "bar"

inletTemperatureBoiler0:
INPUT "Temperature Inlet Boiler: (øC)"; TemperatureInletBoiler
IF TemperatureInletBoiler = 0 THEN
TemperatureInletBoiler = 150
LOCATE CSRLIN - 1: PRINT "Temperature Inlet Boiler set to: "; TemperatureInletBoiler; "øC"
END IF
IF TemperatureInletBoiler < 0 THEN
PRINT "Temperature Inlet Boiler shall > 0, please input again"
PRINT
GOTO inletTemperatureBoiler0
END IF
LOCATE CSRLIN - 1: PRINT "Temperature Inlet Boiler set to: "; TemperatureInletBoiler; "øC"

inletPressureBoiler0:
INPUT "Pressure Inlet Boiler: (bar)"; PressureInletBoiler
IF PressureInletBoiler = 0 THEN
PressureInletBoiler = 72
LOCATE CSRLIN - 1: PRINT "Pressure Inlet Boiler set to: "; PressureInletBoiler; "bar"
END IF
IF PressureInletBoiler < 0 THEN
PRINT "Pressure Inlet Boiler shall > 0, please input again"
PRINT
GOTO inletPressureBoiler0
END IF
LOCATE CSRLIN - 1: PRINT "Pressure Inlet Boiler set to: "; PressureInletBoiler; "bar"

delta0:
' INPUT "Delta H (kJ/kg): "; delta.h
' IF delta.h = 0 THEN
' delta.h = 2733
' LOCATE CSRLIN - 1: PRINT "Delta H set to: "; delta.h; "kJ/kg"
' END IF
' IF delta.h < 0 THEN
' PRINT "Delta H shall > 0, please input again"
' PRINT
' GOTO delta0
' END IF
' LOCATE CSRLIN - 1: PRINT "Delta H set to: "; delta.h; "kJ/kg"

hit = enthalpyW(TemperatureInletTurbine + 273.15, PressureInletTurbine)
hib = enthalpyW(TemperatureInletBoiler + 273.15, PressureInletBoiler)
delta.h = hit - hib

eff0:
INPUT "Efficiency Pipe(%): "; eff
IF eff = 0 THEN
eff = 99.5 '76.615
LOCATE CSRLIN - 1: PRINT "Efficiency Pipe set to: "; eff; "%"
END IF
IF eff < 0 THEN
PRINT "Efficiency Pipe shall > 0, please input again"
PRINT
GOTO eff0
END IF
LOCATE CSRLIN - 1: PRINT "Efficiency Pipe set to: "; eff; "%"

aux0:
INPUT "Auxiliary Power (%): "; aux.power
IF aux.power = 0 THEN
aux.power = 10.4832
LOCATE CSRLIN - 1: PRINT "Auxiliary Power set to: "; aux.power; "%"
END IF
IF aux.power < 0 THEN
PRINT "Auxiliary Power shall > 0, please input again"
PRINT
GOTO aux0
END IF
LOCATE CSRLIN - 1: PRINT "Auxiliary Power set to: "; aux.power; "%"

HHV0:
INPUT "HHV (kCal/kg): "; HHV
IF HHV = 0 THEN
HHV = 3909
LOCATE CSRLIN - 1: PRINT "HHV set to: "; HHV; "kCal/kg"
END IF
IF HHV < 0 THEN
PRINT "HHV shall > 0, please input again"
PRINT
GOTO HHV0
END IF
LOCATE CSRLIN - 1: PRINT "HHV set to: "; HHV; "kCal/kg"

eff1:
INPUT "Efficiency Boiler (%): "; eff1
IF eff1 = 0 THEN
eff1 = 77
LOCATE CSRLIN - 1: PRINT "Efficiency Boiler set to: "; eff1; "%"
END IF
IF eff1 < 0 THEN
PRINT "Efficiency Boiler shall > 0, please input again"
PRINT
GOTO eff1
END IF
LOCATE CSRLIN - 1: PRINT "Efficiency Boiler set to: "; eff1; "%"

qvap0:
INPUT "Pressure Outlet Turbine (bar): "; poutlet1
IF poutlet1 = 0 THEN
poutlet1 = .09
LOCATE CSRLIN - 1: PRINT "Pressure Outlet Turbine set to: "; poutlet1; "bar"
END IF
IF poutlet1 < 0 THEN
PRINT "Pressure Outlet Turbine shall > 0, please input again"
PRINT
GOTO qvap0
END IF
LOCATE CSRLIN - 1: PRINT "Pressure Outlet Turbine set to: "; poutlet1; "bar"

enthalpyOutletTurbine0:
INPUT "Enthalpy Outlet Turbine (kJ/kg): "; houtlet1
IF houtlet1 = 0 THEN
houtlet1 = 2384
LOCATE CSRLIN - 1: PRINT "Enthalpy Outlet Turbine set to: "; houtlet1; "kJ/kg"
END IF
IF poutlet1 < 0 THEN
PRINT "Enthalpy Outlet Turbine shall > 0, please input again"
PRINT
GOTO enthalpyOutletTurbine0
END IF
LOCATE CSRLIN - 1: PRINT "Enthalpy Outlet Turbine set to: "; houtlet1; "kJ/kg"