sioseis << eof
procs diskin weight geom gather diskoa prout end
diskin
ipath test.line.1 end
end
prout
fno 0 lno 999999 ftr 1 ltr 1 end
end
weight
fno 0 lno 99999 twp 4 0 21 0 22 0 23 0 24 0 30
0 31 0 34 0 48 0 end
end
gather
end
end
geom
rpadd 1000
gxp 1 -265 48 -1440 dfls 58 dbrps 12.5 end
end
diskoa
opath rps.line.1 end
end
end
eof