bleeck@4: % function  result = analyse_aim_profiles(ti_profile, fq_profile, peaks_tip, peaks_fqp, channel_center_fq)
bleeck@4: %
bleeck@4: %   To analyse the time interval and frequency profile of the auditory image
bleeck@4: %
bleeck@4: %   INPUT VALUES:
bleeck@4: %  
bleeck@4: %   RETURN VALUE:
bleeck@4: %
bleeck@4: % 
bleeck@4: % (c) 2011, University of Southampton
bleeck@4: % Maintained by Stefan Bleeck (bleeck@gmail.com)
bleeck@4: % download of current version is on the soundsoftware site: 
bleeck@4: % http://code.soundsoftware.ac.uk/projects/aimmat
bleeck@4: % documentation and everything is on http://www.acousticscale.org
bleeck@4: 
bleeck@4: function result = analyse_aim_profiles(ti_profile, fq_profile, peaks_tip, peaks_fqp, channel_center_fq )
bleeck@4: 
bleeck@4: 
bleeck@4: [fqp_result, fqp_fq] = analyse_frequency_profile(fq_profile, peaks_fqp);
bleeck@4: if fqp_result==1
bleeck@4:     [tip_result, dominant_ti] = analyse_timeinterval_profile(ti_profile, peaks_tip, fqp_result, fqp_fq); 
bleeck@4: else
bleeck@4:     [tip_result, dominant_ti] = analyse_timeinterval_profile(ti_profile, peaks_tip);
bleeck@4: end
bleeck@4: 
bleeck@4: % return results
bleeck@4: if fqp_fq==0
bleeck@4:     cfq = 0;
bleeck@4: else
bleeck@4:     cfq =  channel_center_fq(fqp_fq);
bleeck@4: end
bleeck@4: if dominant_ti==0
bleeck@4:     dti = 0;
bleeck@4: else
bleeck@4:     dti = 1/dominant_ti;
bleeck@4: end
bleeck@4: result.tip = tip_result;
bleeck@4: result.dti = dti;
bleeck@4: result.fqp = fqp_result;
bleeck@4: result.dfq = cfq;
bleeck@4: 
bleeck@4: 
bleeck@4: 
bleeck@4: %--------------- subfunction -----------------------