2021-05-21 18:46:14 +03:00
|
|
|
1/1: Building RecordDoc (RecordDoc.idr)
|
|
|
|
RecordDoc>
|
2021-08-19 13:38:14 +03:00
|
|
|
RecordDoc> record RecordDoc.A : Type -> Type
|
2021-05-21 18:46:14 +03:00
|
|
|
Totality: total
|
|
|
|
Constructor: __mkA : _
|
2021-09-15 15:20:58 +03:00
|
|
|
Projection: .anA : A a -> a
|
2021-08-19 13:38:14 +03:00
|
|
|
RecordDoc> record RecordDoc.Tuple : Type -> Type -> Type
|
2021-05-21 18:46:14 +03:00
|
|
|
Totality: total
|
|
|
|
Constructor: __mkTuple : _
|
|
|
|
Projections:
|
2021-09-15 15:20:58 +03:00
|
|
|
.proj1 : Tuple a b -> a
|
|
|
|
.proj2 : Tuple a b -> b
|
2021-08-19 13:38:14 +03:00
|
|
|
RecordDoc> record RecordDoc.Singleton : a -> Type
|
2021-05-21 18:46:14 +03:00
|
|
|
Totality: total
|
|
|
|
Constructor: __mkSingleton : _
|
|
|
|
Projections:
|
2021-09-15 15:20:58 +03:00
|
|
|
.equal : (rec : Singleton v) -> value rec = v
|
|
|
|
.value : Singleton v -> a
|
2021-05-21 18:46:14 +03:00
|
|
|
RecordDoc> Bye for now!
|