only notebook

Mathematica code