\documentclass[11pt]{amsart}
\usepackage{amsmath,amsthm,amsfonts,latexsym,amssymb,amscd,color}
\pagestyle{headings}
\setlength{\textwidth}{468true pt}
\setlength{\headheight}{0true pt} % needed for 12pt documents
\setlength{\oddsidemargin}{0 truept}
\setlength{\evensidemargin}{0 truept}
\setlength{\textheight}{580true pt}
\newtheorem{thm}{Theorem} %[section]
\newtheorem{cor}[thm]{Corollary}
\newtheorem{lm}[thm]{Lemma}
\newtheorem{prp}[thm]{Proposition}
\newtheorem{clm}[thm]{Claim}
%
\theoremstyle{definition}
\newtheorem{df}[thm]{Definition}
\newtheorem{exmp}[thm]{Example}
\newtheorem{exmps}[thm]{Examples}
\newtheorem{prb}[thm]{Problem}
%
%\theoremstyle{remark}
\newtheorem{rem}[thm]{Remark}
%
\numberwithin{equation}{section}
%
\newcommand{\thref}[1]{Theorem~\ref{#1}}
\newcommand{\secref}[1]{\S\ref{#1}}
\newcommand{\lmref}[1]{Lemma~\ref{#1}}
%
\DeclareMathOperator{\satf}{\models}
\DeclareMathOperator{\miff}{\Longleftrightarrow} 
                                           % math `if and only if'
\DeclareMathOperator{\mimplies}{\Longrightarrow} 
                                           % math `implies'
\DeclareMathOperator{\mimplied}{\Longleftarrow}  
                                           % math `implied by'
\newcommand{\set}[2]{\{#1\,:\,\text{#2}\}} % { x : ... }
\DeclareMathOperator{\id}{\textsl{id}}     % The identity map
\DeclareMathOperator{\miffdef}{\stackrel{def}{\miff}}
                                           % defining iff
\DeclareMathOperator{\eqdef}{\stackrel{def}{=}}
                                           % defining equation

\DeclareMathOperator{\neareq}{\stackrel{\ae}{=}}
\DeclareMathOperator{\aeqv}{\stackrel{ae}{\equiv}}
\DeclareMathOperator{\aeq}{\stackrel{ae}{=}}
%
\DeclareMathOperator{\BZ}{\mathbb{Z}} % integers
\DeclareMathOperator{\BQ}{\mathbb{Q}} % rationals
\DeclareMathOperator{\BR}{\mathbb{R}} % reals
\DeclareMathOperator{\BC}{\mathbb{C}} % complex numbers
\DeclareMathOperator{\BD}{\mathbb{D}} % 
\DeclareMathOperator{\BE}{\mathbb{E}} % 
\DeclareMathOperator{\BF}{\mathbb{F}} % 
\DeclareMathOperator{\BK}{\mathbb{K}} % 
\DeclareMathOperator{\BL}{\mathbb{L}} % 
\DeclareMathOperator{\re}{Re}         % real part
\DeclareMathOperator{\im}{Im}         % imaginary part
\DeclareMathOperator{\Ker}{Ker}
%
\DeclareMathOperator{\meet}{\wedge}
\DeclareMathOperator{\join}{\vee}
\DeclareMathOperator{\union}{\cup}
\DeclareMathOperator{\inter}{\cap}  % intersection
\DeclareMathOperator{\iso}{\cong}   % isomorphic
\DeclareMathOperator{\piso}{\simeq} % polynomially isomorphic
\newcommand{\Star}{^ *}
\DeclareMathOperator{\compose}{{\scriptstyle \circ}} % f o g
%
\newcommand{\wec}[1]{{\mathbf{#1}}}  % notation for vectors in algebras
%\newcommand{\wec}[1]{{\bar{#1}}} % which one do you prefer?
\newcommand{\wrel}[1]{\;#1\;}     % a\wrel{\alpha}b = a \alpha b
%              % this provides a flexible way to change the spacing
%
\newcommand{\m}[1]{{\mathbf{\uppercase{#1}}}}
\newcommand{\vr}[1]{{\mathcal{\uppercase {#1}}}}
%
\DeclareMathOperator{\Var}{\mathbf{V}}
\DeclareMathOperator{\Ho}{\mathbf{H}}
\DeclareMathOperator{\Su}{\mathbf{S}}
\DeclareMathOperator{\Pd}{\mathbf{P}}
\DeclareMathOperator{\Iso}{\mathbf{I}}
\DeclareMathOperator{\Ps}{\mathbf{P}_s}
\newcommand{\fin}[1]{{\mathbf{#1}}_{\text{\upshape fin}}}
%
\DeclareMathOperator{\Pol}{Pol}
\DeclareMathOperator{\Clo}{Clo}
\DeclareMathOperator{\Con}{Con}
\DeclareMathOperator{\Conb}{\mathbf{Con}} % Con(A) as a lattice
\DeclareMathOperator{\cg}{Cg}
\DeclareMathOperator{\sg}{Sg}
\newcommand{\Cg}[1]{{\cg}^{\m{#1}}}
\newcommand{\Sg}[1]{{\sg}^{\m{#1}}}
%
\newcommand{\M}[3]{\text{\upshape M}_{\m{#1}} (#2, #3)}
\newcommand{\minl}[1]{\text{\upshape Min}_{\m{#1}}}
%
\DeclareMathOperator{\typ}{typ}
\DeclareMathOperator{\ann}{ann}
\DeclareMathOperator{\Sep}{Sep}
\DeclareMathOperator{\ssb}{ssb}
\DeclareMathOperator{\sst}{sst}
%
\DeclareMathOperator{\utyp}{\mathbf{1}}% unary      
\DeclareMathOperator{\atyp}{\mathbf{2}}% affine     
\DeclareMathOperator{\btyp}{\mathbf{3}}% boolean    
\DeclareMathOperator{\ltyp}{\mathbf{4}}% lattice    
\DeclareMathOperator{\styp}{\mathbf{5}}% semilattice
\DeclareMathOperator{\ityp}{\mathbf{i}}
\DeclareMathOperator{\jtyp}{\mathbf{j}}
%
\DeclareMathOperator{\solv}{\stackrel{s}{\sim}}
\DeclareMathOperator{\ssolv}{\stackrel{ss}{\sim}}
%
\newcommand{\bd}{\begin{description}}
\newcommand{\ed}{\end{description}}
%
\newcommand{\lb}{\langle} % <...>
\newcommand{\rb}{\rangle}
\newcommand{\lv}{{[\![}}  % [[...]]
\newcommand{\rv}{{]\!]}}
%
\newcommand{\ul}{\underline}
\newcommand{\ol}{\overline}
%
\newcommand{\vep}{\varepsilon}
\newcommand{\di}{\diamond}
%
\DeclareMathOperator{\Aut}{{\rm Aut}}
\DeclareMathOperator{\Sub}{{\rm Sub}}

\begin{document}


\noindent
{\bf Solutions to HW 7.}

\bigskip

  
\begin{enumerate}
\item[1.] Write the following propositions in
  disjunctive normal form, assuming that each
  proposition is a function of $p$, $q$ and $r$. 
  
  \medskip

  \begin{enumerate}
\item[(i)] $p\to r$
\color{blue}
\[
((\neg p)\wedge (\neg q)\wedge (\neg r)) \vee
((\neg p)\wedge (\neg q)\wedge r) \vee
((\neg p)\wedge q\wedge (\neg r)) \vee
((\neg p)\wedge q\wedge r) \vee
%(p\wedge (\neg q)\wedge (\neg r)) \vee
(p\wedge (\neg q)\wedge r) \vee
%(p\wedge q\wedge (\neg r)) \vee
(p\wedge q\wedge r)
\]
\color{black}
  \medskip

\item[(ii)] $((p\to q)\to ((\neg p)\leftrightarrow r))$.
\color{blue}
\[
%%  ((\neg p)\wedge (\neg q)\wedge (\neg r)) \vee
((\neg p)\wedge (\neg q)\wedge r) \vee
%%((\neg p)\wedge q\wedge (\neg r)) \vee
((\neg p)\wedge q\wedge r) \vee
(p\wedge (\neg q)\wedge (\neg r)) \vee
(p\wedge (\neg q)\wedge r) \vee
(p\wedge q\wedge (\neg r))
%%(p\wedge q\wedge r)
\]
\color{black}
  \medskip

\item[(iii)] $q$
\color{blue}
\[
%((\neg p)\wedge (\neg q)\wedge (\neg r)) \vee
%((\neg p)\wedge (\neg q)\wedge r) \vee
((\neg p)\wedge q\wedge (\neg r)) \vee
((\neg p)\wedge q\wedge r) \vee
%(p\wedge (\neg q)\wedge (\neg r)) \vee
%(p\wedge (\neg q)\wedge r) \vee
(p\wedge q\wedge (\neg r)) \vee
  (p\wedge q\wedge r)
\]
\color{black}
  \medskip

\end{enumerate}
\end{enumerate}
 
\vfill
  
\begin{enumerate}
\item[2.]
  Write the following axioms of set theory as formal sentences.

  \medskip

  \begin{enumerate}
\item[(i)] Extensionality.

\color{blue}
\[
(\forall A)(\forall B)((A=B)\leftrightarrow (\forall z)((z\in A)\leftrightarrow (z\in B)))
\]
\color{black}
  \medskip

\item[(ii)] Pairing.

\color{blue}
\[
(\forall A)(\forall B)(\exists P)(\forall z)((z\in P)\leftrightarrow ((z=A)\vee(z=B)))
\]
\color{black}
  \medskip

\item[(iii)] Power set.

\color{blue}
\[
(\forall A)(\exists P)(\forall z)((z\in P)\leftrightarrow \underline{(z\subseteq A)})
\]

or

\medskip

\[
(\forall A)(\exists P)(\forall z)((z\in P)\leftrightarrow \underline{((\forall w)((w\in z)\to (w\in A))}))
\]

\color{black}
  \medskip

\end{enumerate}
\end{enumerate}  

\vfill

\begin{enumerate}
\item[3.]
  In 1959, Pete Seeger took lines from the
  Book of Ecclesiastes to write a song,
  which was made famous by the Byrds in 1965. One line is:
  \medskip
  
  {\it To every thing there is a season,
    and a time for every purpose under heaven.}
  \medskip

  Write this as a formal sentence using predicates
  $S(s,t)$ = ``$s$ is the season for thing $t$'' and
  $P(T,p)$ = ``$T$ is the time for purpose $p$''.

\end{enumerate}

\color{blue}
\[((\forall t)(\exists s) S(s,t))\wedge ((\forall p)(\exists T) P(T,p))\]
\color{black}

\vfill  


\end{document}
