-p//@id=>seq(e "_" e)
-p//@class=>"STANDARD"
-p//@mtype=>"PRT"
-p//@seqlen=>u

-p//AC=>or(seq("P" u) seq("Q" u) seq("O" u))

-p//(@date|@Rel)=>or(u8 seqcomb(u8(2) "-" e "-" u))
-p//@type=>e

-p//Entry/Descr=>rep(" " e)
-p//Species=>e
-p//Org=>e

-p//@num=>u8
-p//@pos=>e
-p//Comment=>seq(e "=" e)
-p//DB=>"MEDLINE"
-p//MedlineID=>u
-p//Author=>seq(e " " e)
-p//Cite=>or(seq("Submitted (" e "-" e ") to the EMBL/GenBank/DDBJ databases")             seq("Submitted (" e "-" e ") to the SWISS-PROT data bank")             seq("Submitted (" e "-" e ") to the PDB data bank")             rep(" " e seq(u ":" u "-" u "(" e ")")))
             
-p//#/@prim_id=>t
-p//#/@sec_id=>t
-p//Keyword=>e
-p//(@from|@to)=>or("?" di seq("?" u))
-p//#/Descr=>t
