window title="Newton\'s Law of Cooling" onClose=onClose

#-----------------------------------------------------
grid 1 4 sticky=W
	label text=View: font=bold
	button text=Docs func=openFile action=demo_files/cooling_doc.txt
	button text="R Code" func=openFile action=demo/cooling.r
	button text=Window func=openFile action=demo_files/cooling_win.txt

#-----------------------------------------------------
label text="Simulation" font=bold fg=violetred1 sticky=SW
vector names="Tenv Tcup rho t0 t1" \
       labels="'room tempurature (Tenv)' \
               'initial cup tempurature (Tcup)' \
               'cooling constant (rho)' \
               'start time' \
               'end time'" \
       values="25 65 0.1 0 100" \
       func=runPlot vert=T

button func=runPlot text="Plot" width=15 bg="#89cf3d"
