contents

calc_sta_mb

Called by:  calc_netmag

Includes:   iscloc.h, bodymag_cor.h

External:
body_mag_min_dist , body_mag_max_dist , body_mag_min_per , body_mag_max_per set in read_config .

Input arguments:
Pointer to solution structure.
Pointer to phase structure.

Structure members updated:  bodymag in the phase structure.

Return:  0/1 for success/failure.

This function calculates a body wave magnitude for P phases recorded at a suitable distance with an amplitude at a suitable period.  The magnitude is calculated using a table of corrections included as bodymag_cor.h.