8 lines
176 B
Text
8 lines
176 B
Text
import Lean
|
||
open Lean
|
||
|
||
def encodeDecode [ToJson α] [FromJson α] (x : α) : Except String α := do
|
||
let json ← toJson x
|
||
fromJson? json
|
||
|
||
#eval encodeDecode Name.anonymous
|