subroutine genkir3d(param,out_geom, out_geom_block, &
trace_interp_real,trace_interp_complex, &
spat_interp_real, spat_interp_complex, &
map_amp, map_amp_pre, map_amp_post, &
oper_domain)
type(genkir3d_param_type), intent (in) :: param
type(seis3d_geom_type), optional, intent (in) :: out_geom,out_geom_block
external trace_interp_real,trace_interp_complex
external spat_interp_real,spat_interp_complex
external map_amp,map_amp_pre,map_amp_post
external oper_domain
optional trace_interp_real,trace_interp_complex
optional spat_interp_real,spat_interp_complex
optional map_amp,map_amp_pre,map_amp_post
optional oper_domain
| 3|c|Derived-type arguments | ||
|---|---|---|
| Name | Description | Remarks |
| param | Processing parameter structure | |
| out_geom | Geometry of whole output space | Spraying or |
| gathering | ||
| out_geom_block | Geometry of output space block | Spraying or |
| gathering |
| 2|c|External procedures | |
|---|---|
| Name | Description |
| trace_interp_real | Real-trace interpolation |
| trace_interp_complex | Complex-trace interpolation |
| spat_interp_real | Real spatial interpolation |
| spat_interp_complex | Complex spatial interpolation |
| map_amp | Operator transformation |
| map_amp_pre | Trace-to-trace transformation applied before map_amp |
| map_amp_post | Trace-to-trace transformation applied after map_amp |
| oper_domain | Operator domain |