Convert seconds to compound duration: Difference between revisions
Content added Content deleted
(→{{header|AppleScript}}: Simpler closures, updated primitives) |
|||
Line 200: | Line 200: | ||
-- angloDuration :: Int -> String |
-- angloDuration :: Int -> String |
||
on angloDuration(intSeconds) |
on angloDuration(intSeconds) |
||
⚫ | |||
script mf |
script mf |
||
⚫ | |||
on weekParts(intSeconds) |
on weekParts(intSeconds) |
||
unitParts(intSeconds, [missing value, 7, 24, 60, 60]) |
unitParts(intSeconds, [missing value, 7, 24, 60, 60]) |
||
Line 311: | Line 312: | ||
end script |
end script |
||
end if |
end if |
||
end mReturn |
end mReturn</lang> |
||
</lang> |
|||