include "Simantics/All"

newSharedLibraryAction :: Resource -> <Proc> ()
newSharedLibraryAction res = do
  syncWrite (\() -> createSharedOntologyWithUI L0.SharedOntology)
  ()