# Test data processing scenarios
$filter_positive = (arr, result, i, count) -> {
    count = 0
    for (i in arr) {
        if (arr[i] > 0) {
            result[++count] = arr[i]
        }
    }
    return result
};

$sum_array = (arr, sum, i) -> {
    sum = 0
    for (i in arr) {
        sum += arr[i]
    }
    return sum
};

$average_array = (arr, sum, count, i) -> {
    sum = 0
    count = 0
    for (i in arr) {
        sum += arr[i]
        count++
    }
    return count > 0 ? sum / count : 0
};

$find_max = (arr, max, i, first) -> {
    first = 1
    for (i in arr) {
        if (first || arr[i] > max) {
            max = arr[i]
            first = 0
        }
    }
    return max
};

$format_data = (name, age, city) -> {
    return "Name: " name ", Age: " age ", City: " city
};

# Test data processing
BEGIN {
    print "=== Testing Data Processing ==="
    
    # Test array operations
    data[1] = 10
    data[2] = -5
    data[3] = 20
    data[4] = -3
    data[5] = 15
    
    print "Original data:", data[1], data[2], data[3], data[4], data[5]
    
    # Test filtering
    positive_nums = filter_positive(data)
    print "Positive numbers:", positive_nums[1], positive_nums[2], positive_nums[3]
    
    # Test sum and average
    total = sum_array(data)
    avg = average_array(data)
    print "Sum:", total
    print "Average:", avg
    
    # Test finding maximum
    max_val = find_max(data)
    print "Maximum:", max_val
    
    # Test data formatting
    formatted = format_data("Alice", 30, "New York")
    print "Formatted:", formatted
}