LPFP-1.0: app/Mech3Proton.hs

{-# OPTIONS -Wall #-}

import LPFP.Mechanics3D (simulateVis, protonInitial, protonPicture, protonUpdate)

main :: IO ()
main = simulateVis 1 60 protonInitial protonPicture protonUpdate