<> <> <> <> <<>> Install Core Run -a TestCoreIO _ &ct _ TestCoreIO.NAnd[3] _ CoreIO.ReportSaveCellType[&ct] _ &nct _ CoreIO.RestoreCellType["NAnd"] _ CoreOps.Print[&nct] _ CoreOps.Print[CoreOps.Recast[&nct]] _ &nct _ CoreIO.RestoreCellType["NAnd"] _ CoreIO.ReportSaveCellType[&nct, "NNAnd.core"] _ &nnct _ CoreIO.RestoreCellType["NNAnd"] _ CoreOps.Print[&nnct] _ CoreOps.Print[CoreOps.Recast[&nnct]] _ &uct _ CoreClasses.CreateUnspecified[CoreCreate.Wires["a", "b", "c"], "Unspecified", CoreProperties.Props[[$Real, NEW [REAL _ 1.2]], [$Atom, $foo], [$Bool, NEW [BOOL _ TRUE]], [$Rope, "roooope"]]] _ CoreOps.Print[&uct] _ CoreIO.ReportSaveCellType[&uct] _ &nuct _ CoreIO.RestoreCellType["Unspecified"] _ CoreOps.Print[&nuct] _ CoreOps.Print[CoreOps.Recast[&nuct]] _ &lib _ SymTab.Create[] _ SymTab.Store[&lib, "foo", TestCoreIO.NAnd[3]] _ SymTab.Store[&lib, "bar", TestCoreIO.NAnd[2]] _ CoreIO.SaveLibrary[&lib, "TestCoreIO"] _ &lib _ CoreIO.RestoreLibrary["TestCoreIO"] _ &foo _ SymTab.Fetch[&lib, "foo"].val _ &bar _ SymTab.Fetch[&lib, "bar"].val _ IF &foo=NIL OR &bar=NIL THEN ERROR ELSE NIL