changes in cmbdata.F90
changes to cmbdata.F90