(define PI 3.141592653589793) (bind-val solar_mass double (* 4.0 PI PI)) (bind-val days_per_year double 365.24)