RosettaCodeData/Task/Calendar---for-REAL-programmers/Phix/calendar---for-real-programmers-4.phix

procedure tt_stringA(sequence text, integer alias)
    tt_string(text,-2)
    tt[pcurr] = alias
end procedure
Data update 2024-03-06 22:25:12 -08:00			`procedure tt_stringA(sequence text, integer alias)`
			`tt_string(text,-2)`
			`tt[pcurr] = alias`
			`end procedure`