# NOT RUN {
tdir = tempdir()
bed = read1segy(fn1 , Iendian = 1 , HEADONLY=FALSE, BIGLONG=FALSE)
haname = write1segy(bed , fn=paste(tdir,"jimmy.SEGY", sep='/') , BIGLONG=FALSE)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab