
'============
'MULTI-ASSIGN
'============

'ON AN ARRAY OG COMPUND TYPES

type LabelledPoint single x,y,z, string s

dim as LabelledPoint v[100]

v[2]<=
0,1,2,"point A",
0,3,4,"point B",
1,1,2,"point C",
1,3,4,"point D"

print v[3].x tab v[3].y tab v[3].z  tab v[3].s
