This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(******************************************************) | |
(** //// Kliesli Construction of Monads //// *) | |
(******************************************************) | |
Require Import Logic.FunctionalExtensionality. | |
(*////////////////////////////////////////////////////*) | |
(** Preliminaries *) | |
(*////////////////////////////////////////////////////*) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(******************************************************) | |
(** //// Modular Lattices //// *) | |
(******************************************************) | |
Section ModularLattice. | |
Require Import Relation_Definitions Setoid Morphisms. | |
(*////////////////////////////////////////////////////*) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(******************************************************) | |
(** //// Validation of the "filter" Function //// *) | |
(******************************************************) | |
Require Import List Bool Lt. | |
Section Filter. | |
(*////////////////////////////////////////////////////*) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(******************************************************) | |
(** //// Topology Spaces //// *) | |
(******************************************************) | |
Section Topology. | |
(*////////////////////////////////////////////////////*) | |
(** Axioms *) | |
(*////////////////////////////////////////////////////*) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(******************************************************) | |
(** //// Validation of the Quick Sort //// *) | |
(******************************************************) | |
Section QuickSort. | |
Require Import Arith List. | |
Require Import Recdef. | |
Require Import Sorting.Sorted Sorting.Permutation. |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Require Import Ascii String. | |
Open Scope string_scope. | |
Definition Q : string := " | |
Eval compute in "" | |
Require Import Ascii String. | |
Open Scope string_scope. | |
Definition Q : string := "" ++ """" ++ Q ++ """" ++ ""."" ++ Q.". | |
Eval compute in " | |
Require Import Ascii String. | |
Open Scope string_scope. |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(*******************************************************) | |
(** //// Validation of the Stack Machine Compiler //// *) | |
(*******************************************************) | |
Require Import List. | |
(* Definition : Identifiers *) | |
Inductive id : Type := | |
| Id : nat -> id. |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
// ************************************ | |
// ジュースの自動販売機のモデル | |
// ************************************ | |
open util/ordering[Time] | |
// 時刻パラメータ | |
sig Time {} | |
// 簡略化のため、コインの額面とジュースの種類はそれぞれ 1 種類とする |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Section Perceptron. | |
Require Import QArith List. | |
Inductive Q_vector : nat -> Set := | |
| vnil : Q_vector O | |
| vcons : forall n : nat, | |
Q -> Q_vector n -> Q_vector (S n). | |
Implicit Arguments vcons [n]. | |
Notation "x ; v" := (vcons x v) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
// ************************************ | |
// 十進法による符号なし整数演算のモデル | |
// ************************************ | |
open util/ordering[Position] | |
// ------------------------------------ | |
// 位取り記数法のモデリング | |
// ------------------------------------ |
OlderNewer