205 lines
28 KiB
Plaintext
205 lines
28 KiB
Plaintext
;;File generated by xxl-v2.1.1. DO NOT EDIT.
|
|
;201 200 ;; nb-rows nb-cols
|
|
(set-author! *current-sheet* "")
|
|
(set-creation-date! *current-sheet* "11/12/98 14:12:30")
|
|
(set-modification-date! *current-sheet* "01/07/99 16:51:15")
|
|
(set-title! *current-sheet* "Factorielle")
|
|
(set-purpose! *current-sheet* "Purpose: ")
|
|
(apply width (current-table) '(1 -69 2 -165 3 -174))
|
|
(apply height (current-table) '(1 -43))
|
|
|
|
(set-table-value! (current-table) 2 1 (make <value-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(times 16 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value "n"))
|
|
|
|
(set-table-value! (current-table) 2 2 (make <value-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(times 16 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value "n!"))
|
|
|
|
(set-table-value! (current-table) 2 3 (make <value-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(times 16 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value "1/n!"))
|
|
|
|
(set-table-value! (current-table) 3 1 (make <value-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 1))
|
|
|
|
(set-table-value! (current-table) 3 2 (make <value-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 1))
|
|
|
|
(set-table-value! (current-table) 3 3 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 1 :has-ext-ref #f :formula '((/ 1 #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 4 1 (make <value-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 1))
|
|
|
|
(set-table-value! (current-table) 4 2 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 1 :has-ext-ref #f :formula '((* #(#f 0 (-1 . 0)) #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 4 3 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 1 :has-ext-ref #f :formula '((/ 1 #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 5 1 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 2 :has-ext-ref #f :formula '((+ #(#f 0 (-1 . 0)) 1))))
|
|
|
|
(set-table-value! (current-table) 5 2 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 2 :has-ext-ref #f :formula '((* #(#f 0 (-1 . 0)) #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 5 3 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 0.5 :has-ext-ref #f :formula '((/ 1 #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 6 1 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 3 :has-ext-ref #f :formula '((+ #(#f 0 (-1 . 0)) 1))))
|
|
|
|
(set-table-value! (current-table) 6 2 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 6 :has-ext-ref #f :formula '((* #(#f 0 (-1 . 0)) #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 6 3 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 0.166666666666667 :has-ext-ref #f :formula '((/ 1 #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 7 1 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 4 :has-ext-ref #f :formula '((+ #(#f 0 (-1 . 0)) 1))))
|
|
|
|
(set-table-value! (current-table) 7 2 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 24 :has-ext-ref #f :formula '((* #(#f 0 (-1 . 0)) #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 7 3 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 0.0416666666666667 :has-ext-ref #f :formula '((/ 1 #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 8 1 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 5 :has-ext-ref #f :formula '((+ #(#f 0 (-1 . 0)) 1))))
|
|
|
|
(set-table-value! (current-table) 8 2 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 120 :has-ext-ref #f :formula '((* #(#f 0 (-1 . 0)) #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 8 3 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 0.00833333333333333 :has-ext-ref #f :formula '((/ 1 #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 9 1 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 6 :has-ext-ref #f :formula '((+ #(#f 0 (-1 . 0)) 1))))
|
|
|
|
(set-table-value! (current-table) 9 2 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 720 :has-ext-ref #f :formula '((* #(#f 0 (-1 . 0)) #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 9 3 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 0.00138888888888889 :has-ext-ref #f :formula '((/ 1 #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 10 1 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 7 :has-ext-ref #f :formula '((+ #(#f 0 (-1 . 0)) 1))))
|
|
|
|
(set-table-value! (current-table) 10 2 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 5040 :has-ext-ref #f :formula '((* #(#f 0 (-1 . 0)) #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 10 3 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 0.000198412698412698 :has-ext-ref #f :formula '((/ 1 #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 11 1 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 8 :has-ext-ref #f :formula '((+ #(#f 0 (-1 . 0)) 1))))
|
|
|
|
(set-table-value! (current-table) 11 2 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 40320 :has-ext-ref #f :formula '((* #(#f 0 (-1 . 0)) #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 11 3 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 2.48015873015873e-05 :has-ext-ref #f :formula '((/ 1 #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 12 1 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 9 :has-ext-ref #f :formula '((+ #(#f 0 (-1 . 0)) 1))))
|
|
|
|
(set-table-value! (current-table) 12 2 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 362880 :has-ext-ref #f :formula '((* #(#f 0 (-1 . 0)) #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 12 3 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 2.75573192239859e-06 :has-ext-ref #f :formula '((/ 1 #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 13 1 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 10 :has-ext-ref #f :formula '((+ #(#f 0 (-1 . 0)) 1))))
|
|
|
|
(set-table-value! (current-table) 13 2 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 3628800 :has-ext-ref #f :formula '((* #(#f 0 (-1 . 0)) #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 13 3 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 2.75573192239859e-07 :has-ext-ref #f :formula '((/ 1 #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 14 1 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 11 :has-ext-ref #f :formula '((+ #(#f 0 (-1 . 0)) 1))))
|
|
|
|
(set-table-value! (current-table) 14 2 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 39916800 :has-ext-ref #f :formula '((* #(#f 0 (-1 . 0)) #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 14 3 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 2.50521083854417e-08 :has-ext-ref #f :formula '((/ 1 #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 15 1 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 12 :has-ext-ref #f :formula '((+ #(#f 0 (-1 . 0)) 1))))
|
|
|
|
(set-table-value! (current-table) 15 2 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 479001600 :has-ext-ref #f :formula '((* #(#f 0 (-1 . 0)) #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 15 3 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 2.08767569878681e-09 :has-ext-ref #f :formula '((/ 1 #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 16 1 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 13 :has-ext-ref #f :formula '((+ #(#f 0 (-1 . 0)) 1))))
|
|
|
|
(set-table-value! (current-table) 16 2 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 6227020800 :has-ext-ref #f :formula '((* #(#f 0 (-1 . 0)) #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 16 3 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 1.60590438368216e-10 :has-ext-ref #f :formula '((/ 1 #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 17 1 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 14 :has-ext-ref #f :formula '((+ #(#f 0 (-1 . 0)) 1))))
|
|
|
|
(set-table-value! (current-table) 17 2 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 87178291200 :has-ext-ref #f :formula '((* #(#f 0 (-1 . 0)) #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 17 3 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 1.14707455977297e-11 :has-ext-ref #f :formula '((/ 1 #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 18 1 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 15 :has-ext-ref #f :formula '((+ #(#f 0 (-1 . 0)) 1))))
|
|
|
|
(set-table-value! (current-table) 18 2 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 1307674368000 :has-ext-ref #f :formula '((* #(#f 0 (-1 . 0)) #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 18 3 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 7.64716373181982e-13 :has-ext-ref #f :formula '((/ 1 #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 19 1 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 16 :has-ext-ref #f :formula '((+ #(#f 0 (-1 . 0)) 1))))
|
|
|
|
(set-table-value! (current-table) 19 2 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 20922789888000 :has-ext-ref #f :formula '((* #(#f 0 (-1 . 0)) #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 19 3 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 4.77947733238739e-14 :has-ext-ref #f :formula '((/ 1 #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 20 1 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 17 :has-ext-ref #f :formula '((+ #(#f 0 (-1 . 0)) 1))))
|
|
|
|
(set-table-value! (current-table) 20 2 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 355687428096000 :has-ext-ref #f :formula '((* #(#f 0 (-1 . 0)) #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 20 3 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 2.81145725434552e-15 :has-ext-ref #f :formula '((/ 1 #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 21 1 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 18 :has-ext-ref #f :formula '((+ #(#f 0 (-1 . 0)) 1))))
|
|
|
|
(set-table-value! (current-table) 21 2 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 6402373705728000 :has-ext-ref #f :formula '((* #(#f 0 (-1 . 0)) #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 21 3 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 1.56192069685862e-16 :has-ext-ref #f :formula '((/ 1 #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 22 1 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 19 :has-ext-ref #f :formula '((+ #(#f 0 (-1 . 0)) 1))))
|
|
|
|
(set-table-value! (current-table) 22 2 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 121645100408832000 :has-ext-ref #f :formula '((* #(#f 0 (-1 . 0)) #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 22 3 (make <formula-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'w :font "(utopia 14 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value 8.22063524662433e-18 :has-ext-ref #f :formula '((/ 1 #(#f 0 (0 . -1))))))
|
|
|
|
(set-table-value! (current-table) 1 1 (make <value-cell> :format '(0 . 0) :tag (make <table-tag> :parent (current-table) :anchor 'center :font "(utopia 16 normal roman)" :background "" :foreground "black" :justify 'center :image "" :multiline 1 :relief "sunken" :showtext -1 :state 'disabled :wrap 0) :value "Table de Factorielle"))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 2 3)) '(2 . 3))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 17 1)) '(17 . 1))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 18 3)) '(18 . 3))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 20 3)) '(20 . 3))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 4 3)) '(4 . 3))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 6 3)) '(6 . 3))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 12 2)) '(12 . 2))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 14 2)) '(14 . 2))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 6 1)) '(6 . 1))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 16 2)) '(16 . 2))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 18 1)) '(18 . 1))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 11 3)) '(11 . 3))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 14 3)) '(14 . 3))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 15 3)) '(15 . 3))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 3 3)) '(3 . 3))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 14 1)) '(14 . 1))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 15 1)) '(15 . 1))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 11 1)) '(11 . 1))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 16 1)) '(16 . 1))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 22 3)) '(22 . 3))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 22 2)) '(22 . 2))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 22 1)) '(22 . 1))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 8 3)) '(8 . 3))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 21 3)) '(21 . 3))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 10 1)) '(10 . 1))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 19 2)) '(19 . 2))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 8 1)) '(8 . 1))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 13 2)) '(13 . 2))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 15 2)) '(15 . 2))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 11 2)) '(11 . 2))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 10 2)) '(10 . 2))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 7 3)) '(7 . 3))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 13 3)) '(13 . 3))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 2 1)) '(2 . 1))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 7 1)) '(7 . 1))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 19 1)) '(19 . 1))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 10 3)) '(10 . 3))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 5 1)) '(5 . 1))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 9 3)) '(9 . 3))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 18 2)) '(18 . 2))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 9 2)) '(9 . 2))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 6 2)) '(6 . 2))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 12 1)) '(12 . 1))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 20 1)) '(20 . 1))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 7 2)) '(7 . 2))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 17 3)) '(17 . 3))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 21 2)) '(21 . 2))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 21 1)) '(21 . 1))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 3 1)) '(3 . 1))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 5 2)) '(5 . 2))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 20 2)) '(20 . 2))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 9 1)) '(9 . 1))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 19 3)) '(19 . 3))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 4 1)) '(4 . 1))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 3 2)) '(3 . 2))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 8 2)) '(8 . 2))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 12 3)) '(12 . 3))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 17 2)) '(17 . 2))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 5 3)) '(5 . 3))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 4 2)) '(4 . 2))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 16 3)) '(16 . 3))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 2 2)) '(2 . 2))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 13 1)) '(13 . 1))
|
|
(tag-cell (get-tag (get-table-cell (current-table) 1 1)) '(1 . 1))
|
|
(spans (current-table) '(1 . 1) '(0 . 2))
|
|
(configure (current-table) :titlerows 1)
|
|
;;End of xxl-v2.1.1. File.
|