lgallet/epicours
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

vault backup: 2023-09-14 14:18:59

Browse Source
This commit is contained in:
Louis Gallet
2023-09-14 14:18:59 +02:00
parent 672cf52229
commit c99ada1550
1 changed files with 7 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
Algo/Séminaire/Exercices seminaire.md
View File

@ -262,6 +262,13 @@ flowchart LR
A[seq 3] --> B[4*seq2-1] --> C[4*seq1-1] --> D[4*seq0-1] --> E[1] --> F[4*1-1] --> G[4*3-1] --> H[4*11-1] A[seq 3] --> B[4*seq2-1] --> C[4*seq1-1] --> D[4*seq0-1] --> E[1] --> F[4*1-1] --> G[4*3-1] --> H[4*11-1]
``` ```
## Exercise 4.3
```Ocaml
# let geometric n u0 q =
let rec geo = function
| 0 -> u0
|n -> q*geo(n-1) in geo n;;
```
## Exercise 4.5 ## Exercise 4.5
```Ocaml ```Ocaml
let rec add a = function let rec add a = function