Convert seconds to compound duration: Difference between revisions
Convert seconds to compound duration (view source)
Revision as of 14:39, 1 October 2016
, 7 years ago→{{header|AppleScript}}
(→{{header|AppleScript}}: Simpler closures, updated primitives) |
|||
Line 200:
-- angloDuration :: Int -> String
on angloDuration(intSeconds)
-- weekParts Int -> [Int]▼
script mf
▲ -- weekParts Int -> [Int]
on weekParts(intSeconds)
unitParts(intSeconds, [missing value, 7, 24, 60, 60])
Line 311 ⟶ 312:
end script
end if
end mReturn</lang>
|