Program sfrtmadcig | RTM and angle gather (ADCIG) extraction using poynting vector
[SYNOPSIS]
sfrtmadcig < vmodl.rsf velsmooth=vmods.rsf > rtmadcig.rsf vecx=vecx.rsf vecz=vecz.rsf amp=1.e3 fm= dt= nt= ns= ng= nb=20 na=30 kt=200 jsx= jsz=0 jgx=1 jgz=0 sxbeg= szbeg= gxbeg= gzbeg= csdgather=y
[COMMENTS]
SPML boundary condition combined with 4-th order finite difference,
effective boundary saving strategy used!

[PARAMETERS]
float   | amp | =1.e3 |   | 	maximum amplitude of ricker wavelet
bool    | csdgather | =y |  [y/n] | 	default, common shot-gather; if n, record at every point
float   | dt | = |   | 	time interval 
float   | fm | = |   | 	dominant freq of ricker 
int     | gxbeg | = |   | 	x-begining index of receivers, starting from 0 
int     | gzbeg | = |   | 	z-begining index of receivers, starting from 0 
int     | jgx | =1 |   | 	receiver x-axis jump interval 
int     | jgz | =0 |   | 	receiver z-axis jump interval 
int     | jsx | = |   | 	source x-axis  jump interval  
int     | jsz | =0 |   | 	source z-axis jump interval  
int     | kt | =200 |   | 	record poynting vector at kt 
int     | na | =30 |   | 	number of angles
int     | nb | =20 |   | 	thickness of split PML 
int     | ng | = |   | 	total receivers in each shot 
int     | ns | = |   | 	total shots 
int     | nt | = |   | 	total modeling time steps 
int     | sxbeg | = |   | 	x-begining index of sources, starting from 0 
int     | szbeg | = |   | 	z-begining index of sources, starting from 0 
file    | vecx | = |   | 	auxiliary output file name
file    | vecz | = |   | 	auxiliary output file name
file    | velsmooth | = |   | 	auxiliary input file name
[DIRECTORY]
user/pyang
