210 0 mhl,"S="d210,&unifor('9'v210^a),if v920:'ATHRS' or v920:'REF'then if p(v210^w) then | |v210^w else | |v210^z fi,| |v210^j,|, |v210^v,|--|v210^b,|--|v210^c,|--|v210^d, |--|v210^G,|--|v210^E,|--|v210^O,|--|v210^9,|, |v210^H fi,if v920:'ATHRA'then " "v210^D,if p(v210^g) then ", "v210^g else ", "v210^b fi,if s(v210^1,v210^f)<>''then' (',v210^1,if s(v210^1)<>''then"; "d210^f fi,v210^f,')'  fi,if p(v210^a)then |. |d210^Z fi,v210^z,| [|v210^:|]|,| : |v210^;,| : |v210^,,| : |v210^<,| (|v210^.|)|,|. |v210^2,|. |v210^5,|, |v210^+,"--"v210^k,"--"v210^M,"--"v210^6,"--"v210^Q,"--"v210^T,"--"v210^O,"--"v210^0,", "v210^J fi,if v920:'ATHRC'then ". "v210^b,if p(v210^d) or p(v210^f) or p(v210^e) then ' (',v210^d,if p(v210^d) and p(v210^f) then "; "v210^f  else v210^f fi,if p(v210^e) and (p(v210^f) or p(v210^d)) then "; "v210^e else v210^e fi,')' fi," ("v210^c")",if p(v210^a)then |. |d210^Z fi,v210^z,| [|v210^:|]|,| : |v210^;,| : |v210^,,| : |v210^<,| (|v210^.|)|,|. |v210^2,|. |v210^5,|, |v210^+,"--"v210^k,"--"v210^M,"--"v210^6,"--"v210^Q,"--"v210^T,"--"v210^O,"--"v210^0,", "v210^J fi 
210 0 mhl,if v920:'ATHRA'then "A="d210,&unifor('9'v210^a)," "v210^D,if p(v210^g) then ", "v210^g else ", "v210^b fi,if s(v210^1,v210^f)<>''then' (',v210^1,if s(v210^1)<>''then"; "d210^f fi,v210^f,')'  fi,if p(v210^a)then |. |d210^Z fi,v210^z,| [|v210^:|]|,| : |v210^;,| : |v210^,,| : |v210^<,| (|v210^.|)|,|. |v210^2,|. |v210^5,|, |v210^+,"--"v210^k,"--"v210^M,"--"v210^6,"--"v210^Q,"--"v210^T,"--"v210^O,"--"v210^0,", "v210^J fi
210 0 mhl,if v920:'ATHRC'then "M="d210,&unifor('9'v210^a),". "v210^b,if p(v210^d) or p(v210^f) or p(v210^e) then ' (',v210^d,if p(v210^d) and p(v210^f) then "; "v210^f  else v210^f fi,if p(v210^e) and (p(v210^f) or p(v210^d)) then "; "v210^e else v210^e fi,')' fi," ("v210^c")",if p(v210^a)then |. |d210^Z fi,v210^z,| [|v210^:|]|,| : |v210^;,| : |v210^,,| : |v210^<,| (|v210^.|)|,|. |v210^2,|. |v210^5,|, |v210^+,"--"v210^k,"--"v210^M,"--"v210^6,"--"v210^Q,"--"v210^T,"--"v210^O,"--"v210^0,", "v210^J fi 
210 0 mhl,if v920:'ATHRS' or v920:'REF'then "R="d210,&unifor('9'v210^a),if p(v210^w) then | |v210^w else | |v210^z fi,| |v210^j,|, |v210^v,|--|v210^b,|--|v210^c,|--|v210^d, |--|v210^G,|--|v210^E,|--|v210^O,|, |v210^H,|--|v210^9 fi
250 8 '/K=/',&unifor('9'v210^a)/v210^b/v210^c/v210^d/v210^g/v210^h/(v410^a/)/(v410^b/)/(v410^c/)/(v410^d/)/(v410^G/)/(v410^H)
410 0 mhl,(if v410^5:'0'then else |S=|d410,&unifor('9'v410^a),if v920:'ATHRS' or v920:'REF'then if p(v410^w) then | |v410^w else | |v410^z fi,| |v410^j,|, |v410^v,|--|v410^b,|--|v410^c,|--|v410^d, |--|v410^G,|--|v410^E,|--|v410^O,|--|v410^9,|, |v410^H fi,if v920:'ATHRA'then | |v410^D,if p(v410^g) then |, |v410^g else |, |v410^b fi,if s(v410^1,v410^f)<>''then' (',v410^1,if s(v410^1)<>''then|; |d410^f fi,v410^f,')'  fi,if p(v410^a)then |. |d410^Z fi,v410^z,| [|v410^:|]|,| : |v410^;,| : |v410^,,| : |v410^<,| (|v410^.|)|,|. |v410^2,|. |v410^5,|, |v410^+,|--|v410^k,|--|v410^M,|--|v410^6,|--|v410^Q,|--|v410^T,|--|v410^O,|--|v410^0,|, |v410^J fi,if v920:'ATHRC'then |. |v410^b,if p(v410^d) or p(v410^f) or p(v410^e) then ' (',v410^d,if p(v410^d) and p(v410^f) then |; |v410^f  else v410^f fi,if p(v410^e) and (p(v410^f) or p(v410^d)) then |; |v410^e else v410^e fi,')' fi,| (|v410^c|)|,if p(v410^a)then |. |d410^Z fi,v410^z,| [|v410^:|]|,| : |v410^;,| : |v410^,,| : |v410^<,| (|v410^.|)|,|. |v410^2,|. |v410^5,|, |v410^+,|--|v410^k,|--|v410^M,|--|v410^6,|--|v410^Q,|--|v410^T,|--|v410^O,|--|v410^0,|, |v410^J fi fi|%|d410/)
410 0 mhl,(if v410^5:'0'then else if v920:'ATHRA'then |A=|d410,&unifor('9'v410^a),| |v410^D,if p(v410^g) then |, |v410^g else |, |v410^b fi,if s(v410^1,v410^f)<>''then' (',v410^1,if s(v410^1)<>''then|; |d410^f fi,v410^f,')'  fi,if p(v410^a)then |. |d410^Z fi,v410^z,| [|v410^:|]|,| : |v410^;,| : |v410^,,| : |v410^<,| (|v410^.|)|,|. |v410^2,|. |v410^5,|, |v410^+,|--|v410^k,|--|v410^M,|--|v410^6,|--|v410^Q,|--|v410^T,|--|v410^O,|--|v410^0,|, |v410^J fi fi|%|d410/)
410 0 mhl,(if v410^5:'0'then else if v920:'ATHRC'then |M=|d410,&unifor('9'v410^a),|. |v410^b,if p(v410^d) or p(v410^f) or p(v410^e) then ' (',v410^d,if p(v410^d) and p(v410^f) then |; |v410^f  else v410^f fi,if p(v410^e) and (p(v410^f) or p(v410^d)) then |; |v410^e else v410^e fi,')' fi,| (|v410^c|)|,if p(v410^a)then |. |d410^Z fi,v410^z,| [|v410^:|]|,| : |v410^;,| : |v410^,,| : |v410^<,| (|v410^.|)|,|. |v410^2,|. |v410^5,|, |v410^+,|--|v410^k,|--|v410^M,|--|v410^6,|--|v410^Q,|--|v410^T,|--|v410^O,|--|v410^0,|, |v410^J fi fi|%|d410/)
410 0 mhl,(if v410^5:'0' then else if v920:'ATHRS' or v920:'REF'then |R=|d410,&unifor('9'v410^a),if p(v410^w) then | |v410^w else | |v410^z fi,| |v410^j,|, |v410^v,|--|v410^b,|--|v410^c,|--|v410^d, |--|v410^G,|--|v410^E,|--|v410^O,|, |v410^H,|--|v410^9 fi fi|%|d410/)
2101 0 if v920:'ATHRS' then "P="v210^a fi
2102 0 if v920:'ATHRS' then "P="v210^b fi
2103 0 if v920:'ATHRS' then "P="v210^c fi
2104 0 if v920:'ATHRS' then "P="v210^d fi
2105 0 if v920:'ATHRS' then "P="v210^G fi
2106 0 if v920:'ATHRS' then "P="v210^E fi
2107 0 if v920:'ATHRS' then "P="v210^O fi
2108 0 if v920:'ATHRS' then "P="v210^X fi
2109 0 if v920:'ATHRS' then "P="v210^Y fi
2110 0 if v920:'ATHRS' then "P="v210^Z fi
2111 0 if v920:'ATHRA'or v920:'ATHRC' then "P="v210^K fi
2112 0 if v920:'ATHRA'or v920:'ATHRC' then "P="v210^M fi
2113 0 if v920:'ATHRA'or v920:'ATHRC' then "P="v210^6 fi
2114 0 if v920:'ATHRA'or v920:'ATHRC' then "P="v210^Q fi
2105 0 if v920:'ATHRA'or v920:'ATHRC' then "P="v210^T fi
2116 0 if v920:'ATHRA'or v920:'ATHRC' then "HS="v210^J fi
2117 0 if v920:'ATHRA'or v920:'ATHRC' then "P="v210^O fi
2118 0 if v920:'ATHRS'then "HS="v210^H fi
1 0 "ID="v1
2 0 if (v510:'^3' and a(v510^a)) or (v710:'^3' and a(v710^a)) then 'W=NNN' fi
3 0 if v920:'ATHRS' then if p(v210^a)then '!',if v210:'^a' and v210^b='' and v210^G='' and v210^H='' and v210^9='' and v210^a*27=''then v210^a else v210^a.10, &unifor('+B'v210^a*10)fi,if v210^d='' and v210^b*10='' and v210^b<>''then v210^b else v210^b.1,&unifor("+B"v210^B*1) fi,if p(v210^c)then &unifor('+B'v210^c) fi,if p(v210^d) then &unifor('+B'v210^d)fi,if p(v210^G) then &unifor('+B'v210^G) fi,if p(v210^E) then &unifor('+B'v210^E) fi,if p(v210^o) then &unifor('+B'v210^O) fi,if p(v210^h) then &unifor('+B'v210^H) fi,if p(v210^9) then &unifor('+B'v210^9)fi fi fi
9 0 if v210:'^!'then 'I=Записи на редактирование' fi 
8 0 if v920:'ATHRS' then if p(v210)then '?',if v210:'^a' and v210^b='' and v210^G='' and v210^H='' and v210^9='' and v210^a*27=''then v210^a else v210^a.10, &unifor("+B"v210^a*10)fi,if v210^d='' and v210^b*10='' and v210^b<>''then v210^b else v210^b.1,&unifor("+B"v210^B*1) fi,&unifor("+B"v210^c),&unifor("+B"v210^d),&unifor("+B"v210^G),&unifor("+B"v210^E),&unifor("+B"v210^O),&unifor("+B"v210^H),&unifor("+B"v210^9)fi fi
8 0 if v920:'ATHRA' then if p(v210^a)then '!',if s(v210^a*23.1)<>''then &unifor('B'v210^a) else v210^a fi,if p(v210^g)then &unifor('B'v210^G) else v210^b fi,v210^1,v210^d,v210^f,&unifor("B"v210^K),&unifor("B"v210^M),&unifor("B"v210^6),&unifor("B"v210^Q),&unifor("B"v210^T),&unifor("B"v210^O),&unifor("B"v210^J),&unifor("B"v210^0),&unifor("B"v210^Z),&unifor("B"v210^5),&unifor("B"v210^+) fi fi
8 0 if v920:'ATHRC' then if s(v210^n,v210^c,v210^X,v210^a)<>'' and (not(v210:'^d')) and (not(v210:'^e')) and (not(v210:'^f')) then '!',v210^c,v210^X,if v210^a*6.1<>''then &unifor('B',v210^a) else v210^a fi,if v210^b*6.1<>''then &unifor('B'v210^b)else v210^b fi, else if s(v210^d,v210^f,v210^e)<>''then '!',v210^d,v210^f,v210^e,if v210^a*6.1<>''then &unifor('B'v210^a)else v210^a fi fi fi,&unifor("B"v210^K),&unifor("B"v210^M),&unifor("B"v210^6),&unifor("B"v210^Q),&unifor("B"v210^T),&unifor("B"v210^O),&unifor("B"v210^J),&unifor("B"v210^0),&unifor("B"v210^Z),&unifor("B"v210^5),&unifor("B"v210^+) fi