گونه‌های تازه و عملگرها

گونه شناسه = صحیح

گونه متر: صحیح
    روال +(دیگر: متر): متر:
        برگشت ((این برگردان صحیح) + (دیگر برگردان صحیح)) برگردان متر
    پایان
    روال کیلومتر(): اعشار۶۴:
        برگشت (این برگردان اعشار۶۴) / ۱۰۰۰.۰
    پایان
پایان

روال ریشه:
    ش := ۴۲ برگردان شناسه
    سرچاپ ش + ۱
    راه := ۱۲۰۰ برگردان متر
    سرچاپ (راه + راه).کیلومتر()
پایان

ساختار بردار:
    همگانی ایکس: صحیح = ۰
    همگانی وای: صحیح = ۰
    همگانی روال +(دیگر: بردار): بردار:
        برگشت بردار { ایکس = این.ایکس + دیگر.ایکس، وای = این.وای + دیگر.وای }
    پایان
    همگانی روال ==(دیگر: بردار): منطقی:
        برگشت این.ایکس == دیگر.ایکس و این.وای == دیگر.وای
    پایان
پایان

روال ریشه:
    الف := بردار { ایکس = ۱، وای = ۲ }
    ب := بردار { ایکس = ۳، وای = ۴ }
    سرچاپ الف + ب
    سرچاپ الف == ب، (الف + ب) == بردار { ایکس = ۴، وای = ۶ }
پایان

روال شرح(م: گوناگون<صحیح، رشته>): رشته:
    برگشت همخوان م:
        صحیح ع => "عدد " + ع
        رشته ر => "متن " + ر
    پایان
پایان

روال ریشه:
    ناپایا مقدار := ۲۱ برگردان گوناگون<صحیح، رشته>
    سرچاپ شرح(مقدار)
    مقدار = "خاموش"
    سرچاپ شرح(مقدار)
پایان