#COMPILE EXE "s46_nested_udt.exe"
' Sample: Nested TYPE (struct in struct)
TYPE Point
    x AS LONG
    y AS LONG
END TYPE
TYPE Rect
    topLeft AS Point
    bottomRight AS Point
END TYPE
FUNCTION PBMAIN() AS LONG
    DIM r AS Rect
    r.topLeft.x = 0: r.topLeft.y = 10
    r.bottomRight.x = 20: r.bottomRight.y = 0
    PRINT "Rect: ("; r.topLeft.x; ","; r.topLeft.y; ")-(";
    PRINT r.bottomRight.x; ","; r.bottomRight.y; ")"
    FUNCTION = 0
END FUNCTION
