دالة زيادة(قيمة: ص64) -> ص64 { أرجع قيمة + 4. }
دالة اختر() -> دالة(ص64) -> ص64 { أرجع زيادة. }
سجل حامل { استدعاء: دالة(ص64) -> ص64 }
دالة طبق(عمل: دالة(ص64) -> ص64, قيمة: ص64) -> ص64 { أرجع عمل(قيمة). }
دالة ابدأ_الرئيسية() -> ص64 {
    دع محفوظ: قائمة<دالة(ص64) -> ص64> = [اختر()].
    دع مغلف: نتيجة<دالة(ص64) -> ص64> = نجاح(محفوظ[0]).
    دع عنصر = حامل { استدعاء: مغلف::قيمة }.
    إذا عنصر::استدعاء لا يطابق زيادة { أرجع 1. }
    اطبع(نسق_ص64(طبق(عنصر::استدعاء, 38)) + "\n").
    أرجع 0.
}