public static void startupVisualize() {
    { Object old$Module$000 = Stella.$MODULE$.get();
      Object old$Context$000 = Stella.$CONTEXT$.get();

      try {
        Native.setSpecial(Stella.$MODULE$, Stella.getStellaModule("/ONTOSAURUS", Stella.$STARTUP_TIME_PHASE$ > 1));
        Native.setSpecial(Stella.$CONTEXT$, ((Module)(Stella.$MODULE$.get())));
        if (Stella.currentStartupTimePhaseP(2)) {
          _StartupVisualize.helpStartupVisualize1();
        }
        if (Stella.currentStartupTimePhaseP(4)) {
          OntosaurusUtil.$VIZ_EXCLUDED_MODULES$ = List.list(Stella.NIL);
        }
        if (Stella.currentStartupTimePhaseP(5)) {
          { Stella_Class renamed_Class = Stella.defineClassFromStringifiedSource("VIZ-INFO", "(DEFCLASS VIZ-INFO (STANDARD-OBJECT) :DOCUMENTATION \"Encapsulates all the options and local state information needed to\nvisualize a set of concepts as a graph.\" :SLOTS ((STREAM :TYPE OUTPUT-STREAM) (ALLOWED-OBJECTS :TYPE HASH-SET) (SHOW-RELATIONS? :TYPE BOOLEAN :INITIALLY *VIZ-SHOW-RELATIONS?*) (SHOW-ATTRIBUTES? :TYPE BOOLEAN :INITIALLY *VIZ-SHOW-ATTRIBUTES?*) (SHOW-RULES? :TYPE BOOLEAN :INITIALLY *VIZ-SHOW-RULES?*) (ADD-TOP? :TYPE BOOLEAN :INITIALLY *VIZ-ADD-TOP?*) (NODE-COLOR :TYPE STRING :INITIALLY *VIZ-NODE-COLOR*) (RELATION-COLOR :TYPE STRING :INITIALLY *VIZ-RELATION-COLOR*) (RELATION-STYLE :TYPE STRING :INITIALLY *VIZ-RELATION-STYLE*) (FONT-SIZE :TYPE INTEGER :INITIALLY *VIZ-FONT-SIZE*)))");

            renamed_Class.classConstructorCode = Native.find_java_method("edu.isi.ontosaurus.VizInfo", "newVizInfo", new java.lang.Class [] {});
            renamed_Class.classSlotAccessorCode = Native.find_java_method("edu.isi.ontosaurus.VizInfo", "accessVizInfoSlotValue", new java.lang.Class [] {Native.find_java_class("edu.isi.ontosaurus.VizInfo"), Native.find_java_class("edu.isi.stella.Symbol"), Native.find_java_class("edu.isi.stella.Stella_Object"), java.lang.Boolean.TYPE});
          }
        }
        if (Stella.currentStartupTimePhaseP(6)) {
          Stella.finalizeClasses();
        }
        if (Stella.currentStartupTimePhaseP(7)) {
          Stella.defineFunctionObject("VIZ-GET-OBJECT-NAME", "(DEFUN (VIZ-GET-OBJECT-NAME STRING) ((OBJECT OBJECT)))", Native.find_java_method("edu.isi.ontosaurus.OntosaurusUtil", "vizGetObjectName", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Stella_Object")}), null);
          Stella.defineMethodObject("(DEFMETHOD (VIZ-GENERATE-ONTOSAURUS-HANDLE STRING) ((SELF VIZ-INFO) (OBJECT STANDARD-OBJECT)))", Native.find_java_method("edu.isi.ontosaurus.VizInfo", "vizGenerateOntosaurusHandle", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.StandardObject")}), ((java.lang.reflect.Method)(null)));
          Stella.defineMethodObject("(DEFMETHOD (VIZ-GET-BINARY-RELATIONS-OF (CONS OF LOGIC-OBJECT)) ((SELF VIZ-INFO) (CONCEPT LOGIC-OBJECT)))", Native.find_java_method("edu.isi.ontosaurus.VizInfo", "vizGetBinaryRelationsOf", new java.lang.Class [] {Native.find_java_class("edu.isi.powerloom.logic.LogicObject")}), ((java.lang.reflect.Method)(null)));
          Stella.defineFunctionObject("VIZ-DOT-STRING", "(DEFUN (VIZ-DOT-STRING STRING) ((NAME STRING)))", Native.find_java_method("edu.isi.ontosaurus.OntosaurusUtil", "vizDotString", new java.lang.Class [] {Native.find_java_class("java.lang.String")}), null);
          Stella.defineFunctionObject("VIZ-DOT-OBJECT-NAME", "(DEFUN (VIZ-DOT-OBJECT-NAME STRING) ((OBJECT OBJECT)))", Native.find_java_method("edu.isi.ontosaurus.OntosaurusUtil", "vizDotObjectName", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Stella_Object")}), null);
          Stella.defineMethodObject("(DEFMETHOD (VIZ-EXCLUDED-MODULE? BOOLEAN) ((SELF VIZ-INFO) (MODULE MODULE)))", Native.find_java_method("edu.isi.ontosaurus.VizInfo", "vizExcludedModuleP", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Module")}), ((java.lang.reflect.Method)(null)));
          Stella.defineMethodObject("(DEFMETHOD (VIZ-ALLOWED-OBJECT? BOOLEAN) ((SELF VIZ-INFO) (OBJECT OBJECT)))", Native.find_java_method("edu.isi.ontosaurus.VizInfo", "vizAllowedObjectP", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Stella_Object")}), ((java.lang.reflect.Method)(null)));
          Stella.defineMethodObject("(DEFMETHOD VIZ-ALLOW-OBJECT ((SELF VIZ-INFO) (OBJECT OBJECT)))", Native.find_java_method("edu.isi.ontosaurus.VizInfo", "vizAllowObject", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Stella_Object")}), ((java.lang.reflect.Method)(null)));
          Stella.defineMethodObject("(DEFMETHOD VIZ-EXCLUDE-OBJECT ((SELF VIZ-INFO) (OBJECT OBJECT)))", Native.find_java_method("edu.isi.ontosaurus.VizInfo", "vizExcludeObject", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Stella_Object")}), ((java.lang.reflect.Method)(null)));
          Stella.defineMethodObject("(DEFMETHOD VIZ-CONCEPT-TO-DOT-NODE ((SELF VIZ-INFO) (CONCEPT LOGIC-OBJECT) (MODULE MODULE)))", Native.find_java_method("edu.isi.ontosaurus.VizInfo", "vizConceptToDotNode", new java.lang.Class [] {Native.find_java_class("edu.isi.powerloom.logic.LogicObject"), Native.find_java_class("edu.isi.stella.Module")}), ((java.lang.reflect.Method)(null)));
          Stella.defineMethodObject("(DEFMETHOD VIZ-ADD-CONCEPT-ATTRIBUTES-TO-DOT-NODE ((SELF VIZ-INFO) (CONCEPT LOGIC-OBJECT) (MODULE MODULE)))", Native.find_java_method("edu.isi.ontosaurus.VizInfo", "vizAddConceptAttributesToDotNode", new java.lang.Class [] {Native.find_java_class("edu.isi.powerloom.logic.LogicObject"), Native.find_java_class("edu.isi.stella.Module")}), ((java.lang.reflect.Method)(null)));
          Stella.defineMethodObject("(DEFMETHOD VIZ-ADD-CONCEPT-RULES-TO-DOT-NODE ((SELF VIZ-INFO) (CONCEPT LOGIC-OBJECT) (MODULE MODULE)))", Native.find_java_method("edu.isi.ontosaurus.VizInfo", "vizAddConceptRulesToDotNode", new java.lang.Class [] {Native.find_java_class("edu.isi.powerloom.logic.LogicObject"), Native.find_java_class("edu.isi.stella.Module")}), ((java.lang.reflect.Method)(null)));
          Stella.defineMethodObject("(DEFMETHOD VIZ-CONCEPT-LINKS-TO-DOT-EDGES ((SELF VIZ-INFO) (CONCEPT LOGIC-OBJECT) (MODULE MODULE)))", Native.find_java_method("edu.isi.ontosaurus.VizInfo", "vizConceptLinksToDotEdges", new java.lang.Class [] {Native.find_java_class("edu.isi.powerloom.logic.LogicObject"), Native.find_java_class("edu.isi.stella.Module")}), ((java.lang.reflect.Method)(null)));
          Stella.defineMethodObject("(DEFMETHOD VIZ-EXPORT-CONCEPT-TO-DOT ((SELF VIZ-INFO) (CONCEPT LOGIC-OBJECT) (MODULE MODULE)))", Native.find_java_method("edu.isi.ontosaurus.VizInfo", "vizExportConceptToDot", new java.lang.Class [] {Native.find_java_class("edu.isi.powerloom.logic.LogicObject"), Native.find_java_class("edu.isi.stella.Module")}), ((java.lang.reflect.Method)(null)));
          Stella.defineMethodObject("(DEFMETHOD VIZ-EXPORT-DOT-HEADER ((SELF VIZ-INFO)))", Native.find_java_method("edu.isi.ontosaurus.VizInfo", "vizExportDotHeader", new java.lang.Class [] {}), ((java.lang.reflect.Method)(null)));
          Stella.defineMethodObject("(DEFMETHOD VIZ-EXPORT-DOT-TRAILER ((SELF VIZ-INFO)))", Native.find_java_method("edu.isi.ontosaurus.VizInfo", "vizExportDotTrailer", new java.lang.Class [] {}), ((java.lang.reflect.Method)(null)));
          Stella.defineMethodObject("(DEFMETHOD VIZ-EXPORT-CONCEPT ((SELF VIZ-INFO) (CONCEPT LOGIC-OBJECT) (MODULE MODULE)))", Native.find_java_method("edu.isi.ontosaurus.VizInfo", "vizExportConcept", new java.lang.Class [] {Native.find_java_class("edu.isi.powerloom.logic.LogicObject"), Native.find_java_class("edu.isi.stella.Module")}), ((java.lang.reflect.Method)(null)));
          Stella.defineMethodObject("(DEFMETHOD VIZ-EXPORT-CONCEPT-TREE ((SELF VIZ-INFO) (CONCEPT LOGIC-OBJECT) (MODULE MODULE)))", Native.find_java_method("edu.isi.ontosaurus.VizInfo", "vizExportConceptTree", new java.lang.Class [] {Native.find_java_class("edu.isi.powerloom.logic.LogicObject"), Native.find_java_class("edu.isi.stella.Module")}), ((java.lang.reflect.Method)(null)));
          Stella.defineMethodObject("(DEFMETHOD VIZ-EXPORT-CONCEPTS ((SELF VIZ-INFO) (MODULE MODULE)))", Native.find_java_method("edu.isi.ontosaurus.VizInfo", "vizExportConcepts", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Module")}), ((java.lang.reflect.Method)(null)));
          Stella.defineMethodObject("(DEFMETHOD VIZ-EXPORT-MODULE ((SELF VIZ-INFO) (MODULE MODULE)))", Native.find_java_method("edu.isi.ontosaurus.VizInfo", "vizExportModule", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Module")}), ((java.lang.reflect.Method)(null)));
          Stella.defineMethodObject("(DEFMETHOD VIZ-EXPORT-HEADER ((SELF VIZ-INFO)))", Native.find_java_method("edu.isi.ontosaurus.VizInfo", "vizExportHeader", new java.lang.Class [] {}), ((java.lang.reflect.Method)(null)));
          Stella.defineMethodObject("(DEFMETHOD VIZ-EXPORT-TRAILER ((SELF VIZ-INFO)))", Native.find_java_method("edu.isi.ontosaurus.VizInfo", "vizExportTrailer", new java.lang.Class [] {}), ((java.lang.reflect.Method)(null)));
          Stella.defineFunctionObject("VIZ-EXPORT-MODULE-TO-FILE", "(DEFUN VIZ-EXPORT-MODULE-TO-FILE ((MODULE MODULE) (FILE STRING)))", Native.find_java_method("edu.isi.ontosaurus.OntosaurusUtil", "vizExportModuleToFile", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Module"), Native.find_java_class("java.lang.String")}), null);
          Stella.defineFunctionObject("VIZ-EXPORT-CONCEPT-TO-FILE", "(DEFUN VIZ-EXPORT-CONCEPT-TO-FILE ((CONCEPT LOGIC-OBJECT) (MODULE MODULE) (FILE STRING)))", Native.find_java_method("edu.isi.ontosaurus.OntosaurusUtil", "vizExportConceptToFile", new java.lang.Class [] {Native.find_java_class("edu.isi.powerloom.logic.LogicObject"), Native.find_java_class("edu.isi.stella.Module"), Native.find_java_class("java.lang.String")}), null);
          Stella.defineFunctionObject("VIZ-SERVER-AVAILABLE?", "(DEFUN (VIZ-SERVER-AVAILABLE? BOOLEAN) ())", Native.find_java_method("edu.isi.ontosaurus.OntosaurusUtil", "vizServerAvailableP", new java.lang.Class [] {}), null);
          Stella.defineFunctionObject("VIZ-SERVER-EXPORT-MODULE", "(DEFUN VIZ-SERVER-EXPORT-MODULE ((MODULE MODULE) (OUT OUTPUT-STREAM)))", Native.find_java_method("edu.isi.ontosaurus.OntosaurusUtil", "vizServerExportModule", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Module"), Native.find_java_class("edu.isi.stella.OutputStream")}), null);
          Stella.defineFunctionObject("VIZ-SERVER-EXPORT-CONCEPT", "(DEFUN VIZ-SERVER-EXPORT-CONCEPT ((CONCEPT LOGIC-OBJECT) (MODULE MODULE) (OUT OUTPUT-STREAM)))", Native.find_java_method("edu.isi.ontosaurus.OntosaurusUtil", "vizServerExportConcept", new java.lang.Class [] {Native.find_java_class("edu.isi.powerloom.logic.LogicObject"), Native.find_java_class("edu.isi.stella.Module"), Native.find_java_class("edu.isi.stella.OutputStream")}), null);
          Stella.defineFunctionObject("VIZ-SERVER-EXPORT-OBJECT", "(DEFUN (VIZ-SERVER-EXPORT-OBJECT STRING) ((OBJECT OBJECT) (MODULE MODULE)))", Native.find_java_method("edu.isi.ontosaurus.OntosaurusUtil", "vizServerExportObject", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Stella_Object"), Native.find_java_class("edu.isi.stella.Module")}), null);
          Stella.defineFunctionObject("HELP-VIZ-SERVER-EXPORT-OBJECT", "(DEFUN (HELP-VIZ-SERVER-EXPORT-OBJECT STRING) ((OBJECT OBJECT) (MODULE MODULE)))", Native.find_java_method("edu.isi.ontosaurus.OntosaurusUtil", "helpVizServerExportObject", new java.lang.Class [] {Native.find_java_class("edu.isi.stella.Stella_Object"), Native.find_java_class("edu.isi.stella.Module")}), null);
          Stella.defineFunctionObject("VIZ-SERVER-HANDLER", "(DEFUN VIZ-SERVER-HANDLER ((XCHG /HTTP/HTTP-EXCHANGE)))", Native.find_java_method("edu.isi.ontosaurus.OntosaurusUtil", "vizServerHandler", new java.lang.Class [] {Native.find_java_class("edu.isi.webtools.http.HttpExchange")}), null);
          Stella.defineFunctionObject("VIZ-SERVER-SERVE-IMAGE", "(DEFUN VIZ-SERVER-SERVE-IMAGE ((XCHG /HTTP/HTTP-EXCHANGE) (OBJECT OBJECT) (MODULE MODULE)))", Native.find_java_method("edu.isi.ontosaurus.OntosaurusUtil", "vizServerServeImage", new java.lang.Class [] {Native.find_java_class("edu.isi.webtools.http.HttpExchange"), Native.find_java_class("edu.isi.stella.Stella_Object"), Native.find_java_class("edu.isi.stella.Module")}), null);
          Stella.defineFunctionObject("VIZ-SERVER-SERVE-IMAGE-PLUS-MAP", "(DEFUN VIZ-SERVER-SERVE-IMAGE-PLUS-MAP ((XCHG /HTTP/HTTP-EXCHANGE) (OBJECT OBJECT) (MODULE MODULE)))", Native.find_java_method("edu.isi.ontosaurus.OntosaurusUtil", "vizServerServeImagePlusMap", new java.lang.Class [] {Native.find_java_class("edu.isi.webtools.http.HttpExchange"), Native.find_java_class("edu.isi.stella.Stella_Object"), Native.find_java_class("edu.isi.stella.Module")}), null);
          Stella.defineFunctionObject("STARTUP-VISUALIZE", "(DEFUN STARTUP-VISUALIZE () :PUBLIC? TRUE)", Native.find_java_method("edu.isi.ontosaurus._StartupVisualize", "startupVisualize", new java.lang.Class [] {}), null);
          { MethodSlot function = Symbol.lookupFunction(OntosaurusUtil.SYM_ONTOSAURUS_STARTUP_VISUALIZE);

            KeyValueList.setDynamicSlotValue(function.dynamicSlots, OntosaurusUtil.SYM_STELLA_METHOD_STARTUP_CLASSNAME, StringWrapper.wrapString("_StartupVisualize"), Stella.NULL_STRING_WRAPPER);
          }
        }
        if (Stella.currentStartupTimePhaseP(8)) {
          Stella.finalizeSlots();
          Stella.cleanupUnfinalizedClasses();
        }
        if (Stella.currentStartupTimePhaseP(9)) {
          Stella_Object.inModule(((StringWrapper)(Stella_Object.copyConsTree(StringWrapper.wrapString("ONTOSAURUS")))));
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFGLOBAL *VIZ-SHOW-RELATIONS?* BOOLEAN FALSE :DOCUMENTATION \"If true, show binary relations between domain and range concepts as edges.\")");
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFGLOBAL *VIZ-SHOW-ATTRIBUTES?* BOOLEAN FALSE :DOCUMENTATION \"If true, show binary relations as attributes (2nd box in a concept label).\")");
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFGLOBAL *VIZ-SHOW-RULES?* BOOLEAN FALSE :DOCUMENTATION \"If true, show defining rules (3rd box in a concept label).\")");
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFGLOBAL *VIZ-ADD-TOP?* BOOLEAN FALSE :DOCUMENTATION \"If true, put everything under artificial TOP node.\")");
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFGLOBAL *VIZ-NODE-COLOR* STRING \"yellow\")");
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFGLOBAL *VIZ-RELATION-COLOR* STRING \"blue\")");
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFGLOBAL *VIZ-RELATION-STYLE* STRING \"dashed\")");
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFGLOBAL *VIZ-FONT-SIZE* INTEGER 7)");
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFGLOBAL VIZ-TOP STRING \"top\")");
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFGLOBAL VIZ-UNKNOWN STRING \"unknown\")");
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFGLOBAL *VIZ-EXCLUDED-MODULES* (LIST OF MODULE) (LIST) :DOCUMENTATION \"Set of PowerLoom logic modules that shouldn't be visualized.\nBy default this is empty but it could be used to customize the visualizer.\")");
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFGLOBAL *VIZ-DOT-PROGRAM* STRING \"dot\")");
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFGLOBAL *VIZ-SERVER-ENABLED?* BOOLEAN TRUE :DOCUMENTATION \"If true, visualization requests are enabled.\")");
          Stella.defineStellaGlobalVariableFromStringifiedSource("(DEFGLOBAL *VIZ-SERVER-IMAGE-MAPS-ENABLED?* BOOLEAN TRUE :DOCUMENTATION \"If true, visualization images will be linked with a\nclickable image map.\" :PUBLIC? TRUE)");
          try {
            OntosaurusUtil.shellCommand(Cons.cons(StringWrapper.wrapString(OntosaurusUtil.$VIZ_DOT_PROGRAM$), Cons.cons(StringWrapper.wrapString("-V"), Stella.NIL)), Stella.NIL);
          } catch (StellaException e) {
            if (!(Native.stringSearch(Native.stringDowncase(Stella.exceptionMessage(e)), "graphviz", Stella.NULL_INTEGER) != Stella.NULL_INTEGER)) {
              OntosaurusUtil.$VIZ_SERVER_ENABLEDp$ = false;
            }
          }
        }

      } finally {
        Stella.$CONTEXT$.set(old$Context$000);
        Stella.$MODULE$.set(old$Module$000);
      }
    }
  }