OCTAVE cafwd3

This code uses the same formulation as in cainv3 (8.2.7). It can be run with data to compare to, or as a simple stand alone.

 Start an octave session then type
	cafwd3

FORWARD PROBLEM
Computes S-wave velocity dispersion and damping by manual input for 
C1=stiffness m^2/s^2 and C2=damping m^2/s

GUI, with or without data? (requires bvas.his and bamp.his if with data)
GUI, use mouse to pick range of frequencies, OK
Plot, use mouse to limit,
GUI, C1 and C2 estimate, OK
computes fit, then 
GUI, make changes to stiffness and damping for next forward calculation
iterate

The code also computes “Q” quality factor as a function of frequency.

Figure 45: CAFWD3: Example without data, program's second plot showing quality factor, Q, The program's first figure plot expresses damping in terms of decay ($1/m$ units) as in Figures 30, 31, and 33.
\includegraphics[scale=0.6]{Figure32.pdf}