anchor.diff:    use crcoall
     use mod_units
     use mod_common
  +  use mod_settings
     use string_tools
   
     character(len=:), allocatable :: lnSplit(:)
  
positive.code: #ifdef HDF5
    call cdb_writeDB_HDF5
  #endif
    call cdb_writeFam
  
  ! ============================================================================ !
  !  Post-Processing DB
  
negative.code: 
    integer j, famUnit
  
    call f_requestUnit("coll_families_dump.dat", famUnit)
    call f_open(unit=famUnit,file="coll_families_dump.dat",formatted=.true.,mode="w",status="replace")
  
    write(famUnit,"(a16,2(1x,a13))") "# famName       ","nSig","nSigOrig"
    do j=1,cdb_nFam
  