anchor.diff:  
     end subroutine
   
  -  subroutine get_filter_data(nb, wave_eff, mag_vega, mag_sun)
  -
  -    !get info about the filters
  -    implicit none
  -    integer, intent(in) :: nb
  -    double precision, dimension(nb), intent(out) :: wave_eff,mag_vega,mag_sun
  -    wave_eff = filter_leff
  -    mag_vega = magvega
  -    mag_sun = magsun
  -
  -  end subroutine
  -
     subroutine get_timefull(n_age,timefull)
   
       ! Get the actual time steps of the SSPs.
  
positive.code: 
    end subroutine
  
  
    subroutine write_isoc(outfile)
  
  
negative.code:     timefull = time_full
  
    end subroutine
  
    subroutine get_ntfull(n_age)
  
  