; RuleSet:(MX)UNL FR T GR
; User:Maryam Faal Hamedanchi (mfaalhh)
; Date:29.05.2014 at 05:05:05

; "UNL FR T GR"
; MX
(%x , @indef )  := (%x , -@indef , -DFN , +DFN =NDEF ) ;
(%x,@def):=(%x , -@def , -DFN , +DFN = DEF) ;
(%x,N,@proximal):=(NS(%x,-@proximal ;%y,[این],+LEX=D,+POS=DEM),+LEX=N);
cnt(%x,N;%y,R,PPR):=NA(%x;PC([در باره],LEX=P,POS=PRE;%y,-CAS,+CAS=OBL));
cnt(%x,N;%y,R,NPR,@all):=NA(%x;PC([در باره],LEX=P,POS=PRE;%y,-CAS,+CAS=OBL));
cnt(%x,N;%y,R):=NA(%x;PC([درباره],LEX=P,POS=PRE;%y,-CAS,+CAS=OBL));
(%x,N,@medial):=(NS(%x,-@medial ;%y,[آن],+LEX=D,+POS=DEM),+LEX=N);
(%x,N,@distal):=(NS(%x,-@distal ;%y,[آن],+LEX=D,+POS=DEM),+LEX=N);
(%x,N,@other):=(NS(%y,[دیگر],+LEX=D,+POS=DEM,DIS=AFT;%x,-@other,-DFN,+DFN=NDEF,-@pl),+LEX=N);
(%x , N , @same)  := (NS(%x , -@same ; %y , [همین] , +LEX = D , +POS = DEM ) , +LEX = N , %01 ) ;
(%x , N ,SNG, @certain)  := (NS(%y , [خاص] , +LEX = D , +POS = QUA ; %x , -@certain , -DFN , +DFN = NDEF ) , +LEX = N , %01 ) ;
(%x,@pl):=(%x,-@pl,-NUM,+NUM=PLR);
(%x , N , @dual )  := (NS(%x , -@dual ; %y , [یک جفت] , +LEX = D , +POS = QUA ) , +LEX = N , %01 ) ;
(%x , N ,CTB, @paucal )  := (NS(%x , -@paucal ; %y , [چند] , +LEX = D , +POS = QUA ) , +LEX = N , %01 ) ;
("چند",%d)(BLK)("کتاب",%n):=("چند تا",%d)( )(%n);
([این],%x)(BLK)("چند تا",%d)(BLK)("کتاب",%n):=(%x)( )("چندتا",%d)( )(%n);
(%x , N ,CTB, @extra,@multal )  := (NS(%x , -@extra,-@multal,-DFN ; %y , [تعداد بیشماری] , +LEX = D , +POS = QUA ) , +LEX = N , %01 ) ;
(%x , N , CTB ,^@extra, @multal )  := (NS(%x , -@multal,-DFN ; %y , [چندین] , +LEX = D , +POS = QUA ) , +LEX = N , %01 ) ;
(%x , N ,CTB, ^@extra,@multal )  := (NS(%x , -@multal,-DFN ; %y , [تعداد زیادی] , +LEX = D , +POS = QUA ) , +LEX = N , %01 ) ;
("کل")(BLK)("کتاب‌ها",DEF)({STAIL|CTAIL},%left):= (%01)(%02)("این",%03)(" ",%04)("کتاب‌ها",%05)(%left);
(%x , N , @not )  := (NS(%x , -@not ; %y , [نه] , +LEX = D , +POS = QUA ) , +LEX = N , %01 ) ;
(%x,N,@all,^@def):= (NS(%x , -@all,-NUM,+NUM=PLR ; %y , [کل] , +LEX = D, +POS = QUA ) , +LEX = N , %01 ) ;
(%x , N , @any )  := (NS(%x ,-@any,-DFN,+DFN=NDEF; %y,[هر],+LEX = D,+POS =QUA ), +LEX = N , %01 );
(%x , N , @each )  := (NS(%x ,-@each; %y,[هر],+LEX = D,+POS =QUA ), +LEX = N , %01 );
(%x , N , @entire )  := (NS(%x , -@entire ; %y , [تمام] , +LEX = D , +POS = QUA ) , +LEX = N , %01 ) ;
(%x , @generic )  := (%x , -@generic , -DFN , +DFN = GNR ) ;
(%x,N,@no):=(NS(%x,-@no,-DFN,+DFN=NDEF;%y,[هیچ],+LEX=D,+POS=QUA),+LEX=N);
(%x , N , @both)  := (NS(%x , -@both ; %y , [هر دو تا] , +LEX = D , +POS = QUA ) , +LEX = N , %01 ) ;
(%x , N , @more )  := (NS(%x , -@more , -NUM,+NUM=PLR,-DFN,+DFN= NDEF; %y , [بیشتری] , +LEX = D ,DIS=AFT, +POS = QUA ) , +LEX = N , %01 ) ;
(%x , N , @less )  := (NS(%x , -@less , -DFN , +DFN = NDEF ; %y , [کمتر] , +LEX = D , +DIS = BEF , +POS = QUA ) , +LEX = N , %01 ) ;
(%x , N , @most )  := (NS(%x , -@most ; %y , [بیشتر] , +LEX = D , +DIS = BEF , +POS = QUA ) , +LEX = N , %01 ) ;
(%x , N, @enough )  := (NS(%x , -@enough ; %y , [به تعداد لازم] , +LEX = D , +DIS = AFT , +POS = QUA ) , +LEX = N , %01 ) ;
(%x , N , @wh )  := (NS(%x , -@wh, -DFN , +DFN = NDEF ; %y , [چه] , +LEX = D , +DIS = BEF , +POS = DEM ) , +LEX = N , %01 ) ;
(%x , N,^CTB, @paucal )  := (NS(%x , -@paucal ; %y , [قدری] , +LEX = D , +POS = QUA ) , +LEX = N , %01 ) ;
(%x , N , ^CTB , @multal )  := (NS(%x , -@multal ; %y , [مقدار زیادی] , +LEX = D , +POS = QUA ) , +LEX = N , %01 ) ;
(%n , N , PLR)([خاص] , %certain )  := (%n)(%certain , [مشخصی]);
(D,%d)([کل],%all):=(%all)(%d);
mod(%x,N;%y,U,^AFT,@ordinal):=NA(%x;%y,-DIS,DIS=BEF);
mod(%x,N;%y,U,@ordinal):=NA(%x;%y);
pos(%x,N,@own;%y,D):=NS([خودم],%y;%x);
pos(%x,N;%y,D,POD):=NS(%y;%x);
("چند تا",%x)(BLK)([کتاب],%n)(BLK)([او],%y):=([برخی ],%x)( )("کتاب‌هایش",%n)( );
("کل")(BLK)("کتاب‌ها")(BLK)({POD|ADJ}):=("همه")( )("کتاب‌های")( )( );
("کل")(BLK)("نه")(BLK)("کتاب‌ها")(BLK)(POD):=("نه")( )("همه")( )("کتاب‌های")( )( );
("چندین")(BLK)("کتاب")(BLK)("او"):=("کتاب‌های")()("زیاد")()();
("کتابی")(BLK)("دیگر")(BLK)("من"):= ("کتاب")( )( )( )( );
cnt (%x , N,CTB ; %y , N,PPN, ^@against)  := NA(%x ; PC([درباره] , +LEX = P , +POS = PRE , %02%01 ; %y , -CAS , +CAS = OBL ) , %02 ) ;
cnt (%x , N,CTB ; %y , N,FEE, ^@against)  := NA(%x ; PC([درباره] , +LEX = P , +POS = PRE , %02%01 ; %y , -CAS , +CAS = OBL ) , %02 ) ;
(D,QUA,%d)(R,NPR,%r):=(%r);
plc(%x;%y,N,@top,@near):=XA(%x,-DFN,+DFN=NDEF;PC([بالای],LEX=P,POS=PRE;%y,-DFN,+DFN=NDEF,-CAS,+CAS=OBL));
plc(%x;%y,N,@among):=XA(%x,-DFN,+DFN=NDEF;PC([وسط],LEX=P,POS=PRE;%y,-DFN,-NUM,+NUM=PLR,-CAS,+CAS=OBL));
plc(%x;%y,N,^@top,^@bottom,@contact):=XA(%x,-DFN;PC([دم],LEX=P,POS=PRE;%y,-DFN,+DFN=NDEF,-CAS,+CAS=OBL));
plc(%x;%y,N,@back,^@far):=XA(%x,-DFN,+DFN=NDEF;PC([پشت],LEX=P,POS=PRE;%y,-DFN,+DFN=NDEF,-CAS,+CAS=OBL));
plc(%x;%y,N,@bottom,@near):=XA(%x,-DFN,+DFN=NDEF;PC([پائین],LEX=P,POS=PRE;%y,-DFN,+DFN=NDEF,-CAS,+CAS=OBL));
plc(%x;%y,N,@side):=XA(%x,-DFN,+DFN=NDEF;PC([پهلوی],LEX=P,POS=PRE;%y,-DFN,+DFN=NDEF,-CAS,+CAS=OBL));
plc(%x;%y,N, @between,^@top,^@contact):=XA(%x;PC([بین],LEX=P,POS=PRE,att=@between;%y,-DFN,-CAS,+CAS=OBL));
plc(%x;%y,N,@back,@far):=XA(%x,-DFN,+DFN=NDEF;PC([آن سوی],LEX=P,POS=PRE;%y,-DFN,+DFN=NDEF,-CAS,+CAS=OBL));
plc(%x;%y,N,@far):=XA(%x,-DFN,+DFN=NDEF;PC([دور از],LEX=P,POS=PRE;%y,-DFN,+DFN=NDEF,-CAS,+CAS=OBL));
plc(%x;%y,N,^@between,^LCT,^@top,^@among,^@contact,^@back,^@bottom,^@side,^@far,^@front,^@to,^@inside,^@near,^@opposite,^@outside,^@around,^@from,^@through,^@across):=XA(%x;PC([در],LEX=P,POS=PRE;%y,-DFN,+DFN=NDEF,-CAS,+CAS=OBL));
("کتاب",%n)([در],%p)(N,%x)(C,%and)(N,%y):=(%n)([بین],%p)(%x)(%and)(%y);
plc(%x;%y,N,@front):=XA(%x,-DFN,+DFN=NDEF;PC([جلوی],LEX=P,POS=PRE;%y,-DFN,+DFN=NDEF,-CAS,+CAS=OBL));
plc(%x;%y,N,@to,@inside):=XA(%x,-DFN,+DFN=NDEF;PC([داخل],LEX=P,POS=PRE;%y,-DFN,+DFN=NDEF,-CAS,+CAS=OBL));
plc(%x;%y,N,^@to,^@from,@inside):=XA(%x,-DFN,+DFN=NDEF;PC([توی],LEX=P,POS=PRE;%y,-DFN,+DFN=NDEF,-CAS,+CAS=OBL));
plc(%x;%y,N,@near):=XA(%x,-DFN,+DFN=NDEF;PC([نزدیک],LEX=P,POS=PRE;%y,-DFN,+DFN=NDEF,-CAS,+CAS=OBL));
plc(%x;%y,N,@top,@contact):=XA(%x;PC([روی],LEX=P,POS=PRE,att=@top,att=@contact;%y,-CAS,+CAS=OBL));
plc(%x;%y,N,@opposite):=XA(%x,-DFN, +DFN = NDEF;PC([مقابل],LEX=P,POS=PRE;%y,-DFN,+DFN=NDEF,-CAS,+CAS=OBL));
plc(%x;%y,N,@from,@inside):=XA(%x,-DFN, +DFN = NDEF;PC([از],LEX=P,POS=PRE;%y,-DFN,+DFN=NDEF,-CAS,+CAS=OBL));
plc(%x;%y,N,@outside):=XA(%x,-DFN, +DFN = NDEF;PC([بیرون],LEX=P,POS=PRE;%y,-DFN,+DFN=NDEF,-CAS,+CAS=OBL));
plc(%x;%y,N,@bottom,@contact):=XA(%x,-DFN, +DFN = NDEF;PC([زیر],LEX=P,POS=PRE;%y,-DFN,+DFN=NDEF,-CAS,+CAS=OBL));
plc(%x;%y,N,@around):=XA(%x;PC([در اطراف],LEX=P,POS=PRE;%y,-CAS,+CAS=OBL));
("کتاب‌های",%n)(BLK)("در اطراف",%p):=("کتاب هایی",%n)( )(%p);
plc(%x;%y,N,@from):=XA(%x,-DFN, +DFN = NDEF;PC([از سمت],LEX=P,POS=PRE;%y,-CAS,+CAS=OBL));
src(%x,N;%y,N):=NA(%x,-DFN,+DFN=NDEF;PC([از],LEX=P,POS=PRE;%y));
plc(%x,N;%y,N,^@through,^@across,^LCT):=NA(%x,-DFN,+DFN=NDEF;PC([به سمت],LEX=P,POS=PRE;%y));
gol(%x,N,^ACT;%y,N):=NA(%x,-DFN,+DFN=NDEF;PC([به مقصد],LEX=P,POS=PRE;%y));
plc(%x,N;%y,N,@through,^@across):=NA(%x,-DFN,+DFN=NDEF;PC([از طریق],LEX=P,POS=PRE;%y));
plc(%x,N;%y,N,@across):=NA(%x,-DFN,+DFN=NDEF;PC([از این سو به آن سوی],LEX=P,POS=PRE;%y));
via(%x,N;%y,N):=NA(%x,-DFN,+DFN=NDEF;PC([ازطریق],LEX=P,POS=PRE;%y));
mod(%x,N;%y,J,^@most):=NA(%x;%y,DIS=AFT);
qua(%x,N,^ANM;%y,N,^DIGIT):=NC(%y;%x,-DFN,+DFN=NDEF);
cnt (%x , N ; %y , N,@against)  := NA(%x , -DFN , +DFN = NDEF ; PC([علیه] , +LEX = P , +POS = PRE , %02%01 ; %y , -CAS , +CAS = OBL ) , %02 ) ;
fld (%x , N ; %y , N)  := NA(%x , -DFN , +DFN = NDEF ; PC([در] , +LEX = P , +POS = PRE , %02%01 ; %y , -CAS , +CAS = OBL ) , %02 ) ;
pof (%x , N,^GRO ; %y , N,^GRO)  := NA(%x , -DFN , +DFN = NDEF ; PC([از] , +LEX = P , +POS = PRE , %02%01 ; %y , -CAS , +CAS = OBL ) , %02 ) ;
mat(%x , N ; %y , N)  := NA(%x , -DFN , +DFN = NDEF ; PC([از جنس] , +LEX = P , +POS = PRE , %02%01 ; %y , -CAS , +CAS = OBL ) , %02 ) ;
tim(%x , N ; %y , N,^@after,^@before,^@from,^@to)  := NA(%x , -DFN , +DFN = NDEF ; PC([در] , +LEX = P , +POS = PRE , %02%01 ; %y , -CAS , +CAS = OBL ) , %02 ) ;
([در])([زمان قدیم]):= ([در])([گذشته]);
ben(%x , N ; %y , N)  := NA(%x , -DFN , +DFN = NDEF ; PC([برای] , +LEX = P , +POS = PRE , %02%01 ; %y , -CAS , +CAS = OBL ) , %02 ) ;
pos(%x,N;%y,N):=NS(%y;%x,-DFN);
pur(%x , N ; %y , N,ACT)  := NA(%x , -DFN , +DFN = NDEF ; PC([برای] , +LEX = P , +POS = PRE , %02%01 ; %y , -CAS , +CAS = OBL ) , %02 ) ;
nam(%x,N;%y,N):=NS(%y;%x,-DFN);
tim(%x , N ; %y , N,@after)  := NA(%x ; PC([بعد از] , +LEX = P , +POS = PRE , %02%01 ; %y , -CAS , +CAS = OBL ) , %02 ) ;
tim(%x , N ; %y , N,@before)  := NA(%x ; PC([قبل از] , +LEX = P , +POS = PRE , %02%01 ; %y , -CAS , +CAS = OBL ) , %02 ) ;
tim(%x , N ; %y , N,@from)  := NA(%x , -DFN ; PC( [از] , +LEX = P , +POS = PRE , %02%01 ; %y, 0>" به این طرف" , -CAS , +CAS = OBL ) , %02 ) ;
tim(%x , N ; %y , N,@to)  := NA(%x ; PC([تا] , +LEX = P , +POS = PRE , %02%01 ; %y , -CAS , +CAS = OBL ) , %02 ) ;
dur(%x , N ; %y , N)  := NA(%x ; PC([در طول] , +LEX = P , +POS = PRE , %02%01 ; %y , -CAS , +CAS = OBL ) , %02 ) ;
tmf(%x , N ; %y , N)  := NA(%x,-DFN,+DFN=NDEF ; PC([از] , +LEX = P , +POS = PRE , %02%01 ; %y , 0>" به بعد" , -CAS , +CAS = OBL ) , %02 ) ;
tmt(%x , N ; %y , N)  := NA(%x; PC([تا] , +LEX = P , +POS = PRE , %02%01 ; %y , -CAS , +CAS = OBL ) , %02 ) ;
([در],%01)([ظهر],%02):=([سر],%01)(%02);
agt(%x,N;%y,N):=NS(%y;%x,-NUM,+NUM=PLR);
agt(%x,N;%y,J):=NS(%y;%x);
cnt(%x,N;%y,N,^PPN,^R):=NS(%y;%x);
cnt(%x,N;%y,J):=NS(%y;%x);
exp(%x , N ; %y , N)  := NA(%x ; PC([برای] , +LEX = P , +POS = PRE , %02%01 ; %y , -CAS , +CAS = OBL ) , %02 ) ;
gol(%x,N,ACT;%y,N,LCT):=NA(%x;PC([از],LEX=P,POS=PRE;%y));
lpl(%x , N ; %y , N)  := NA(%x  ; PC([در] , +LEX = P , +POS = PRE , %02%01 ; %y , -DFN , +DFN = NDEF, -CAS , +CAS = OBL ) , %02 ) ;
mat(%x,N;%y,J):=NA(%x;%y);
obj(%x,N;%y,N,PPN):=NS(%y;%x);
obj(%x,N,ACT;%y,N):=NS(%y,NUM,+NUM=PLR;%x);
plc(%x,N;%y,N,LCT):=NA(%x;%y);
plc(%x,N;%y,J):=NA(%x;%y);
pof(%x,N,GRO;%y,N):=NS(%x,-DFN,+DFN=NDEF;%y);
([روز] , %01 ) (%02 , N , GRO )   :=  (%01, [یک روز] ) (%02 )  ;
pur(%x,N,^ACT;%y,N,^ACT):=NA(%x;%y);
(DIGIT,%x)("دلاری",%j):=(%x,"$"<0,-LEX,+LEX=%x);
qua(%x,N,ANM;%y,N):=NC(%y;%x,-NUM,+NUM=PLR);
per(%x,N;%y,DIGIT):=NA(%x;%y);
qua(%x,N;%y,DIGIT):=NS(%y;%x,-DFN,-NUM);
rsn(%x , N ; %y , N)  := NA(%x  ; PC([به علت] , +LEX = P , +POS = PRE , %02%01 ; %y , -CAS , +CAS = OBL ) , %02 ) ;
res(%x,N;%y,N):=NC(%x;%y,-DFN,+DFN=NDEF);
(%x,J,@plus):=(JS(%x,-@plus;%y,[بسیار],+LEX=A,+POS=SAV,+DIS=BEF),+LEX=J,+DIS=%x);
(%x,J,@minus):=(JS(%x,-@minus;%y,[نسبتا],+LEX=A,+POS=SAV,+DIS=BEF),+LEX=J,+DIS=%x);
(%x,J,@least):=(JS(%x, 0>"یی",-@least;%y,[با کمترین],+LEX=A,+POS=SAV,+DIS=BEF),+LEX=J,+DIS=%x);
(%x,J,@less):=(JS(%x,-@less;%y,[کمتر],+LEX=A,+POS=SAV,+DIS=BEF),+LEX=J,+DIS=%x);
(N,%n)("1",%d):=([یک],%d)(%n);
(N,%n)("2",%d):=([دو],%d)(%n);
(N,%n)("6",%d):=([شش],%d)(%n);
(%x,J,@not):=(%x ,"نا"<0,+LEX=J,-att,+att=not);
(%x,J,@enough):=(JS(%x,-@enough;%y,[به اندازه کافی],+LEX=A,+POS=SAV,+DIS=BEF),+LEX=J,+DIS=%x);
(%x,J,@extra):=(JS(%x,-@extra;%y,[بسیار بسیار],+LEX=A,+POS=SAV,+DIS=BEF),+LEX=J,+DIS=%x);
(%x,J,@more):=(%x ,0> "تر",+LEX=J,-att,+att=more);
(%x,J,@most):=(%x ,0> "ترین",+LEX=J,-att,+att=most,-DIS,+DIS=BEF);
(%x,J,@equal):=(%x ,0> "یی",+LEX=J,-att,+att=equal);
per (%x , J; %y , N)  := JA(%x,-@more ;PC([از],rel=per,-att,+att=@than , +LEX = P , +POS = PPS ;%y , -CAS , +CAS = OBL)) ;
per (%x , J; %y , N)  := JA(%x,-@less ;PC([از],rel=per,-att,+att=@than , +LEX = P , +POS = PPS ;%y , -CAS , +CAS = OBL)) ;
per (%x ,J ; %y , N)  := JA(PC([به],rel=per,-att,+att=@equal , +LEX = P , +POS = PPS;%x, 0> "یی",-@equal ) ;%y , -CAS , +CAS = OBL) ;
([کمتر],%a)(BLK)([زیبا],%j)(BLK)(P,%p):=([با زیبایی],%j)( )(%a)( )(%p);
per (%x ,J ; %y , N)  := JA(%x,-@most ;PC([نسبت به],rel=per , +LEX = P , +POS = PPS ;%y , -CAS , +CAS = OBL)) ;
per (%x ,J ; %y , N)  := JA(%x,-@least ;%y , -CAS , +CAS = OBL) ;
("زیبایی",%j)(BLK)(P,%p)(BLK):=("به",%x)(%02)(%j)(%04);
("زیباترین",%j)(BLK)([از],%p):=("زیباترین های",%j)(%02);
("با کمترین",%x)(BLK)("زیبایی",%y)(BLK)(P,%p):=("کمترین",%x)(%02)("زیبایی های",%y)(%04);
ben (%x , J ; %y , N )  := JA(%x; PC([به حال] , +LEX = P , +POS = PRE , %02%01 ; %y , -CAS , +CAS = OBL ) ,%02 ) ;
cnt(%x,J;%y,N):=JA(%x;%y);
gol(%x ,J ; %y , N)  := NA(%x  ; PC([به] , +LEX = P , +POS = PRE , %02%01 ; %y , -CAS , +CAS = OBL ) , %02 ) ;
pur(%x,J;%y,{N|}):=JA(%x;{%y|});
qua(%x,J;%y,A):=JS(%x;%y);
(N,%n)(BLK)(J,@most,%j):=(%j)( )(%n);
([زیبا])(J,%j):=([زیبای])(%j);
and(%x;%y):=((%x,+>BLK)([و],LEX=C,POS=CCJ,+>BLK)(%y,+>BLK),+LEX=%x);
or(%x;%y):=((%x,+>BLK)([یا],LEX=C,POS=CCJ,+>BLK)(%y,+>BLK),+LEX=%y);
([و],%c1)(%x)({[و]|COMMA},%c2):=([،],"،",+PUT=COMMA,+>BLK,$c3)(%x)(%c2);
([یا],%c1)(%x)({[یا]|COMMA},%c2):=([،],"،",+PUT=COMMA,+>BLK,$c3)(%x)(%c2);
(DIGIT,%d)(J,%j)(N,%n):=(%j)(%d)(%n);
(N,%x)([Le Petit Prince],%n):=(%x)(%n,["شازده کوچولو"]);
([تغییر],%n)(J,%j):=([تغییرات],%n)(%j);
([جدید],J,%01)(J,%02)(J,%03):=(%02)(%03)(%01);
man(%x,J;%y,A):=JS(%x;%y);
([ماشین],%n)(BLK)([فوق‌العاده],%a)(BLK):=(%n)( )([فوق العاده]) ( );
([ماشین],%n)(BLK)(J,%j)(BLK)([گران‌بها],%x)(BLK):=(%n)( )(%j)( )([گران قیمت],%x)( );
(N,%n)(BLK)([از],%p)(BLK)(N,%x)(BLK)([به مقصد],%r)(BLK)(N,%y):=(%n)( )([از مبدا],%p)( )(%x)( )(%r)( )(%y);
(N,%n)(BLK)([ازطریق],%p)(BLK)(N,%x)(BLK)(P,%r)(BLK)(N,%y)(BLK)(P,%c)(BLK)(N,%z):=(%n)( )(%r)( )(%y) ( )(P,%c)( )(N,%z)( )([از طریق],%p)( )(%x);
({C|PUT},%x)(BLK)("کتابی",%n):=(%x)( )("یک کتاب",%n);
([نسبتا],%a)(BLK)([گران‌بها],%j):=(%a)( )([گران],%j);
([زیبا],%j)(BLK)({C|PUT},%c)(BLK)(N,%y)(BLK)([گران‌بها],%x):=(%j)( )(%c)( )(%y)( )([گران قیمت],%x);
([زیبا],%j)(BLK)(C,%c)(BLK)([گران‌بها],%x):=(%j)( )(%c)( )([گران قیمت],%x);
([زیبا],%j)(PUT,%c)(BLK)([گران‌بها],%x):=(%j)(%c)( )([گران قیمت],%x);
([از سمت],%x)(BLK)([سوئیس],%y):=([از],%x)( )(%y);
(N,%x)(P,%p)(N,%y)(J,%j):=(%x)(%j)(%p)(%y);
(N,%x)(P,%p)(N,%y)(A,%a)(J,%j):=(%x)(%a)(%j)(%p)(%y);
([لیوان],%n)(BLK)([جدید],%y)(BLK)(J,%j):=(%n)( )(%j)( )([نو],%y);
([لیوان],%n)(BLK)(J,%y)(BLK)([جدید],%j)(BLK)(P,%p)(BLK):=(%n)( )([نو],%j)( )(%y)( )(%p)( );
(N,%x)(J,%01)(P,%02)(N,%y)(J,%03):=(%x)(%01)(%03)(%02)(%y);
(N,%n)(BLK)(J,%j)(BLK)([بدون عکس],%r):=(%n)( )(%j)( )([بی عکس],%r);
("گران‌بهاترین"):=("گران بهاترین");