compidn←{                   ⍝ Component timestamp in IDN format.
    base←days 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