API tools faq
paste
Advertisement
Guest User

Macro tracing for \color{blue!60!white}

a guest
Nov 12th, 2016
149
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Latex 20.66 KB | None | 0 0
raw download clone embed print report
  1. \color ->\protect \color  
  2.  
  3. \color  ->\@ifnextchar [\@undeclaredcolor \@declaredcolor
  4.  
  5. \@ifnextchar #1#2#3->\let \reserved@d =#1\def \reserved@a {#2}\def \reserved@b
  6. {#3}\futurelet \@let@token \@ifnch
  7. #1<-[
  8. #2<-\@undeclaredcolor
  9. #3<-\@declaredcolor
  11. \@ifnch ->\ifx \@let@token \@sptoken \let \reserved@c \@xifnch \else \ifx \@let
  12. @token \reserved@d \let \reserved@c \reserved@a \else \let \reserved@c \reserve
  13. d@b \fi \fi \reserved@c
  15. \reserved@c ->\@declaredcolor
  17. \@declaredcolor #1->\XC@edef \XC@@tmp {#1}\XC@@tstfalse \ifcase \XC@type \XC@@t
  18. mp \relax \XC@@tsttrue \or \relax \else \ifblendcolors \XC@@tsttrue \fi \ifmask
  19. colors \XC@@tsttrue \fi \ifconvertcolorsU \XC@@tsttrue \fi \fi \ifXC@@tst \expa
  20. ndafter \XC@declaredcolor \else \expandafter \XC@declaredc@lor \fi
  21. #1<-blue!60!white
  23. \XC@edef #1#2->\begingroup \ifnum \catcode `\!=13 \edef !{\string !}\fi \ifnum
  24. \catcode `\:=13 \edef :{\string :}\fi \ifnum \catcode `\-=13 \edef -{\string -}
  25. \fi \ifnum \catcode `\+=13 \edef +{\string +}\fi \ifnum \catcode `\;=13 \edef ;
  26. {\string ;}\fi \ifnum \catcode `\"=13 \edef "{\string "}\fi \ifnum \catcode `\>
  27. =13 \edef >{\string >}\fi \edef #1{#2}\@onelevel@sanitize #1\aftergroupdef #1#1
  28. #1<-\XC@@tmp
  29. #2<-blue!60!white
  31. \@onelevel@sanitize #1->\edef #1{\expandafter \strip@prefix \meaning #1}
  32. #1<-\XC@@tmp
  34. \strip@prefix #1>->
  35. #1<-macro:-
  37. \aftergroupdef #1#2->\expandafter \endgroup \expandafter \def \expandafter #1\e
  38. xpandafter {#2}
  39. #1<-\XC@@tmp
  40. #2<-\XC@@tmp
  42. \XC@@tmp ->blue!60!white
  44. \XC@@tstfalse ->\let \ifXC@@tst \iffalse
  46. \XC@type #1->\expandafter \expandafter \expandafter \XC@typ@ \csname \string \c
  47. olor@ #1\endcsname \@empty \@empty \@empty \XC@@
  48. #1<-\XC@@tmp
  50. \XC@@tmp ->blue!60!white
  52. \XC@typ@ #1#2#3#4\XC@@ ->\ifx #1\relax 0\else \ifx #1\xcolor@ \ifx $#2$\ifx $#3
  53. $4\else 3\fi \@gobbletwo \else 2\fi \@gobbletwo \else 1\fi \fi
  54. #1<-\\color@blue!60!white
  55. #2<-\@empty
  56. #3<-\@empty
  57. #4<-\@empty
  59. \XC@@tsttrue ->\let \ifXC@@tst \iftrue
  61. \XC@declaredcolor ->\XC@split \XC@@tmp \edef \@@tmp {\noexpand \@undeclaredcolo
  62. r [\@@mod ]{\@@clr }}\expandafter \endgroup \@@tmp
  63.  
  64. \XC@split #1->\begingroup \XC@edef \@@tmp {#1}\expandafter \XC@split@i \@@tmp >
  65. >\@nnil
  66. #1<-\XC@@tmp
  67.  
  68. \XC@edef #1#2->\begingroup \ifnum \catcode `\!=13 \edef !{\string !}\fi \ifnum
  69. \catcode `\:=13 \edef :{\string :}\fi \ifnum \catcode `\-=13 \edef -{\string -}
  70. \fi \ifnum \catcode `\+=13 \edef +{\string +}\fi \ifnum \catcode `\;=13 \edef ;
  71. {\string ;}\fi \ifnum \catcode `\"=13 \edef "{\string "}\fi \ifnum \catcode `\>
  72. =13 \edef >{\string >}\fi \edef #1{#2}\@onelevel@sanitize #1\aftergroupdef #1#1
  73. #1<-\@@tmp
  74. #2<-\XC@@tmp
  75.  
  76. \XC@@tmp ->blue!60!white
  77.  
  78. \@onelevel@sanitize #1->\edef #1{\expandafter \strip@prefix \meaning #1}
  79. #1<-\@@tmp
  80.  
  81. \strip@prefix #1>->
  82. #1<-macro:-
  83.  
  84. \aftergroupdef #1#2->\expandafter \endgroup \expandafter \def \expandafter #1\e
  85. xpandafter {#2}
  86. #1<-\@@tmp
  87. #2<-\@@tmp
  88.  
  89. \@@tmp ->blue!60!white
  90.  
  91. \@@tmp ->blue!60!white
  92.  
  93. \XC@split@i #1>->\def \@@tmp {#1}\XC@split@ii #1:\@nil \XC@func
  94. #1<-blue!60!white
  95.  
  96. \XC@split@ii #1:#2\@nil ->\@ifxempty {#2}{\XC@split@vi }{\XC@split@iii #1,,:#2}
  97. #1<-blue!60!white
  98. #2<-
  99.  
  100. \@ifxempty #1->\@@ifxempty #1\@@ifxempty \XC@@
  101. #1<-
  102.  
  103. \@@ifxempty #1#2\XC@@ ->\ifx #1\@@ifxempty \expandafter \@firstoftwo \else \exp
  104. andafter \@secondoftwo \fi
  105. #1<-\@@ifxempty
  106. #2<-
  107.  
  108. \@firstoftwo #1#2->#1
  109. #1<-\XC@split@vi
  110. #2<-\XC@split@iii blue!60!white,,:
  111.  
  112. \XC@split@vi ->\count@ \z@ \expandafter \XC@split@vii \@@tmp !\@nil
  113.  
  114. \@@tmp ->blue!60!white
  115.  
  116. \XC@split@vii #1->\ifx #1-\advance \count@ \@ne \expandafter \XC@split@vii \els
  117. e \expandafter \XC@split@viii \expandafter #1\fi
  118. #1<-b
  119.  
  120. \XC@split@viii #1!#2\@nil ->\edef \@@nam {#1}\edef \@@mix {#2}\ifodd \count@ \@
  121. tempswatrue \else \@tempswafalse \fi \@ifundefinedcolor \@@nam {\c@lor@error {`
  122. \@@nam '}\def \@@nam {black}}{}\let \xcolor@ \@xcolor@ \@nameuse {\string \colo
  123. r@ \@@nam }
  124. #1<-blue
  125. #2<-60!white!
  126.  
  127. \@tempswafalse ->\let \if@tempswa \iffalse
  128.  
  129. \@ifundefinedcolor #1->\@ifundefined {\string \color@ #1}
  130. #1<-\@@nam
  131.  
  132. \@ifundefined #1->\expandafter \ifx \csname #1\endcsname \relax \expandafter \@
  133. firstoftwo \else \expandafter \@secondoftwo \fi
  134. #1<-\string \color@ \@@nam
  135.  
  136. \@@nam ->blue
  137.  
  138. \@secondoftwo #1#2->#2
  139. #1<-\c@lor@error {`\@@nam '}\def \@@nam {black}
  140. #2<-
  141.  
  142. \@nameuse #1->\csname #1\endcsname
  143. #1<-\string \color@ \@@nam
  144.  
  145. \@@nam ->blue
  146.  
  147. \\color@blue ->\xcolor@ {}{0 0 1 rg 0 0 1 RG}{rgb}{0,0,1}
  148.  
  149. \xcolor@ #1#2#3#4->\XC@sdef \@@mod {#3}\edef \@@clr {#4}\ifx \@@mix \@empty \el
  150. se \expandafter \@xcolor@@ \@@mix !!!!\@nil \fi \if@tempswa \XC@let@Nc \@@tmp {
  151. XC@cnv@\@@mod @compl}\ifx \@@tmp \relax \expandafter \XC@calc@ \@@clr ,,,,:C\el
  152. se \expandafter \@@tmp \@@clr ,\fi \let \@@clr \@@tmp \fi
  153. #1<-
  154. #2<-0 0 1 rg 0 0 1 RG
  155. #3<-rgb
  156. #4<-0,0,1
  157.  
  158. \XC@sdef #1#2->\edef #1{#2}\@onelevel@sanitize #1
  159. #1<-\@@mod
  160. #2<-rgb
  161.  
  162. \@onelevel@sanitize #1->\edef #1{\expandafter \strip@prefix \meaning #1}
  163. #1<-\@@mod
  164.  
  165. \strip@prefix #1>->
  166. #1<-macro:-
  167.  
  168. \@@mix ->60!white!
  169.  
  170. \@xcolor@@ #1!#2!#3!#4!#5\@nil ->\dimen@ \@ifxempty {#1}{100}{#1}\p@ \edef \@@m
  171. ix {\@ifxempty {#2}{white}{#2}}\ifdim \dimen@ =100\p@ \expandafter \XC@postfix
  172. \@@mix ]\relax \else \ifdim \dimen@ =\z@ \extractcolorspecs \@@mix \@@mod \@@cl
  173. r \else \XC@let@Nc \@@tmp {XC@clr@\@@mod @\@@mix }\ifx \@@tmp \relax \extractco
  174. lorspec \@@mix \@@tmp \ifx \@@mod \XC@mod@gray \edef \@@mod {\expandafter \@fir
  175. stoftwo \@@tmp }\edef \@@tmp {\expandafter \@secondoftwo \@@tmp }\convertcolors
  176. pec \XC@mod@gray \@@clr \@@mod \@@clr \else \expandafter \convertcolorspec \@@t
  177. mp \@@mod \@@tmp \fi \else \ifx \@@mod \XC@mod@hsb \expandafter \XC@extract@hue
  178. \@@clr :\@@hue \fi \fi \XC@inflate \@@mod \@@clr \@@tmp \@@tmp \expandafter \X
  179. C@mix \@@tmp ,\@@clr \fi \fi \@ifxempty {#3}{\@ifxempty {#4}{}{\@xcolor@@ !#4!#
  180. 5\@nil }}{\@xcolor@@ #3!#4!#5\@nil }
  181. #1<-60
  182. #2<-white
  183. #3<-
  184. #4<-
  185. #5<-!!
  186.  
  187. \@ifxempty #1->\@@ifxempty #1\@@ifxempty \XC@@
  188. #1<-60
  189.  
  190. \@@ifxempty #1#2\XC@@ ->\ifx #1\@@ifxempty \expandafter \@firstoftwo \else \exp
  191. andafter \@secondoftwo \fi
  192. #1<-6
  193. #2<-0\@@ifxempty
  194.  
  195. \@secondoftwo #1#2->#2
  196. #1<-100
  197. #2<-60
  198.  
  199. \@ifxempty #1->\@@ifxempty #1\@@ifxempty \XC@@
  200. #1<-white
  201.  
  202. \@@ifxempty #1#2\XC@@ ->\ifx #1\@@ifxempty \expandafter \@firstoftwo \else \exp
  203. andafter \@secondoftwo \fi
  204. #1<-w
  205. #2<-hite\@@ifxempty
  206.  
  207. \@secondoftwo #1#2->#2
  208. #1<-white
  209. #2<-white
  210.  
  211. \XC@let@Nc #1#2->\expandafter \let \expandafter #1\csname #2\endcsname
  212. #1<-\@@tmp
  213. #2<-XC@clr@\@@mod @\@@mix
  214.  
  215. \@@mod ->rgb
  216.  
  217. \@@mix ->white
  218.  
  219. \XC@inflate #1#2#3#4->\edef #4{#2,\ifx #1\XC@mod@cmyk #3\else \ifx #1\XC@mod@gr
  220. ay ,,,#3,,,\else ,#3,\fi \fi }
  221. #1<-\@@mod
  222. #2<-\@@clr
  223. #3<-\@@tmp
  224. #4<-\@@tmp
  225.  
  226. \@@clr ->0,0,1
  227.  
  228. \@@tmp ->1,1,1
  229.  
  230. \@@tmp ->0,0,1,,1,1,1,
  231.  
  232. \XC@mix ->\begingroup \@tempdima \dimen@ \@tempdimb 100\p@ \advance \@tempdimb
  233. -\@tempdima \let \XC@vec@ \XC@mix@ \XC@vec
  234.  
  235. \XC@vec #1,#2,#3,#4,#5,#6,#7,#8,#9->\def \@@tmp {}\XC@vec@ {#1}{#5}\ifx ,#2,\el
  236. se \XC@vec@ {#2}{#6}\XC@vec@ {#3}{#7}\ifx ,#4,\else \XC@vec@ {#4}{#8}\fi \fi \a
  237. ftergroupdef #9\@@tmp
  238. #1<-0
  239. #2<-0
  240. #3<-1
  241. #4<-
  242. #5<-1
  243. #6<-1
  244. #7<-1
  245. #8<-
  246. #9<-\@@clr
  247.  
  248. \XC@vec@ #1#2->\dimen@ #1\@tempdima \advance \dimen@ #2\@tempdimb \rrshift \dim
  249. en@ \XC@vec@@
  250. #1<-0
  251. #2<-1
  252.  
  253. \rrshift #1->\rshift #1\rshift #1
  254. #1<-\dimen@
  255.  
  256. \rshift #1->#1\expandafter \rshift@ \the #1
  257. #1<-\dimen@
  258.  
  259. \rshift@ #1.#2pt->\rshift@@ #1\relax #2\p@
  260. #1<-40
  261. #2<-0
  262.  
  263. \rshift@@ #1#2->\ifx #2\relax .#1\else #1\expandafter \rshift@@ \expandafter #2
  264. \fi
  265. #1<-4
  266. #2<-0
  267.  
  268. \rshift@@ #1#2->\ifx #2\relax .#1\else #1\expandafter \rshift@@ \expandafter #2
  269. \fi
  270. #1<-0
  271. #2<-\relax
  272.  
  273. \rshift #1->#1\expandafter \rshift@ \the #1
  274. #1<-\dimen@
  275.  
  276. \rshift@ #1.#2pt->\rshift@@ #1\relax #2\p@
  277. #1<-4
  278. #2<-0
  279.  
  280. \rshift@@ #1#2->\ifx #2\relax .#1\else #1\expandafter \rshift@@ \expandafter #2
  281. \fi
  282. #1<-4
  283. #2<-\relax
  284.  
  285. \XC@vec@@ ->\edef \@@tmp {\ifx \@@tmp \@empty \else \@@tmp ,\fi \strip@pt \dime
  286. n@ }
  287.  
  288. \strip@pt ->\expandafter \rem@pt \the
  289.  
  290. \rem@pt #1.#2pt->#1\ifnum #2>\z@ .#2\fi
  291. #1<-0
  292. #2<-4
  293.  
  294. \XC@vec@ #1#2->\dimen@ #1\@tempdima \advance \dimen@ #2\@tempdimb \rrshift \dim
  295. en@ \XC@vec@@
  296. #1<-0
  297. #2<-1
  298.  
  299. \rrshift #1->\rshift #1\rshift #1
  300. #1<-\dimen@
  301.  
  302. \rshift #1->#1\expandafter \rshift@ \the #1
  303. #1<-\dimen@
  304.  
  305. \rshift@ #1.#2pt->\rshift@@ #1\relax #2\p@
  306. #1<-40
  307. #2<-0
  308.  
  309. \rshift@@ #1#2->\ifx #2\relax .#1\else #1\expandafter \rshift@@ \expandafter #2
  310. \fi
  311. #1<-4
  312. #2<-0
  313.  
  314. \rshift@@ #1#2->\ifx #2\relax .#1\else #1\expandafter \rshift@@ \expandafter #2
  315. \fi
  316. #1<-0
  317. #2<-\relax
  318.  
  319. \rshift #1->#1\expandafter \rshift@ \the #1
  320. #1<-\dimen@
  321.  
  322. \rshift@ #1.#2pt->\rshift@@ #1\relax #2\p@
  323. #1<-4
  324. #2<-0
  325.  
  326. \rshift@@ #1#2->\ifx #2\relax .#1\else #1\expandafter \rshift@@ \expandafter #2
  327. \fi
  328. #1<-4
  329. #2<-\relax
  330.  
  331. \XC@vec@@ ->\edef \@@tmp {\ifx \@@tmp \@empty \else \@@tmp ,\fi \strip@pt \dime
  332. n@ }
  333.  
  334. \@@tmp ->0.4
  335.  
  336. \strip@pt ->\expandafter \rem@pt \the
  337.  
  338. \rem@pt #1.#2pt->#1\ifnum #2>\z@ .#2\fi
  339. #1<-0
  340. #2<-4
  341.  
  342. \XC@vec@ #1#2->\dimen@ #1\@tempdima \advance \dimen@ #2\@tempdimb \rrshift \dim
  343. en@ \XC@vec@@
  344. #1<-1
  345. #2<-1
  346.  
  347. \rrshift #1->\rshift #1\rshift #1
  348. #1<-\dimen@
  349.  
  350. \rshift #1->#1\expandafter \rshift@ \the #1
  351. #1<-\dimen@
  352.  
  353. \rshift@ #1.#2pt->\rshift@@ #1\relax #2\p@
  354. #1<-100
  355. #2<-0
  356.  
  357. \rshift@@ #1#2->\ifx #2\relax .#1\else #1\expandafter \rshift@@ \expandafter #2
  358. \fi
  359. #1<-1
  360. #2<-0
  361.  
  362. \rshift@@ #1#2->\ifx #2\relax .#1\else #1\expandafter \rshift@@ \expandafter #2
  363. \fi
  364. #1<-0
  365. #2<-0
  366.  
  367. \rshift@@ #1#2->\ifx #2\relax .#1\else #1\expandafter \rshift@@ \expandafter #2
  368. \fi
  369. #1<-0
  370. #2<-\relax
  371.  
  372. \rshift #1->#1\expandafter \rshift@ \the #1
  373. #1<-\dimen@
  374.  
  375. \rshift@ #1.#2pt->\rshift@@ #1\relax #2\p@
  376. #1<-10
  377. #2<-0
  378.  
  379. \rshift@@ #1#2->\ifx #2\relax .#1\else #1\expandafter \rshift@@ \expandafter #2
  380. \fi
  381. #1<-1
  382. #2<-0
  383.  
  384. \rshift@@ #1#2->\ifx #2\relax .#1\else #1\expandafter \rshift@@ \expandafter #2
  385. \fi
  386. #1<-0
  387. #2<-\relax
  388.  
  389. \XC@vec@@ ->\edef \@@tmp {\ifx \@@tmp \@empty \else \@@tmp ,\fi \strip@pt \dime
  390. n@ }
  391.  
  392. \@@tmp ->0.4,0.4
  393.  
  394. \strip@pt ->\expandafter \rem@pt \the
  395.  
  396. \rem@pt #1.#2pt->#1\ifnum #2>\z@ .#2\fi
  397. #1<-1
  398. #2<-0
  399.  
  400. \aftergroupdef #1#2->\expandafter \endgroup \expandafter \def \expandafter #1\e
  401. xpandafter {#2}
  402. #1<-\@@clr
  403. #2<-\@@tmp
  404.  
  405. \@@tmp ->0.4,0.4,1
  406.  
  407. \@ifxempty #1->\@@ifxempty #1\@@ifxempty \XC@@
  408. #1<-
  409.  
  410. \@@ifxempty #1#2\XC@@ ->\ifx #1\@@ifxempty \expandafter \@firstoftwo \else \exp
  411. andafter \@secondoftwo \fi
  412. #1<-\@@ifxempty
  413. #2<-
  414.  
  415. \@firstoftwo #1#2->#1
  416. #1<-\@ifxempty {}{}{\@xcolor@@ !!!!\@nil }
  417. #2<-\@xcolor@@ !!!!\@nil
  418.  
  419. \@ifxempty #1->\@@ifxempty #1\@@ifxempty \XC@@
  420. #1<-
  421.  
  422. \@@ifxempty #1#2\XC@@ ->\ifx #1\@@ifxempty \expandafter \@firstoftwo \else \exp
  423. andafter \@secondoftwo \fi
  424. #1<-\@@ifxempty
  425. #2<-
  426.  
  427. \@firstoftwo #1#2->#1
  428. #1<-
  429. #2<-\@xcolor@@ !!!!\@nil
  430.  
  431. \XC@func #1>->\@ifxempty {#1}{\remove@to@nnil }{\XC@fun@ #1,>\XC@func }
  432. #1<-
  433.  
  434. \@ifxempty #1->\@@ifxempty #1\@@ifxempty \XC@@
  435. #1<-
  436.  
  437. \@@ifxempty #1#2\XC@@ ->\ifx #1\@@ifxempty \expandafter \@firstoftwo \else \exp
  438. andafter \@secondoftwo \fi
  439. #1<-\@@ifxempty
  440. #2<-
  441.  
  442. \@firstoftwo #1#2->#1
  443. #1<-\remove@to@nnil
  444. #2<-\XC@fun@ ,>\XC@func
  445.  
  446. \remove@to@nnil #1\@nnil ->
  447. #1<-
  448.  
  449. \@@mod ->rgb
  450.  
  451. \@@clr ->0.4,0.4,1
  452.  
  453. \@@tmp ->\@undeclaredcolor [rgb]{0.4,0.4,1}
  454.  
  455. \@undeclaredcolor [#1]#2->\begingroup \let \@@cls \@empty \XC@getmodclr 12{#1}{
  456. #2}{}{\ifblendcolors \ifx \colorblend \@empty \else \edef \@@mix {\expandafter
  457. \@gobble \colorblend }\@tempswafalse \XC@coremodel \@@mod \@@clr \@xcolor@ {}{}
  458. \@@mod \@@clr \fi \fi \ifconvertcolorsU \edef \@@tmp {\XC@tgt@mod {\@@mod }}\co
  459. nvertcolorspec \@@mod \@@clr \@@tmp \@@clr \let \@@mod \@@tmp \fi \ifmaskcolors
  460. \convertcolorspec \@@mod \@@clr \XC@mmod \@@clr \let \@@mod \XC@mmod \XC@infla
  461. te \@@mod \XC@mclr \@@clr \@@tmp \expandafter \XC@mul \@@tmp ,\@@clr \fi \edef
  462. \@@tmp {\noexpand \XC@undeclaredcolor {\@@mod }{\@@clr }}\expandafter \endgroup
  463. \@@tmp }
  464. #1<-rgb
  465. #2<-0.4,0.4,1
  466.  
  467. \XC@getmodclr #1#2#3#4->\ifnum \ifcase #1 \ifXC@@getmod 1\else 0 \fi \or 1 \fi
  468. >0 \XC@mdef \@@mod {#3}\expandafter \XC@getmod \@@mod ////////\XC@@ \@ifundefin
  469. edmodel \@@Mod {\let \@@Mod \XC@mod@ignore }{}\fi \@ifundefined {XC@mod@\@@mod
  470. }{\c@lor@error {model `\@@mod '}\@firstoftwo }{\ifcase #2\else \XC@mdef \@@clr
  471. {#4}\edef \@@clr {\expandafter \XC@getclr \@@clr ////////\XC@@ }\ifx \@@cls \XC
  472. @mod@ps \else \XC@clean \@@clr \fi \ifx \@@Mod \XC@mod@ignore \else \convertcol
  473. orspec \@@mod \@@clr \@@Mod \@@clr \ifnum #2>1 \let \@@mod \@@Mod \fi \fi \fi \
  474. @secondoftwo }
  475. #1<-1
  476. #2<-2
  477. #3<-rgb
  478. #4<-0.4,0.4,1
  479.  
  480. \XC@mdef #1#2->\begingroup \ifnum \catcode `\/=13 \edef /{\string /}\fi \ifnum
  481. \catcode `\:=13 \edef :{\string :}\fi \edef #1{#2}\@onelevel@sanitize #1\afterg
  482. roupdef #1#1
  483. #1<-\@@mod
  484. #2<-rgb
  485.  
  486. \@onelevel@sanitize #1->\edef #1{\expandafter \strip@prefix \meaning #1}
  487. #1<-\@@mod
  488.  
  489. \strip@prefix #1>->
  490. #1<-macro:-
  491.  
  492. \aftergroupdef #1#2->\expandafter \endgroup \expandafter \def \expandafter #1\e
  493. xpandafter {#2}
  494. #1<-\@@mod
  495. #2<-\@@mod
  496.  
  497. \@@mod ->rgb
  498.  
  499. \@@mod ->rgb
  500.  
  501. \XC@getmod #1/#2/#3/#4/#5/#6/#7/#8/#9\XC@@ ->\XC@g@tm@d 0#1::\XC@@ \XC@getm@d 1
  502. {#2}\XC@getm@d 2{#3}\XC@getm@d 3{#4}\XC@getm@d 4{#5}\XC@getm@d 5{#6}\XC@getm@d
  503. 6{#7}\XC@getm@d 7{#8}\def \XC@@pos {0}\def \@@mod {#1}\@gobble \@nnil
  504. #1<-rgb
  505. #2<-
  506. #3<-
  507. #4<-
  508. #5<-
  509. #6<-
  510. #7<-
  511. #8<-
  512. #9<-
  513.  
  514. \XC@g@tm@d #1#2:#3:#4\XC@@ ->\@ifxempty {#3}{\let \@@Mod \XC@mod@ignore \XC@get
  515. m@d 0{#2}}{\def \@@Mod {#2}\XC@getm@d 0{#3}}
  516. #1<-0
  517. #2<-rgb
  518. #3<-
  519. #4<-
  520.  
  521. \@ifxempty #1->\@@ifxempty #1\@@ifxempty \XC@@
  522. #1<-
  523.  
  524. \@@ifxempty #1#2\XC@@ ->\ifx #1\@@ifxempty \expandafter \@firstoftwo \else \exp
  525. andafter \@secondoftwo \fi
  526. #1<-\@@ifxempty
  527. #2<-
  528.  
  529. \@firstoftwo #1#2->#1
  530. #1<-\let \@@Mod \XC@mod@ignore \XC@getm@d 0{rgb}
  531. #2<-\def \@@Mod {rgb}\XC@getm@d 0{}
  532.  
  533. \XC@getm@d #1#2->\edef \XC@@pos {#2}\XC@sdef \@@mod {\XC@tgt@mod \XC@@pos }\ifx
  534. \XC@@pos \@@mod \def \XC@@pos {#1}\expandafter \remove@to@nnil \fi
  535. #1<-0
  536. #2<-rgb
  537.  
  538. \XC@sdef #1#2->\edef #1{#2}\@onelevel@sanitize #1
  539. #1<-\@@mod
  540. #2<-\XC@tgt@mod \XC@@pos
  541.  
  542. \XC@tgt@mod #1->#1
  543. #1<-\XC@@pos
  544.  
  545. \XC@@pos ->rgb
  546.  
  547. \@onelevel@sanitize #1->\edef #1{\expandafter \strip@prefix \meaning #1}
  548. #1<-\@@mod
  549.  
  550. \strip@prefix #1>->
  551. #1<-macro:-
  552.  
  553. \remove@to@nnil #1\@nnil ->
  554. #1<-\XC@getm@d 1{}\XC@getm@d 2{}\XC@getm@d 3{}\XC@getm@d 4{}\XC@getm@d 5{}\XC@g
  555. etm@d 6{}\XC@getm@d 7{}\def \XC@@pos {0}\def \@@mod {rgb}\@gobble
  556.  
  557. \@ifundefinedmodel #1->\@ifundefined {color@#1}
  558. #1<-\@@Mod
  559.  
  560. \@ifundefined #1->\expandafter \ifx \csname #1\endcsname \relax \expandafter \@
  561. firstoftwo \else \expandafter \@secondoftwo \fi
  562. #1<-color@\@@Mod
  563.  
  564. \@@Mod ->ignore
  565.  
  566. \@secondoftwo #1#2->#2
  567. #1<-\let \@@Mod \XC@mod@ignore
  568. #2<-
  569.  
  570. \@ifundefined #1->\expandafter \ifx \csname #1\endcsname \relax \expandafter \@
  571. firstoftwo \else \expandafter \@secondoftwo \fi
  572. #1<-XC@mod@\@@mod
  573.  
  574. \@@mod ->rgb
  575.  
  576. \@secondoftwo #1#2->#2
  577. #1<-\c@lor@error {model `\@@mod '}\@firstoftwo
  578. #2<-\ifcase 2\else \XC@mdef \@@clr {0.4,0.4,1}\edef \@@clr {\expandafter \XC@ge
  579. tclr \@@clr ////////\XC@@ }\ifx \@@cls \XC@mod@ps \else \XC@clean \@@clr \fi \i
  580. fx \@@Mod \XC@mod@ignore \else \convertcolorspec \@@mod \@@clr \@@Mod \@@clr \i
  581. fnum 2>1 \let \@@mod \@@Mod \fi \fi \fi \@secondoftwo
  582.  
  583. \XC@mdef #1#2->\begingroup \ifnum \catcode `\/=13 \edef /{\string /}\fi \ifnum
  584. \catcode `\:=13 \edef :{\string :}\fi \edef #1{#2}\@onelevel@sanitize #1\afterg
  585. roupdef #1#1
  586. #1<-\@@clr
  587. #2<-0.4,0.4,1
  588.  
  589. \@onelevel@sanitize #1->\edef #1{\expandafter \strip@prefix \meaning #1}
  590. #1<-\@@clr
  591.  
  592. \strip@prefix #1>->
  593. #1<-macro:-
  594.  
  595. \aftergroupdef #1#2->\expandafter \endgroup \expandafter \def \expandafter #1\e
  596. xpandafter {#2}
  597. #1<-\@@clr
  598. #2<-\@@clr
  599.  
  600. \@@clr ->0.4,0.4,1
  601.  
  602. \@@clr ->0.4,0.4,1
  603.  
  604. \XC@getclr #1/#2/#3/#4/#5/#6/#7/#8/#9\XC@@ ->\ifcase \XC@@pos \space #1\or #2\o
  605. r #3\or #4\or #5\or #6\or #7\or #8\fi
  606. #1<-0.4,0.4,1
  607. #2<-
  608. #3<-
  609. #4<-
  610. #5<-
  611. #6<-
  612. #7<-
  613. #8<-
  614. #9<-
  615.  
  616. \XC@@pos ->0
  617.  
  618. \space ->
  619.  
  620. \XC@clean #1->\edef #1{ #1 }\XC@cle@n #1,{ }\XC@cle@n #1{. }{ }\XC@cle@n #1{ },
  621. \edef #1{\expandafter \@gobbletwo #1}
  622. #1<-\@@clr
  623.  
  624. \@@clr ->0.4,0.4,1
  625.  
  626. \XC@cle@n #1#2#3->\def \XC@cl@@n ##1#2##2{#3##1\ifx ##2\@empty \else \expandaft
  627. er \XC@cl@@n \fi ##2}\edef #1{\expandafter \XC@cl@@n #1#2\@empty }
  628. #1<-\@@clr
  629. #2<-,
  630. #3<-
  631.  
  632. \@@clr -> 0.4,0.4,1
  633.  
  634. \XC@cl@@n #1,#2-> #1\ifx #2\@empty \else \expandafter \XC@cl@@n \fi #2
  635. #1<- 0.4
  636. #2<-0
  637.  
  638. \XC@cl@@n #1,#2-> #1\ifx #2\@empty \else \expandafter \XC@cl@@n \fi #2
  639. #1<-0.4
  640. #2<-1
  641.  
  642. \XC@cl@@n #1,#2-> #1\ifx #2\@empty \else \expandafter \XC@cl@@n \fi #2
  643. #1<-1
  644. #2<-\@empty
  645.  
  646. \@empty ->
  647.  
  648. \XC@cle@n #1#2#3->\def \XC@cl@@n ##1#2##2{#3##1\ifx ##2\@empty \else \expandaft
  649. er \XC@cl@@n \fi ##2}\edef #1{\expandafter \XC@cl@@n #1#2\@empty }
  650. #1<-\@@clr
  651. #2<-.
  652. #3<-
  653.  
  654. \@@clr ->  0.4 0.4 1
  655.  
  656. \XC@cl@@n #1. #2-> #1\ifx #2\@empty \else \expandafter \XC@cl@@n \fi #2
  657. #1<-  0.4 0.4 1
  658. #2<-\@empty
  659.  
  660. \@empty ->
  661.  
  662. \XC@cle@n #1#2#3->\def \XC@cl@@n ##1#2##2{#3##1\ifx ##2\@empty \else \expandaft
  663. er \XC@cl@@n \fi ##2}\edef #1{\expandafter \XC@cl@@n #1#2\@empty }
  664. #1<-\@@clr
  665. #2<-
  666. #3<-,
  667.  
  668. \@@clr ->   0.4 0.4 1
  669.  
  670. \XC@cl@@n #1 #2->,#1\ifx #2\@empty \else \expandafter \XC@cl@@n \fi #2
  671. #1<-
  672. #2<-0
  673.  
  674. \XC@cl@@n #1 #2->,#1\ifx #2\@empty \else \expandafter \XC@cl@@n \fi #2
  675. #1<-0.4
  676. #2<-0
  677.  
  678. \XC@cl@@n #1 #2->,#1\ifx #2\@empty \else \expandafter \XC@cl@@n \fi #2
  679. #1<-0.4
  680. #2<-1
  681.  
  682. \XC@cl@@n #1 #2->,#1\ifx #2\@empty \else \expandafter \XC@cl@@n \fi #2
  683. #1<-1
  684. #2<-\@empty
  685.  
  686. \@empty ->
  687.  
  688. \@@clr ->,,0.4,0.4,1
  689.  
  690. \@gobbletwo #1#2->
  691. #1<-,
  692. #2<-,
  693.  
  694. \@secondoftwo #1#2->#2
  695. #1<-
  696. #2<-\ifblendcolors \ifx \colorblend \@empty \else \edef \@@mix {\expandafter \@
  697. gobble \colorblend }\@tempswafalse \XC@coremodel \@@mod \@@clr \@xcolor@ {}{}\@
  698. @mod \@@clr \fi \fi \ifconvertcolorsU \edef \@@tmp {\XC@tgt@mod {\@@mod }}\conv
  699. ertcolorspec \@@mod \@@clr \@@tmp \@@clr \let \@@mod \@@tmp \fi \ifmaskcolors \
  700. convertcolorspec \@@mod \@@clr \XC@mmod \@@clr \let \@@mod \XC@mmod \XC@inflate
  701. \@@mod \XC@mclr \@@clr \@@tmp \expandafter \XC@mul \@@tmp ,\@@clr \fi \edef \@
  702. @tmp {\noexpand \XC@undeclaredcolor {\@@mod }{\@@clr }}\expandafter \endgroup \
  703. @@tmp
  704.  
  705. \@@mod ->rgb
  706.  
  707. \@@clr ->0.4,0.4,1
  708.  
  709. \@@tmp ->\XC@undeclaredcolor {rgb}{0.4,0.4,1}
  710.  
  711. \XC@undeclaredcolor #1#2->\@ifundefinedmodel {#1}{\c@lor@error {model `#1'}}{\@
  712. nameuse {color@#1}\current@color {#2}\edef \XC@current@color {\noexpand \xcolor
  713. @ {}{\current@color }{#1}{#2}}\XC@display }
  714. #1<-rgb
  715. #2<-0.4,0.4,1
  716.  
  717. \@ifundefinedmodel #1->\@ifundefined {color@#1}
  718. #1<-rgb
  719.  
  720. \@ifundefined #1->\expandafter \ifx \csname #1\endcsname \relax \expandafter \@
  721. firstoftwo \else \expandafter \@secondoftwo \fi
  722. #1<-color@rgb
  723.  
  724. \@secondoftwo #1#2->#2
  725. #1<-\c@lor@error {model `rgb'}
  726. #2<-\@nameuse {color@rgb}\current@color {0.4,0.4,1}\edef \XC@current@color {\no
  727. expand \xcolor@ {}{\current@color }{rgb}{0.4,0.4,1}}\XC@display
  728.  
  729. \@nameuse #1->\csname #1\endcsname
  730. #1<-color@rgb
  731.  
  732. \color@rgb #1#2->\c@lor@@rgb #2\@@ #1
  733. #1<-\current@color
  734. #2<-0.4,0.4,1
  735.  
  736. \c@lor@@rgb #1,#2,#3\@@ #4->\c@lor@arg {#1}\c@lor@arg {#2}\c@lor@arg {#3}\edef
  737. #4{#1 #2 #3 rg #1 #2 #3 RG}
  738. #1<-0.4
  739. #2<-0.4
  740. #3<-1
  741. #4<-\current@color
  742.  
  743. \c@lor@arg #1->\dimen@ #1\p@ \ifdim \dimen@ <\z@ \dimen@ \maxdimen \fi \ifdim \
  744. dimen@ >\p@ \PackageError {color}{Argument `#1' not in range [0,1]}\@ehd \fi
  745. #1<-0.4
  746.  
  747. \c@lor@arg #1->\dimen@ #1\p@ \ifdim \dimen@ <\z@ \dimen@ \maxdimen \fi \ifdim \
  748. dimen@ >\p@ \PackageError {color}{Argument `#1' not in range [0,1]}\@ehd \fi
  749. #1<-0.4
  750.  
  751. \c@lor@arg #1->\dimen@ #1\p@ \ifdim \dimen@ <\z@ \dimen@ \maxdimen \fi \ifdim \
  752. dimen@ >\p@ \PackageError {color}{Argument `#1' not in range [0,1]}\@ehd \fi
  753. #1<-1
  754.  
  755. \current@color ->0.4 0.4 1 rg 0.4 0.4 1 RG
  756.  
  757. \XC@display ->\XC@bcolor \XC@let@cN {\string \color@ .}\XC@current@color \ifnum
  758. \XC@type {.}=1 \PackageWarning {xcolor}{Incompatible color definition}\else \i
  759. fnum \XC@tracing >2 \begingroup \let \xcolor@ \@empty \def \@nil {\string \@nil
  760. }\PackageInfo {xcolor}{Setting color `\XC@current@color '}\endgroup \fi \fi \X
  761. C@mcolor \set@color \XC@ecolor \ignorespaces
  762.  
  763. \XC@let@cN #1->\expandafter \let \csname #1\endcsname
  764. #1<-\string \color@ .
  765.  
  766. \XC@type #1->\expandafter \expandafter \expandafter \XC@typ@ \csname \string \c
  767. olor@ #1\endcsname \@empty \@empty \@empty \XC@@
  768. #1<-.
  769.  
  770. \\color@. ->\xcolor@ {}{0.4 0.4 1 rg 0.4 0.4 1 RG}{rgb}{0.4,0.4,1}
  771.  
  772. \XC@typ@ #1#2#3#4\XC@@ ->\ifx #1\relax 0\else \ifx #1\xcolor@ \ifx $#2$\ifx $#3
  773. $4\else 3\fi \@gobbletwo \else 2\fi \@gobbletwo \else 1\fi \fi
  774. #1<-\xcolor@
  775. #2<-
  776. #3<-0.4 0.4 1 rg 0.4 0.4 1 RG
  777. #4<-{rgb}{0.4,0.4,1}\@empty \@empty \@empty
  778.  
  779. \@gobbletwo #1#2->
  780. #1<-\else
  781. #2<-2
  782.  
  783. \@gobbletwo #1#2->
  784. #1<-\else
  785. #2<-1
  786.  
  787. \XC@tracing ->0
  788.  
  789. \set@color ->\pdfcolorstack \@pdfcolorstack push{\current@color }\aftergroup \r
  790. eset@color
  791.  
  792. \@pdfcolorstack ->\main@pdfcolorstack
  793.  
  794. \current@color ->0.4 0.4 1 rg 0.4 0.4 1 RG
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!