(if
      (>(strlen n)6)
      (or
        (and
          (or
          (=(substr n 1 1)"G")
          (=(substr n 1 1)"C")
          (=(substr n 1 1)"L")
          (=(substr n 1 1)"A")
          (=(substr n 1 1)"S")
          (=(substr n 1 1)"M")
          (=(substr n 1 1)"P")
          (=(substr n 1 1)"F")
          (=(substr n 1 1)"E")
          );or
          (or
          (=(substr n 2 1)"-")
          (=(substr n 2 1)"C")
          (=(substr n 2 1)"N")
          (=(substr n 2 1)"D")
          (=(substr n 2 1)"T")
          (=(substr n 2 1)"V")
          (=(substr n 2 1)"H")
          (=(substr n 2 1)"P")
          (=(substr n 2 1)"S")
          );or
          (or
          (=(substr n 7 1)"1")
          (=(substr n 7 1)"2")
          (=(substr n 7 1)"3")
          (=(substr n 7 1)"4")
          (=(substr n 7 1)"5")
          (=(substr n 7 1)"6")
          (=(substr n 7 1)"7")
          (=(substr n 7 1)"8")
          (=(substr n 7 1)"9")
          (=(substr n 7 1)"A")
          (=(substr n 7 1)"B")
          (=(substr n 7 1)"C")
          (=(substr n 7 1)"D")
          (=(substr n 7 1)"E")
          (=(substr n 7 1)"F")
          );or
        );and
        (and
          (not(=(cdr(assoc 70(tblsearch "layer" n)))16))
          (not(=(cdr(assoc 70(tblsearch "layer" n)))32))
          (not(=(cdr(assoc 70(tblsearch "layer" n)))48))
        );and
      );or
      nil
      );if