Extracting values from lists in Netlogo