let type v = array of string var strings := new v[100] of "blank" var test : string := "test" in test := strings[r] end