anchor.diff:  
   subroutine cdb_allocDB
   
  +  use parpro
     use mod_alloc
     use numerical_constants
   
  
positive.code: ! ================================================================================================ !
  subroutine cdb_readCollDB
  
    use crcoall
    use mod_units
    use mod_common
  
negative.code: 
  subroutine cdb_allocFam
  
    use parpro
    use mod_alloc
  
    call alloc(cdb_famName, cdb_fNameLen, cdb_nFam, " ",           "cdb_famName")
  