appxyhelpa0pluslengthxlengthyxyplusx0xplusxsysplusxylengthnil0lengthconsxyslengthyhelpaclyszsifgeclclyszsgex0truege0sxfalsegesxsygexyiftrueclyszsniliffalseclyszshelpbclgreateryszssmalleryszsgreateryszshelpcgelengthyslengthzsyszssmalleryszshelpcgelengthyslengthzszsyshelpctrueyszsyshelpcfalseyszszshelpbclconsyyszsconsyhelpasclyszsapp2helpa400plus2length1s1nil0cons2if5ge2true0false0helpb4greater2smaller2helpc3FULL./TRS/SchneiderKamp/trs/otto06.trs