\begin{Schunk}
\begin{Sinput}
 cfa.mod2 <- '
  Agency =~ Agency1 + Agency2 + Agency3
  Intrinsic =~ Intrin1 + Intrin2 + Intrin3
  Extrinsic =~ Extrin1 + Extrin2 + Extrin3
  Positive =~ PosAFF1 + PosAFF2 + PosAFF3
  Negative =~ NegAFF1 + NegAFF2 + NegAFF3
  Agency ~~ Intrinsic
  Agency ~~ Extrinsic
  Agency ~~ Positive
  Agency ~~ Negative
  Intrinsic ~~ Extrinsic
  Intrinsic ~~ Positive
  Intrinsic ~~ Negative
  Extrinsic ~~ Positive
  Extrinsic ~~ Negative
  Positive ~~ Negative
  '
\end{Sinput}
\end{Schunk}
