1
(* Author: Clemens Ballarin, started 5 October 1999
2
3
Principle ideal domains.
4
*)
5
6
theory PID
7
imports Ideal2
8
begin
9
10
instance pid < factorial
11
apply intro_classes
12
apply (erule pid_irred_imp_prime)
13
done
14
15
end