signature {
propositions { p }
nominals { n,m }
relations { s : {symmetric} }
}

theory

{
 n:<s><s><s>m;
 n:p;
 m:[s][s][s]!p

}