diff options
| author | ubq323 <ubq323@ubq323.website> | 2024-08-17 12:35:43 +0100 |
|---|---|---|
| committer | ubq323 <ubq323@ubq323.website> | 2024-08-17 12:35:43 +0100 |
| commit | 05cfb9bf2461785ec621b490747f48b96344017f (patch) | |
| tree | 0b9fc13d8509b24c3950c668c9aa4cc28bcfa492 /tests/sin.bth | |
| parent | 14b6304bb416795ca1016e9ce5f052b0861e5a48 (diff) | |
sin, cos, more checks
Diffstat (limited to 'tests/sin.bth')
| -rw-r--r-- | tests/sin.bth | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/tests/sin.bth b/tests/sin.bth new file mode 100644 index 0000000..319241f --- /dev/null +++ b/tests/sin.bth @@ -0,0 +1,14 @@ +(defn (ts x) + (* 10 (+ 1 (sin x)))) + +(set! _G_ts ts) + +(defn (p t) + (for (i (_G_ts t)) + (write " ")) + (say 'x)) + + + +(for (i 50) (p (/ i 8))) + |