Problem Statement

Write a function or program which: This is detailed below (e.g., "2 hr, 59 sec").

Demonstrate that it passes the following three test-cases: Test CasesDetailsThe following five units should be used: However, only include quantities with non-zero values in the output (e.g., return "1 d" and not "0 wk, 1 d, 0 hr, 0 min, 0 sec"). Give larger units precedence over smaller ones as much as possible (e.g., return 2 min, 10 sec and not 1 min, 70 sec or 130 sec) Mimic the formatting shown in the test-cases (quantities sorted from largest unit to smallest and separated by comma+space; value and unit of each quantity separated by space).

Let's start with the solution:

fcn toWDHMS(sec){  //-->(wk,d,h,m,s)
   r,b:=List(),0;
   foreach u in (T(60,60,24,7)){
      sec,b=sec.divr(u);   // aka divmod
      r.append(b);
   }
   r.append(sec).reverse()
}

fcn toWDHMS(sec){  //-->(wk,d,h,m,s)
   T(60,60,24,7).reduce(fcn(n,u,r){ n,u=n.divr(u); r.append(u); n },
      sec,r:=List()):r.append(_).reverse();
}

units:=T(" wk"," d"," hr"," min"," sec");
foreach s in (T(7259,86400,6000000)){
   toWDHMS(s).zip(units).pump(List,fcn([(t,u)]){ t and String(t,u) or "" })
   .filter().concat(", ").println();
}