我口年的蚊帳

上星期讓勾勾來我這裡住個幾天,
第二天就發現蚊帳破了幾個洞,


第二天晚上我才發現,是貓利用蚊帳,
爬到上面為了抓我晾在房裡的褲子,
所以可以看出一個一個的洞,
早上起床一時找不到東西可以補洞,
於是拿了膠帶來貼,


雖然看起來醜醜的,不過可以一眼看出破洞在那裡,
以後在整理時就可以小心一點了。

小小找主人

昨天開車帶著小小去動物醫院,
除了再一次檢查外,同時也有個領養人要看小小,
小小因為主人騎機車載它,在竹科車禍往生了,
所以小小見到機車就不肯上車,只好開車載它啦。
有關小小的故事可以到新竹保護動物協會觀看,

其實小小很聰明,星期天我才教它三次坐下的指令,它一下就學會了,
而且又乖又安靜,也不會亂大小便,
這麼乖的狗連我都想養,
不過我住的地方實在不方便,
只能期待有心人士可以將它領養回去,好好照顧它了。

使用 TCL 解高斯函數(矩陣 Matrix)

### 設定矩陣大小
### 矩陣內容如下
### MatrixA :
### |  1     1      2  |
### | 10    11   12 |
### MatrixB :
### |  5  |
### |  7  |
set X 3
set Y 2
### 引用 TCL 的數學函式 Library Package
package require
math::linearalgebra
### 建立矩陣
set MatrixA [::math::linearalgebra::mkMatrix $Y $X 0]
set MatrixB [::math::linearalgebra::mkMatrix $Y 1 1]
### 填入矩陣 MatrixA 內容
::math::linearalgebra::setelem MatrixA 0 0 1
::math::linearalgebra::setelem MatrixA 0 1 1
::math::linearalgebra::setelem MatrixA 0 2 2
::math::linearalgebra::setelem MatrixA 1 0 10
::math::linearalgebra::setelem MatrixA 1 1 11
::math::linearalgebra::setelem MatrixA 1 2 12
### 填入矩陣 MatrixB 內容
::math::linearalgebra::setelem MatrixB 0 0 5
::math::linearalgebra::setelem MatrixB 1 0 7
### 使用 TCL 的 Library 計算 解高斯函數
set Z [::math::linearalgebra::solveGauss$MatrixA $MatrixB]
### 傳回答案 48.0 -43.0