summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/arabi-add/arabi-add.sty
blob: ac17d2344ae739aa3c8e5d25427a3d7547ff69ca (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%                         author:     Sidi Mohamed LAKHDAR
%%%%%%%%%%%%%%%%                         arabi-add package     version: 1.0
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{arabi-add}[2015/06/20 Standard LaTeX package]    
%
%       
\RequirePackage{atveryend}
\RequirePackage{ifthen}
\usepackage{xcolor}
\RequirePackage{hyperref}
\hypersetup{unicode=true}
\hypersetup{colorlinks=true,linkcolor=blue}
\RequirePackage{bookmark}
\bookmarksetup{color=blue}
\RequirePackage{datatool}
\DTLsetseparator{	}
\RequirePackage{amsthm}
%
%
\renewcommand{\newtheorem}[2]{
	\newcounter{#1}\setcounter{#1}{1}
	\expandafter\def\csname the#1\endcsname{\textLR{\arabic{#1}}}
	\newenvironment{#1}{\noindent\AR{\mateen #2} \csname the#1\endcsname. \normalsize\dimnah}{\stepcounter{#1}\par}
}
\newcommand{\partnam}{الجزء}
\newcommand{\linepart}[3]{
	~~\\~~\setlength{\parindent}{#2}\par
	\LRmbox{\hyperlink{\arabic{part}}{\AR{\fontlinepart\partnam\;\textLR{\thepart}\hspace{.5cm}#1}}}
	\hfill\hspace{.2cm}
	\LRmbox{\pageref*{\arabic{part}}}
	\hspace{#3}~~\noindent\par
}
\newcommand{\fontlinepart}{\mateen}
\newlength{\slinepart}\setlength{\slinepart}{3cm}
\newlength{\flinepart}\setlength{\flinepart}{0cm}
\newcommand{\linesec}[3]{
	~~\setlength{\parindent}{#2}\par
	\LRmbox{\hyperlink{\arabic{section}.\arabic{part}}{\AR{#1}\hspace{.5cm}\textLR{\thesection}}}
	\dotfill\hspace{.2cm}
	\LRmbox{\pageref*{\arabic{part}.\arabic{section}}}
	\hspace{#3}~~\noindent\par
}
\newcommand{\fontlinesec}{\mateen}
\newlength{\slinesec}\setlength{\slinesec}{0cm}
\newlength{\flinesec}\setlength{\flinesec}{1cm}
\newcommand{\linessec}[3]{
	\setlength{\parindent}{#2}\par
	\LRmbox{\hyperlink{\arabic{subsection}.\arabic{section}.\arabic{part}}{\AR{#1}\hspace{.5cm}						\textLR{\thesubsection}}}
	\dotfill\hspace{.2cm}
	\LRmbox{\pageref*{\arabic{part}.\arabic{section}.\arabic{subsection}}}
	\hspace{#3}~~\noindent\par
}
\newcommand{\fontlinessec}{\mohanad}
\newlength{\slinessec}\setlength{\slinessec}{1cm}
\newlength{\flinessec}\setlength{\flinessec}{2cm}
\newcommand{\linesssec}[3]{
	\setlength{\parindent}{#2}\par
	\LRmbox{\hyperlink{\arabic{subsubsection}.\arabic{subsection}.\arabic{section}.\arabic{part}}{\AR{#1}\hspace{.5cm}\textLR{\thesubsubsection}}}%
	\dotfill\hspace{.2cm}
	\LRmbox{\pageref*{\arabic{part}.\arabic{section}.\arabic{subsection}.\arabic{subsubsection}}}
	\hspace{#3}~~\noindent\par
}
\newcommand{\fontlinesssec}{\mohanad}
\newlength{\slinesssec}\setlength{\slinesssec}{0.5cm}
\newlength{\flinesssec}\setlength{\flinesssec}{3cm}
\newcommand{\titlepart}[4]{
	\setlength{\parindent}{0cm}\pdfbookmark[0]{\partnam\;\thepart: #1}{\arabic{part}}
	\par\addvspace{#3}\LARGE#2{
	\AR{\partnam\;\LRmbox{\thepart}}~~\\ \hypertarget{\arabic{part}}{}
	\LRmbox{\label{\arabic{part}}}#1 \nopagebreak[4]}
	\par\addvspace{#4}\normalsize
}
\newcommand{\fonttitlepart}{\textmateen}
\newlength{\btitlepart}\setlength{\btitlepart}{2cm}
\newlength{\atitlepart}\setlength{\atitlepart}{1cm}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\newcommand{\titlesec}[4]{\pdfbookmark[1]{\thesection - #1}{\arabic{section}\arabic{part}}
	\setlength{\parindent}{0cm}
	\par\addvspace{#3}\Large#2{
	\LRmbox{\thesection}\hspace{.6cm}\hypertarget{\arabic{section}.\arabic{part}}{}
	\LRmbox{\label{\arabic{part}.\arabic{section}}}#1 \nopagebreak[4]}
	\par\addvspace{#4}\normalsize
}
\newcommand{\fonttitlesec}{\textmateen}
\newlength{\btitlesec}\setlength{\btitlesec}{.6cm}
\newlength{\atitlesec}\setlength{\atitlesec}{.4cm}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\newcommand{\titlessec}[4]{\pdfbookmark[2]{\thesubsection - #1}{\arabic{subsection}\arabic{section}\arabic{part}}
	\setlength{\parindent}{0cm}
	\par\addvspace{#3}\large#2{
	\LRmbox{\thesubsection}\hspace{.6cm}
	\hypertarget{\arabic{subsection}.\arabic{section}.\arabic{part}}{}
	\LRmbox{\label{\arabic{part}.\arabic{section}.\arabic{subsection}}}#1 \nopagebreak[4]}
	\par\addvspace{#4}\normalsize
}
\newcommand{\fonttitlessec}{\textmateen}
\newlength{\btitlessec}\setlength{\btitlessec}{.5cm}
\newlength{\atitlessec}\setlength{\atitlessec}{.3cm}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\newcommand{\titlesssec}[4]{
	\pdfbookmark[3]{\thesubsubsection - #1}{\arabic{subsubsection}\arabic{subsection}\arabic{section}\arabic{part}}
	\setlength{\parindent}{0cm}
	\par\addvspace{#3}#2{
	\LRmbox{\thesubsubsection}\hspace{.6cm}
	\hypertarget{\arabic{subsubsection}.\arabic{subsection}.\arabic{section}.\arabic{part}}{}
	\LRmbox{\label{\arabic{part}.\arabic{section}.\arabic{subsection}.\arabic{subsubsection}}}#1 \nopagebreak[4]}
	\par\nopagebreak\addvspace{#4}\normalsize
}
\newcommand{\fonttitlesssec}{\textmohanad}
\newlength{\btitlesssec}\setlength{\btitlesssec}{.4cm}
\newlength{\atitlesssec}\setlength{\atitlesssec}{.2cm}
\AtBeginDocument{%
	\IfFileExists{\jobname-toc/filetocar.txt}{
	\renewcommand{\tableofcontents}{\noindent
		\textmateen{\Large الفهرس}~~\\ \normalsize
		\DTLloaddb{TocARR}{\jobname-toc/filetocar.txt}
		\setcounter{part}{0}\newcounter{ssss}
		\DTLforeach{TocARR}{\secAR=part}{
			\ifthenelse{\arabic{part}=0}{
				\DTLloaddb{TocARR.\arabic{part}}{\jobname-toc/filetocar-\arabic{part}.txt}
				\setcounter{section}{0}
				\DTLforeach{TocARR.\arabic{part}}{\secARR=section}{
					\ifthenelse{\arabic{section}=0}{
						\DTLloaddb{TocARR.\arabic{part}.\arabic{section}}
							{\jobname-toc/filetocar-\arabic{part}-\arabic{section}.txt}
						\setcounter{subsection}{0}
						\DTLforeach{TocARR.\arabic{part}.\arabic{section}}{\secARRR=subsection}{
							\ifthenelse{\arabic{subsection}=0}{
								\DTLloaddb{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}
									{\jobname-toc/filetocar-\arabic{part}-\arabic{section}-\arabic{subsection}.txt}
								\setcounter{subsubsection}{1}\setcounter{ssss}{1}
								\whiledo{\arabic{subsubsection}<\DTLrowcount{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}}{
									\stepcounter{ssss}
									\DTLgetvalue{\secARRRR}{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}{\arabic{ssss}}{1}
									\linesssec{\fontlinesssec\secARRRR}{\slinesssec}{\flinesssec}%
									\stepcounter{subsubsection}
								}\setcounter{subsubsection}{0}
								\stepcounter{subsection}
							}{
								\linessec{\fontlinessec\secARRR}{\slinessec}{\flinessec}%
								\DTLloaddb{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}
									{\jobname-toc/filetocar-\arabic{part}-\arabic{section}-\arabic{subsection}.txt}
								\setcounter{subsubsection}{1}\setcounter{ssss}{1}
								\whiledo{\arabic{subsubsection}<\DTLrowcount{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}}{
									\stepcounter{ssss}
									\DTLgetvalue{\secARRRR}{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}{\arabic{ssss}}{1}
									\linesssec{\fontlinesssec\secARRRR}{\slinesssec}{\flinesssec}%
									\stepcounter{subsubsection}
								}\setcounter{subsubsection}{0}
								\stepcounter{subsection}
							}\setcounter{subsection}{0}
						}\setcounter{subsubsection}{0}
						\stepcounter{section}
					}{
						\linesec{\fontlinesec\secARR}{\slinesec}{\flinesec}%
						\DTLloaddb{TocARR.\arabic{part}.\arabic{section}}
							{\jobname-toc/filetocar-\arabic{part}-\arabic{section}.txt}
						\setcounter{subsection}{0}
						\DTLforeach{TocARR.\arabic{part}.\arabic{section}}{\secARRR=subsection}{
							\ifthenelse{\arabic{subsection}=0}{
								\DTLloaddb{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}
									{\jobname-toc/filetocar-\arabic{part}-\arabic{section}-\arabic{subsection}.txt}
								\setcounter{subsubsection}{1}\setcounter{ssss}{1}
								\whiledo{\arabic{subsubsection}<\DTLrowcount{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}}{
									\stepcounter{ssss}
									\DTLgetvalue{\secARRRR}{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}{\arabic{ssss}}{1}
									\linesssec{\fontlinesssec\secARRRR}{\slinesssec}{\flinesssec}%
									\stepcounter{subsubsection}
								}\setcounter{subsubsection}{0}
								\stepcounter{subsection}
							}{
								\linessec{\fontlinessec\secARRR}{\slinessec}{\flinessec}%
								\DTLloaddb{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}
									{\jobname-toc/filetocar-\arabic{part}-\arabic{section}-\arabic{subsection}.txt}
								\setcounter{subsubsection}{1}\setcounter{ssss}{1}
								\whiledo{\arabic{subsubsection}<\DTLrowcount{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}}{
									\stepcounter{ssss}
									\DTLgetvalue{\secARRRR}{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}{\arabic{ssss}}{1}
									\linesssec{\fontlinesssec\secARRRR}{\slinesssec}{\flinesssec}%
									\stepcounter{subsubsection}
								}\setcounter{subsubsection}{0}
								\stepcounter{subsection}
							}
						}\setcounter{subsection}{0}
						\stepcounter{section}
					}
				}\setcounter{section}{0}
				\stepcounter{part}
			}{
				\linepart{\fontlinepart\secAR}{\slinepart}{\flinepart}%
				\DTLloaddb{TocARR.\arabic{part}}{\jobname-toc/filetocar-\arabic{part}.txt}
				\setcounter{section}{0}
				\DTLforeach{TocARR.\arabic{part}}{\secARR=section}{
					\ifthenelse{\arabic{section}=0}{
						\DTLloaddb{TocARR.\arabic{part}.\arabic{section}}
							{\jobname-toc/filetocar-\arabic{part}-\arabic{section}.txt}
						\setcounter{subsection}{0}
						\DTLforeach{TocARR.\arabic{part}.\arabic{section}}{\secARRR=subsection}{
							\ifthenelse{\arabic{subsection}=0}{
								\DTLloaddb{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}
									{\jobname-toc/filetocar-\arabic{part}-\arabic{section}-\arabic{subsection}.txt}
								\setcounter{subsubsection}{1}\setcounter{ssss}{1}
								\whiledo{\arabic{subsubsection}<\DTLrowcount{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}}{
									\stepcounter{ssss}
									\DTLgetvalue{\secARRRR}{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}{\arabic{ssss}}{1}
									\linesssec{\fontlinesssec\secARRRR}{\slinesssec}{\flinesssec}%
									\stepcounter{subsubsection}
								}\setcounter{subsubsection}{0}
								\stepcounter{subsection}
							}{
								\linessec{\fontlinessec\secARRR}{\slinessec}{\flinessec}%
								\DTLloaddb{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}
									{\jobname-toc/filetocar-\arabic{part}-\arabic{section}-\arabic{subsection}.txt}
								\setcounter{subsubsection}{1}\setcounter{ssss}{1}
								\whiledo{\arabic{subsubsection}<\DTLrowcount{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}}{
									\stepcounter{ssss}
									\DTLgetvalue{\secARRRR}{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}{\arabic{ssss}}{1}
									\linesssec{\fontlinesssec\secARRRR}{\slinesssec}{\flinesssec}%
									\stepcounter{subsubsection}
								}\setcounter{subsubsection}{0}
								\stepcounter{subsection}
							}
						}\setcounter{subsection}{0}
						\stepcounter{section}
					}{
						\linesec{\fontlinesec\secARR}{\slinesec}{\flinesec}%
						\DTLloaddb{TocARR.\arabic{part}.\arabic{section}}
							{\jobname-toc/filetocar-\arabic{part}-\arabic{section}.txt}
						\setcounter{subsection}{0}
						\DTLforeach{TocARR.\arabic{part}.\arabic{section}}{\secARRR=subsection}{
							\ifthenelse{\arabic{subsection}=0}{
								\DTLloaddb{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}
									{\jobname-toc/filetocar-\arabic{part}-\arabic{section}-\arabic{subsection}.txt}
								\setcounter{subsubsection}{1}\setcounter{ssss}{1}
								\whiledo{\arabic{subsubsection}<\DTLrowcount{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}}{
									\stepcounter{ssss}
									\DTLgetvalue{\secARRRR}{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}{\arabic{ssss}}{1}
									\linesssec{\fontlinesssec\secARRRR}{\slinesssec}{\flinesssec}%
									\stepcounter{subsubsection}
								}\setcounter{subsubsection}{0}
								\stepcounter{subsection}
							}{
								\linessec{\fontlinessec\secARRR}{\slinessec}{\flinessec}%
								\DTLloaddb{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}
									{\jobname-toc/filetocar-\arabic{part}-\arabic{section}-\arabic{subsection}.txt}
								\setcounter{subsubsection}{1}\setcounter{ssss}{1}
								\whiledo{\arabic{subsubsection}<\DTLrowcount{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}}{
									\stepcounter{ssss}
									\DTLgetvalue{\secARRRR}{TocARR.\arabic{part}.\arabic{section}.\arabic{subsection}}{\arabic{ssss}}{1}
									\linesssec{\fontlinesssec\secARRRR}{\slinesssec}{\flinesssec}%
									\stepcounter{subsubsection}
								}\setcounter{subsubsection}{0}
								\stepcounter{subsection}
							}
						}\setcounter{subsection}{0}
						\stepcounter{section}
					}
				}\setcounter{section}{0}
				\stepcounter{part}
			}
		}\setcounter{part}{0}
	}
	}{
	\renewcommand{\tableofcontents}{
		\noindent\textmateen{\Large الفهرس}~~\\ \normalsize
	}
	}
}
\DTLnewdb{TocAR}
\DTLnewrow{TocAR}
\DTLnewdbentry{TocAR}{part}{\DTLstringnull}
\renewcommand{\part}[1]{
	\refstepcounter{part}
	\setcounter{section}{0}
	\setcounter{subsection}{0}
	\setcounter{subsubsection}{0}
	\titlepart{#1}{\fonttitlepart}{\btitlepart}{\atitlepart}
	%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
	\DTLnewrow{TocAR}\DTLnewdbentry{TocAR}{part}{#1}
	%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
	\DTLnewdb{TocAR.\arabic{part}}
	\DTLnewrow{TocAR.\arabic{part}}
	\DTLnewdbentry{TocAR.\arabic{part}}{section}{\DTLstringnull}
	%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
	\DTLnewdb{TocAR.\arabic{part}.\arabic{section}}
	\DTLnewrow{TocAR.\arabic{part}.\arabic{section}}
	\DTLnewdbentry{TocAR.\arabic{part}.\arabic{section}}{subsection}{\DTLstringnull}
	%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
	\DTLnewdb{TocAR.\arabic{part}.\arabic{section}.\arabic{subsection}}
		\DTLnewrow{TocAR.\arabic{part}.\arabic{section}.\arabic{subsection}}
		\DTLnewdbentry{TocAR.\arabic{part}.\arabic{section}.\arabic{subsection}}{subsubsection}{\DTLstringnull}
%		%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
}
\renewcommand{\thepart}{\textLR{\Roman{part}}}
\DTLnewdb{TocAR.0}
\DTLnewrow{TocAR.0}
\DTLnewdbentry{TocAR.0}{section}{\DTLstringnull}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\setcounter{section}{0}
\renewcommand{\section}[1]{
	\refstepcounter{section}
	\setcounter{subsection}{0}
	\setcounter{subsubsection}{0}
	%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
	\titlesec{#1}{\fonttitlesec}{\btitlesec}{\atitlesec}
	%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
	\DTLnewrow{TocAR.\arabic{part}}
	\DTLnewdbentry{TocAR.\arabic{part}}{section}{#1}
	%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
	\DTLnewdb{TocAR.\arabic{part}.\arabic{section}}
	\DTLnewrow{TocAR.\arabic{part}.\arabic{section}}
	\DTLnewdbentry{TocAR.\arabic{part}.\arabic{section}}{subsection}{\DTLstringnull}
	%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
	\DTLnewdb{TocAR.\arabic{part}.\arabic{section}.\arabic{subsection}}
	\DTLnewrow{TocAR.\arabic{part}.\arabic{section}.\arabic{subsection}}
	\DTLnewdbentry{TocAR.\arabic{part}.\arabic{section}.\arabic{subsection}}{subsubsection}{\DTLstringnull}
	%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
	
}
\renewcommand{\thesection}{\textLR{\arabic{section}}}
\DTLnewdb{TocAR.0.0}
\DTLnewrow{TocAR.0.0}
\DTLnewdbentry{TocAR.0.0}{subsection}{\DTLstringnull}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\renewcommand{\subsection}[1]{
	\refstepcounter{subsection}
	\setcounter{subsubsection}{0}
	%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
	\titlessec{#1}{\fonttitlessec}{\btitlessec}{\atitlessec}
	%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
	\DTLnewrow{TocAR.\arabic{part}.\arabic{section}}
	\DTLnewdbentry{TocAR.\arabic{part}.\arabic{section}}{subsection}{#1}
	%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
	\DTLnewdb{TocAR.\arabic{part}.\arabic{section}.\arabic{subsection}}
	\DTLnewrow{TocAR.\arabic{part}.\arabic{section}.\arabic{subsection}}
	\DTLnewdbentry{TocAR.\arabic{part}.\arabic{section}.\arabic{subsection}}{subsubsection}{\DTLstringnull}
	%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
	\ifthenelse{\arabic{section}=0}{
		\PackageWarning{arabi-toc}{Package arabi-toc Warning: 
		the hierarchy of the article is wrong: 
		a subsection should be contained in a section ...}
	}{}
	%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
}
\renewcommand{\thesubsection}{\textLR{\arabic{subsection}}.\thesection}
\DTLnewdb{TocAR.0.0.0}
\DTLnewrow{TocAR.0.0.0}
\DTLnewdbentry{TocAR.0.0.0}{subsubsection}{\DTLstringnull}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\renewcommand{\subsubsection}[1]{
	\refstepcounter{subsubsection}
	%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
	\titlesssec{#1}{\fonttitlesssec}{\btitlesssec}{\atitlesssec}
	%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
	\DTLnewrow{TocAR.\arabic{part}.\arabic{section}.\arabic{subsection}}
	\DTLnewdbentry{TocAR.\arabic{part}.\arabic{section}.\arabic{subsection}}{subsubsection}{#1}
	%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
	\ifthenelse{\arabic{subsection}=0}{
		\PackageWarning{arabi-toc}{Package arabi-toc Warning: 
		the hierarchy of the article is wrong: 
		a subsubsection should be contained in a subsection ...}
	}{}
	%%%%%%%%%%%%%%%%%%%%%%%%%%%%%	
}
\renewcommand{\thesubsubsection}{\textLR{\arabic{subsubsection}}.\thesubsection}
\AtVeryEndDocument{%
	\begingroup
    \let\SavedOpenout\openout%
    \let\SavedWrite\write%
    \def\openout{\immediate\SavedOpenout}%
    \def\write{\immediate\SavedWrite}%
    \DTLsavedb{TocAR}{\jobname-toc/filetocar.txt}
    \newcounter{sect}\newcounter{sectt}\newcounter{secttt}
    \setcounter{sect}{0}
    \whiledo{\arabic{sect}<\DTLrowcount{TocAR}}{
    		\DTLsavedb{TocAR.\arabic{sect}}{\jobname-toc/filetocar-\arabic{sect}.txt}
    		\setcounter{sectt}{0}
    		\DTLforeach{TocAR.\arabic{sect}}{}{
    				\DTLsavedb{TocAR.\arabic{sect}.\arabic{sectt}}{
    					\jobname-toc/filetocar-\arabic{sect}-\arabic{sectt}.txt}
    				\setcounter{secttt}{0}
    				\DTLforeach{TocAR.\arabic{sect}.\arabic{sectt}}{}{
    					\DTLsavedb{TocAR.\arabic{sect}.\arabic{sectt}.\arabic{secttt}}{
    						\jobname-toc/filetocar-\arabic{sect}-\arabic{sectt}-\arabic{secttt}.txt}
    					\stepcounter{secttt}
    				}
    				\stepcounter{sectt}
    		}
    		\stepcounter{sect}
   }
	\endgroup
}
\endinput