#! /bin/sh

vrms=5.0
dxcdp=.008
trms=0.0
np=5

# conventional divergence correction
sudivcor <  data.seis trms=$trms vrms=$vrms > data.divcor

exit 0
