compidn←{                   ⍝ Component timestamp in IDN format.
    basedays 1970 1 1      ⍝ component file epoch.
    stamp←⍬⍴2↓⎕FRDCI ⍺ ⍵    ⍝ 60th of a second since epoch.
    base+stamp÷×/1 3/24 60  ⍝ (fractional) day number.
}
code_colours

test script

Back to: notes

Back to: Workspaces