Function calculateAudioDuration