wolffd@0: function out = s_to_hhmmss(in)
wolffd@0: %input: time in s (integer)
wolffd@0: %output: string in hhmmss format
wolffd@0: 
wolffd@0: hours = div(in,3600);
wolffd@0: mins = div(mod(in,3600),60);
wolffd@0: secs = mod(in,60);
wolffd@0: 
wolffd@0: out = strcat(tostr(hours),tostr(mins),tostr(secs));
wolffd@0: 
wolffd@0: 
wolffd@0: function u=tostr(v)
wolffd@0: if(v<10)
wolffd@0:     u=sprintf('0%d',v);
wolffd@0: else
wolffd@0:      u=sprintf('%d',v);
wolffd@0: end
wolffd@0: 
wolffd@0: function u=div(v,w)
wolffd@0: u=(floor(v/w));