! rm out.slst
at ptp out.slst

r
d p  37000
d a 1000
go

d a 100
go
d a 36777
go