Guide to programming using RSF
Next:
Fortran 90 program
Up:
Sava: RSF DEMO
Previous:
C program
C++ program
Declare input, output and auxiliary file cubes (of type
CUB
).
Declare, read and write RSF cube axes:
at
time axis,
ax
space axis,
az
depth axis.
Declare multi-dimensional
valarrays
for input, output and read data.
Declare multi-dimensional
valarrays
for temporary storage.
Initialize multidimensional
valarray
index counter (of type
VAI
).
Loop over time.
Compute Laplacian:
.
Inject source wavelet:
Scale by velocity:
Time step:
2012-07-19