text: c include data for file wtbh.h
  c contains info to weight contributions of geotech boreholes
  c radii  = radius (km) of tori for weighting profiles
           data (radii(i),i=1,nrad)/0.,0.05,2.,5./
           data (radwt(i),i=1,nrad)/0.,0.,0.67,0.33/
  