InstanceArgs.agda 5.1 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980
  1. module InstanceArgs where
  2. data UnitMonoid : Set where
  3. u : UnitMonoid
  4. p : UnitMonoid → UnitMonoid → UnitMonoid
  5. record Plus (A : Set) : Set where
  6. infixl 6 _+_
  7. field
  8. _+_ : A → A → A
  9. open Plus {{...}}
  10. instance
  11. plus-unitMonoid : Plus UnitMonoid
  12. plus-unitMonoid = record { _+_ = p }
  13. bigValue : UnitMonoid
  14. bigValue =
  15. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  16. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  17. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  18. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  19. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  20. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  21. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  22. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  23. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  24. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  25. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  26. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  27. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  28. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  29. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  30. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  31. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  32. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  33. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  34. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  35. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  36. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  37. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  38. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  39. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  40. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  41. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  42. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  43. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  44. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  45. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  46. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  47. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  48. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  49. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  50. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  51. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  52. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  53. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  54. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  55. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  56. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  57. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  58. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  59. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  60. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  61. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  62. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  63. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  64. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  65. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  66. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  67. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  68. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  69. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  70. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  71. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  72. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  73. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u +
  74. u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u + u