عملیات لیست

دستورالعمل‌ها

عملیات پایه‌ای لیست را پیاده‌سازی کنید.

در زبان‌های تابعی، عملیات لیست مانند length، map و reduce بسیار رایج‌اند. مجموعه‌ای از عملیات پایه‌ای لیست را بدون استفاده از توابع موجود پیاده‌سازی کنید.

تعداد و نام دقیق عملیاتی که باید پیاده‌سازی شوند بسته به track است تا با نام‌های موجود تداخل نکنند، اما عملیات کلی که پیاده‌سازی می‌کنید عبارت‌اند از:

• append (با گرفتن دو لیست، همه‌ی عناصر لیست دوم را به انتهای لیست اول اضافه می‌کند)؛
• concatenate (با گرفتن چندین لیست، همه‌ی عناصر همه‌ی لیست‌ها را در یک لیست مسطح ترکیب می‌کند)؛
• filter (با گرفتن یک «محمول» و یک لیست، لیست همه‌ی عناصری را برمی‌گرداند که predicate(item) برایشان «درست» است)؛
• length (با گرفتن یک لیست، تعداد کل عناصر آن را برمی‌گرداند)؛
• map (با گرفتن یک تابع و یک لیست، لیست نتایج اعمال function(item) روی همه‌ی عناصر را برمی‌گرداند)؛
• foldl (با گرفتن یک تابع، یک لیست و «انباشتگر» اولیه، هر عنصر را از سمت چپ در انباشتگر تا می‌کند (کاهش می‌دهد))؛
• foldr (با گرفتن یک تابع، یک لیست و «انباشتگر» اولیه، هر عنصر را از سمت راست در انباشتگر تا می‌کند (کاهش می‌دهد))؛
• reverse (با گرفتن یک لیست، لیستی برمی‌گرداند که همه‌ی عناصر اصلی را دارد، اما با ترتیب معکوس).

توجه کنید که ترتیبی که آرگومان‌ها به توابع تا (foldl، foldr) داده می‌شوند اهمیت دارد.

دستور apply در Tcl

ممکن است موارد آزمون گیج‌کننده به نظر برسند. انتظار می‌رود این را پیاده‌سازی کنید:

set myList {alpha beta gamma delta}
listOps::filter $myList {{word} {expr {[string length $word] == 4}}

چرا آن آخرین آرگومان این‌قدر آکولاد دارد؟

به یاد بیاورید که دستور proc این‌گونه تعریف می‌شود:

proc procName argList body

Tcl یک دستور apply دارد:

apply func ?arg1 arg2 ...?

این «func» یک فهرست دو عضوی {argList body} است که در اصل یک proc بی‌نام (یا «lambda») به شمار می‌رود. دستور apply آن proc بی‌نام را فراخوانی می‌کند و آرگومان‌های موردنیازش را به آن می‌فرستد.

برای نمونه، این‌ها معادل هم هستند:

# using proc
proc myReverse {str} {return [string reverse $str]}
puts [myReverse "Hello, World!"]

# using apply
puts [apply {{str} {string reverse $str}} "Hello, World!"]

# or, store the func in a variable
set func {{str} {string reverse $str}}
puts [apply $func "Hello, World!"]

استفاده از apply جابه‌جایی بلوک‌های کد را ساده‌تر می‌کند.

مرجع: apply، proc.