S6302007

value(łi)^slO LINĘ i natural(h)=0 lin* to

(-4.-0 5) TO (-3.98,-0.5) TO (-3.98.0)

natural(h)=0 lino (0.0)

naturalno lino to (0. -6 5) to (-10. -6.5) to close

friME 0 TO 60*3600 I ii linie dapandant) monitors {show progross)

for ts t by delt to 4*delt by 3800 to 80*3600 Contour(h) palnted

IPLOTS ( save resuit displaye)

for t=1 by delt to 4*delt by 12*3600 !o 60*3600 Contour(h) palnted

I ENO