Assign Variables
Print HTML Header
Print Left Column
Print Links in Left Column
If Station 7 Print Assignment
else
Print PreInfo Subroutines
Decide whether to implement or retract improvement
If it isn't station 0, print link
Print Top Graph Title
# Display Top Graph and Info
if display is either Air Temp or Precip, Station 0
display existing plotted graph
else
print info to file in tmp
call fortran program for display info
(program prints two plots in tmp if Current Station has been improved)
If error from fortran program,
(Fortran program would print "Error: file not found: filename")
Call Error Response Subroutine
Else
CallGnuplot(/tmp/$$out, /tmp/$$outb)
CallPpmToGif($$top.gif)
Remove Files in tmp
Print Top Graph link
If top is Station 7 &CanImprovmementsBeMade
If bottom is Station 7 Print Assignment
else
Print PreInfo Subroutines
Decide whether to implement or retract improvement
If it isn't station 0, print link
# Display Bottom Graph and Info
if display is either Air Temp or Precip, Station 0
display existing plotted graph
else
print info to file in tmp
call fortran program for display info
If error from fortran program,
Call Error Response Subroutine
Else
CallGnuplot(/tmp/$$out, /tmp/$$outb)
CallPpmToGif($$bottom.gif)
Remove Files in tmp
If bottom is Station 7 &CanImprovmementsBeMade
Print HTML footer