public static Cons clYieldMethodParameterTypeDeclarationTrees(MethodSlot method) {
    { Cons types = Stella.NIL;
      Symbol cltype = null;

      { StandardObject tspec = null;
        Cons iter000 = method.methodParameterTypeSpecifiers().theConsList;
        Symbol pname = null;
        Cons iter001 = method.methodParameterNames().theConsList;

        for (;(!(iter000 == Stella.NIL)) &&
                  (!(iter001 == Stella.NIL)); iter000 = iter000.rest, iter001 = iter001.rest) {
          tspec = ((StandardObject)(iter000.value));
          pname = ((Symbol)(iter001.value));
          cltype = ((Symbol)(StandardObject.lookupClTypeFromStellaType(StandardObject.computeRelativeTypeSpec(tspec, method.slotOwner))));
          if (cltype != null) {
            types = Cons.cons(Cons.list$(Cons.cons(Stella.internCommonLispSymbol("TYPE"), Cons.cons(cltype, Cons.cons(Cons.cons(Symbol.clTranslateLocalSymbol(pname), Stella.NIL), Stella.NIL)))), types);
          }
        }
      }
      return (types.reverse());
    }
  }