<!ELEMENT corpus - - (ext+)>
<!ELEMENT ext - - ((p|s)+)>
  <!ATTLIST ext
     id CDATA #REQUIRED 
     sec (nd|soc|pol|eco|des|com|opi|clt-soc|vei|agr) #REQUIRED
     sem (94a|94b) #REQUIRED
  >
<!ELEMENT p - - (s+)>
<!ELEMENT s - - ((#PCDATA|t|a|li|caixa|situacao)+) >
  <!ATTLIST s
     tipo CDATA #IMPLIED >
<!ELEMENT li - - (#PCDATA) >
<!ELEMENT t - - (#PCDATA) >
<!ELEMENT a - - (#PCDATA) >
<!ELEMENT caixa - - (#PCDATA) >
<!ELEMENT situacao - - (#PCDATA) >

<!ENTITY amp CDATA "&#38" -- ampersand		-->