C
C---This include file uses parameters from atom_com.fh, weight.fh and heavy.fh
C
      real XYZ_SAVE(3,MAXATOM,maxn_models)
      real U_ANISO_SAVE(6,MAXATOM,maxn_models)
      REAL SIGMA_ML_SAVE(MAXBIN+1),SCALE_ML_SAVE(MAXBIN+1,NMAXP1+1)
      REAL D_ML_SCALE_OVER_SAVE,D_ML_B_OVER_SAVE
      REAL D_ML_SCALE_BBULK_SAVE,D_ML_B_BBULK_SAVE
      REAL D_ML_SCALE_PART_SAVE(NMAXP1),D_ML_B_PART_SAVE(NMAXP1)
      REAL B_LS_OVER_SAVE,SCALE_LS_OVER_SAVE,B_LS_ANISO_SAVE(6)
      REAL B_LS_BULK_SAVE,SCALE_LS_BULK_SAVE
      REAL B_LS_PART_SAVE(NMAXPART),SCALE_LS_PART_SAVE(NMAXPART)
      REAL UOVER_SAVE
      COMMON /SAVE_PARAMS/B_LS_OVER_SAVE,SCALE_LS_OVER_SAVE,
     &        B_LS_BULK_SAVE,SCALE_LS_BULK_SAVE,
     &        B_LS_ANISO_SAVE,B_LS_PART_SAVE,SCALE_LS_PART_SAVE,
     &        SIGMA_ML_SAVE,SCALE_ML_SAVE,
     &        D_ML_SCALE_OVER_SAVE,D_ML_B_OVER_SAVE,
     &        D_ML_SCALE_BBULK_SAVE,D_ML_B_BBULK_SAVE,
     &        D_ML_SCALE_PART_SAVE,D_ML_B_PART_SAVE,
     &        XYZ_SAVE,U_ANISO_SAVE,UOVER_SAVE