cosm 行列余弦関数

## 呼び出し手順

    t = cosm(x)

## 引数

x

  実数または複素数の正方行列

## 説明

`cosm(x)` は, 行列`x`の余弦行列 `t=0.5*(expm(%i*x)+expm(-%i*x))`です.

## 例

    A=[1,2;3,4]
    cosm(A)-0.5*(expm(%i*A)+expm(-%i*A))

## 参照

- cos
- expm