{-# OPTIONS -Wall #-} import LPFP.Mechanics3D (simulateVis, protonInitial, protonPicture, protonUpdate) main :: IO () main = simulateVis 1 60 protonInitial protonPicture protonUpdate