Amplitude Extraction and Horizon Export
#!/bin/sh
project_directory=/hou/data/D_152_001/SU_Class/class_project
cd ${project_directory}
# use picks.su from load_picks
# use bhpstorehdr to save each amplitude extraction event
# don't need to save data, so send to bit bucket
bhpintegrate < seismic/picks.su mode=edge type=trough search=5 limit=5 | \
bhpstorehdr key=ep,cdp,d2 ofile=horizons/aa2.area.xyz | \
bhpstorehdr key=ep,cdp,f1 ofile=horizons/aa2.width.xyz | \
bhpstorehdr key=ep,cdp,f2 ofile=horizons/aa2.amp.xyz | \
bhpstorehdr key=ep,cdp,igc ofile=horizons/aa2.p1.xyz | \
bhpstorehdr key=ep,cdp,igi ofile=horizons/aa2.p2.xyz | \
bhpstorehdr key=ep,cdp,corr ofile=horizons/aa2.p3.xyz > /dev/null