Документ взят из кэша поисковой машины. Адрес оригинального документа : http://theory.sinp.msu.ru/~smirnov/Box4.nb Дата изменения: Wed Nov 5 18:07:06 2008 Дата индексирования: Tue Jan 13 18:25:25 2009 Кодировка:

(* Content-type: application/mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 6.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 145, 7]
NotebookDataLength[ 17728, 553]
NotebookOptionsPosition[ 15864, 492]
NotebookOutlinePosition[ 16207, 507]
CellTagsIndexPosition[ 16164, 504]
WindowFrame->Normal
ContainsDynamic->False*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"<<", "MB/MB.m"}], "\"\<;\n<\""}], ";"}]], "Input",\

CellChangeTimes->{{3.433564654484375*^9, 3.4335646668125*^9}, {
3.434627561625*^9, 3.434627563359375*^9}, {3.43462761103125*^9,
3.43462763440625*^9}, {3.434885015671875*^9, 3.434885036515625*^9}}],

Cell[CellGroupData[{

Cell[BoxData["\<\"MB 1.1\"\>"], "Print",
CellChangeTimes->{{3.434627635578125*^9, 3.434627648234375*^9},
3.434632709578125*^9}],

Cell[BoxData["\<\"by Michal Czakon\"\>"], "Print",
CellChangeTimes->{{3.434627635578125*^9, 3.434627648234375*^9},
3.434632709625*^9}],

Cell[BoxData["\<\"more info in hep-ph/0511200\"\>"], "Print",
CellChangeTimes->{{3.434627635578125*^9, 3.434627648234375*^9},
3.434632709734375*^9}],

Cell[BoxData["\<\"last modified 06 Mar 08\"\>"], "Print",
CellChangeTimes->{{3.434627635578125*^9, 3.434627648234375*^9},
3.4346327098125*^9}],

Cell[BoxData["\<\"MBresolve 1.0\"\>"], "Print",
CellChangeTimes->{{3.434627635578125*^9, 3.434627648234375*^9},
3.4346327100625*^9}],

Cell[BoxData["\<\"by Alexander Smirnov\"\>"], "Print",
CellChangeTimes->{{3.434627635578125*^9, 3.434627648234375*^9},
3.434632710140625*^9}],

Cell[BoxData["\<\"last modified 22 Oct 08\"\>"], "Print",
CellChangeTimes->{{3.434627635578125*^9, 3.434627648234375*^9},
3.43463271021875*^9}]
}, Open ]]
}, Open ]],

Cell[BoxData[
RowBox[{
RowBox[{"F1", "=",
RowBox[{
RowBox[{"-",
RowBox[{"(",
RowBox[{
SuperscriptBox["S",
RowBox[{
RowBox[{"-", "5"}], "-",
RowBox[{"4", " ", "ep"}], "-", "z7"}]], " ",
SuperscriptBox["T", "z7"], " ",
RowBox[{"Gamma", "[",
RowBox[{"1", "+", "z1"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{
RowBox[{"-", "1"}], "-", "ep", "-", "z1", "-", "z2"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{"-", "z2"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{
RowBox[{"-", "1"}], "-", "ep", "-", "z1", "-", "z3"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{"-", "z3"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{"1", "+", "z1", "+", "z2", "+", "z3"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{"2", "+", "ep", "+", "z1", "+", "z2", "+", "z3"}], "]"}], " ",

RowBox[{"Gamma", "[",
RowBox[{"z10", "-", "z4"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{
RowBox[{"-", "z1"}], "+", "z4"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{
RowBox[{"-", "ep"}], "+", "z1", "+", "z2", "-", "z4", "-", "z5"}],
"]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{"-", "z5"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{
RowBox[{"-", "ep"}], "+", "z1", "+", "z3", "-", "z4", "-", "z6"}],
"]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{"-", "z6"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{"1", "+", "z4", "+", "z5", "+", "z6"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{
"1", "+", "ep", "-", "z1", "-", "z2", "-", "z3", "+", "z4", "+", "z5",
"+", "z6"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{"-", "z7"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{"1", "+", "z7"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{
RowBox[{"-", "z10"}], "+", "z7"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{
RowBox[{"-", "ep"}], "-", "z10", "+", "z4", "+", "z5", "-", "z8"}],
"]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{"-", "z8"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{
RowBox[{"-", "ep"}], "+", "z10", "-", "z7", "+", "z8"}], "]"}], " ",

RowBox[{"Gamma", "[",
RowBox[{
RowBox[{"-", "ep"}], "-", "z10", "+", "z4", "+", "z6", "-", "z9"}],
"]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{"1", "+", "ep", "-", "z10", "+", "z7", "-", "z8", "-", "z9"}],
"]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{"-", "z9"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{
RowBox[{"-", "ep"}], "+", "z10", "-", "z7", "+", "z9"}], "]"}], " ",

RowBox[{"Gamma", "[",
RowBox[{"1", "+", "z10", "+", "z8", "+", "z9"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{
"1", "+", "ep", "+", "z10", "-", "z4", "-", "z5", "-", "z6", "+",
"z8", "+", "z9"}], "]"}]}], ")"}]}], "/",
RowBox[{"(",
RowBox[{
RowBox[{"Gamma", "[",
RowBox[{
RowBox[{"-", "2"}], " ", "ep"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{"1", "-", "z2"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{"1", "-", "z3"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{"1", "-",
RowBox[{"2", " ", "ep"}], "+", "z1", "+", "z2", "+", "z3"}], "]"}],
" ",
RowBox[{"Gamma", "[",
RowBox[{"1", "-", "z5"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{"1", "-", "z6"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{"1", "-",
RowBox[{"2", " ", "ep"}], "+", "z4", "+", "z5", "+", "z6"}], "]"}],
" ",
RowBox[{"Gamma", "[",
RowBox[{"1", "-", "z8"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{"1", "-", "z9"}], "]"}], " ",
RowBox[{"Gamma", "[",
RowBox[{"1", "-",
RowBox[{"2", " ", "ep"}], "+", "z10", "+", "z8", "+", "z9"}], "]"}]}],
")"}]}]}], ";"}]], "Input",
CellChangeTimes->{{3.433509215375*^9, 3.433509218140625*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
RowBox[{"F1cont", "=",
RowBox[{"MBresolve", "[",
RowBox[{"F1", ",", "ep"}], "]"}]}]], "Input",
CellChangeTimes->{{3.434627665765625*^9, 3.4346276790625*^9}}],

Cell["\<\
CREATING RESIDUES LIST..........654.3281 seconds
EVALUATING RESIDUES..........16.9375 seconds\
\>", "Print",
CellChangeTimes->{3.434627679609375*^9}]
}, Open ]],

Cell[CellGroupData[{

Cell[BoxData[
RowBox[{"Length", "[", "F1cont", "]"}]], "Input"],

Cell[BoxData["656"], "Output",
CellChangeTimes->{3.434628353765625*^9}]
}, Open ]],

Cell[BoxData[
RowBox[{"F1exp", "=",
RowBox[{
RowBox[{"MBexpand", "[",
RowBox[{"F1select", ",",
RowBox[{"E", "^",
RowBox[{"(",
RowBox[{"4", "EulerGamma", " ", "ep"}], ")"}]}], ",",
RowBox[{"{",
RowBox[{"ep", ",", "0", ",", "0"}], "}"}]}], "]"}], "//",
"Timing"}]}]], "Input",
CellChangeTimes->{{3.43462868784375*^9, 3.4346286941875*^9}}],

Cell[BoxData["\[IndentingNewLine]"], "Input",
CellChangeTimes->{3.4346285943125*^9}],

Cell[CellGroupData[{

Cell[BoxData[
RowBox[{" ",
RowBox[{"F1rules", "=",
RowBox[{"MBoptimizedRules", "[",
RowBox[{"F1", ",",
RowBox[{"ep", "\[Rule]", "0"}], ",",
RowBox[{"{", "}"}], ",",
RowBox[{"{", "ep", "}"}]}], "]"}], " "}]}]], "Input",
CellChangeTimes->{{3.433513947234375*^9, 3.43351395346875*^9}}],

Cell[BoxData[
RowBox[{
RowBox[{"MBresidues", "::", "\<\"contour\"\>"}],
RowBox[{
":", " "}], "\<\"contour starts and/or ends on a pole of \
Gamma[\\!\\(\\(\\(-ep\\)\\) + z1 + z3 - z4 - z6\\)]\"\>"}]], "Message", "MSG",

CellChangeTimes->{3.43351395540625*^9}],

Cell[BoxData[
RowBox[{
RowBox[{"MBresidues", "::", "\<\"contour\"\>"}],
RowBox[{
":", " "}], "\<\"contour starts and/or ends on a pole of \
Gamma[\\!\\(\\(\\(-1\\)\\) - ep - z1 - z3\\)]\"\>"}]], "Message", "MSG",
CellChangeTimes->{3.43351395584375*^9}],

Cell[BoxData[
RowBox[{
RowBox[{"MBrules", "::", "\<\"norules\"\>"}],
RowBox[{
":", " "}], "\<\"no rules could be found to regulate this integral\"\>"}]], \
"Message", "MSG",
CellChangeTimes->{3.433514133109375*^9}],

Cell[BoxData[
RowBox[{
RowBox[{"MBrules", "::", "\<\"norules\"\>"}],
RowBox[{
":", " "}], "\<\"no rules could be found to regulate this integral\"\>"}]], \
"Message", "MSG",
CellChangeTimes->{3.4335141333125*^9}],

Cell[BoxData[
RowBox[{
RowBox[{"MBrules", "::", "\<\"norules\"\>"}],
RowBox[{
":", " "}], "\<\"no rules could be found to regulate this integral\"\>"}]], \
"Message", "MSG",
CellChangeTimes->{3.433514134296875*^9}],

Cell[BoxData[
RowBox[{
RowBox[{"General", "::", "\<\"stop\"\>"}],
RowBox[{
":", " "}], "\<\"Further output of \\!\\(MBrules :: \\\"norules\\\"\\) will \
be suppressed during this calculation. \
\\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \
ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/stop\\\", \
ButtonNote -> \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG",
CellChangeTimes->{3.433514134453125*^9}],

Cell[BoxData[
RowBox[{
RowBox[{"MBresidues", "::", "\<\"contour\"\>"}],
RowBox[{
":", " "}], "\<\"contour starts and/or ends on a pole of \
Gamma[\\!\\(\\(\\(-1\\)\\) - \\(\\(2\\\\ ep\\)\\) - z4 - z5\\)]\"\>"}]], \
"Message", "MSG",
CellChangeTimes->{3.4335141549375*^9}],

Cell[BoxData[
RowBox[{
RowBox[{"General", "::", "\<\"stop\"\>"}],
RowBox[{
":", " "}], "\<\"Further output of \\!\\(MBresidues :: \\\"contour\\\"\\) \
will be suppressed during this calculation. \\!\\(\\*ButtonBox[\\\"\
\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \
\\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG",
CellChangeTimes->{3.43351415496875*^9}],

Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"ep", "\[Rule]",
RowBox[{"-",
FractionBox["71", "80"]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"z1", "\[Rule]",
RowBox[{"-",
FractionBox["2179", "3840"]}]}], ",",
RowBox[{"z10", "\[Rule]",
RowBox[{"-",
FractionBox["2053", "3840"]}]}], ",",
RowBox[{"z2", "\[Rule]",
RowBox[{"-",
FractionBox["173", "3840"]}]}], ",",
RowBox[{"z3", "\[Rule]",
RowBox[{"-",
FractionBox["1", "4"]}]}], ",",
RowBox[{"z4", "\[Rule]",
RowBox[{"-",
FractionBox["2149", "3840"]}]}], ",",
RowBox[{"z5", "\[Rule]",
RowBox[{"-",
FractionBox["419", "3840"]}]}], ",",
RowBox[{"z6", "\[Rule]",
RowBox[{"-",
FractionBox["191", "640"]}]}], ",",
RowBox[{"z7", "\[Rule]",
RowBox[{"-",
FractionBox["371", "1280"]}]}], ",",
RowBox[{"z8", "\[Rule]",
RowBox[{"-",
FractionBox["53", "384"]}]}], ",",
RowBox[{"z9", "\[Rule]",
RowBox[{"-",
FractionBox["833", "2560"]}]}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.433514322421875*^9}]
}, Closed]],

Cell[CellGroupData[{

Cell[BoxData[
RowBox[{" ",
RowBox[{"F1rules", "=",
RowBox[{"MBcorrectContours", "[", " ",
RowBox[{
RowBox[{"MBoptimizedRules", "[",
RowBox[{"F1", ",",
RowBox[{"ep", "\[Rule]", "0"}], ",",
RowBox[{"{", "}"}], ",",
RowBox[{"{", "ep", "}"}]}], "]"}], " ", ",", "10000"}],
"]"}]}]}]], "Input",
CellChangeTimes->{{3.433516869640625*^9, 3.433516872234375*^9},
3.434632689109375*^9}],

Cell[BoxData[
RowBox[{
RowBox[{"MBresidues", "::", "\<\"contour\"\>"}],
RowBox[{
":", " "}], "\<\"contour starts and/or ends on a pole of \
Gamma[\\!\\(\\(\\(-ep\\)\\) + z1 + z3 - z4 - z6\\)]\"\>"}]], "Message", "MSG",

CellChangeTimes->{3.434632719125*^9}],

Cell[BoxData[
RowBox[{
RowBox[{"MBresidues", "::", "\<\"contour\"\>"}],
RowBox[{
":", " "}], "\<\"contour starts and/or ends on a pole of \
Gamma[\\!\\(\\(\\(-1\\)\\) - ep - z1 - z3\\)]\"\>"}]], "Message", "MSG",
CellChangeTimes->{3.434632719375*^9}],

Cell[BoxData[
RowBox[{
RowBox[{"MBrules", "::", "\<\"norules\"\>"}],
RowBox[{
":", " "}], "\<\"no rules could be found to regulate this integral\"\>"}]], \
"Message", "MSG",
CellChangeTimes->{3.434632831625*^9}],

Cell[BoxData[
RowBox[{
RowBox[{"MBrules", "::", "\<\"norules\"\>"}],
RowBox[{
":", " "}], "\<\"no rules could be found to regulate this integral\"\>"}]], \
"Message", "MSG",
CellChangeTimes->{3.434632831734375*^9}],

Cell[BoxData[
RowBox[{
RowBox[{"MBrules", "::", "\<\"norules\"\>"}],
RowBox[{
":", " "}], "\<\"no rules could be found to regulate this integral\"\>"}]], \
"Message", "MSG",
CellChangeTimes->{3.434632832203125*^9}],

Cell[BoxData[
RowBox[{
RowBox[{"General", "::", "\<\"stop\"\>"}],
RowBox[{
":", " "}], "\<\"Further output of \\!\\(MBrules :: \\\"norules\\\"\\) will \
be suppressed during this calculation. \
\\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \
ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/stop\\\", \
ButtonNote -> \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG",
CellChangeTimes->{3.43463283240625*^9}],

Cell[BoxData[
RowBox[{
RowBox[{"MBresidues", "::", "\<\"contour\"\>"}],
RowBox[{
":", " "}], "\<\"contour starts and/or ends on a pole of \
Gamma[\\!\\(\\(\\(-1\\)\\) - \\(\\(2\\\\ ep\\)\\) - z4 - z5\\)]\"\>"}]], \
"Message", "MSG",
CellChangeTimes->{3.43463284203125*^9}],

Cell[BoxData[
RowBox[{
RowBox[{"General", "::", "\<\"stop\"\>"}],
RowBox[{
":", " "}], "\<\"Further output of \\!\\(MBresidues :: \\\"contour\\\"\\) \
will be suppressed during this calculation. \\!\\(\\*ButtonBox[\\\"\
\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \
\\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG",
CellChangeTimes->{3.434632842125*^9}],

Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"ep", "\[Rule]",
RowBox[{"-",
FractionBox["71", "80"]}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"z1", "\[Rule]",
RowBox[{"-",
FractionBox["228200651", "402159360"]}]}], ",",
RowBox[{"z10", "\[Rule]",
RowBox[{"-",
FractionBox["215033539", "402213120"]}]}], ",",
RowBox[{"z2", "\[Rule]",
RowBox[{"-",
FractionBox["18119467", "402274560"]}]}], ",",
RowBox[{"z3", "\[Rule]",
RowBox[{"-",
FractionBox["104757", "419044"]}]}], ",",
RowBox[{"z4", "\[Rule]",
RowBox[{"-",
FractionBox["225153337", "402328320"]}]}], ",",
RowBox[{"z5", "\[Rule]",
RowBox[{"-",
FractionBox["43898561", "402351360"]}]}], ",",
RowBox[{"z6", "\[Rule]",
RowBox[{"-",
FractionBox["20014059", "67064960"]}]}], ",",
RowBox[{"z7", "\[Rule]",
RowBox[{"-",
FractionBox["38879891", "134145280"]}]}], ",",
RowBox[{"z8", "\[Rule]",
RowBox[{"-",
FractionBox["5554175", "40244352"]}]}], ",",
RowBox[{"z9", "\[Rule]",
RowBox[{"-",
FractionBox["87318331", "268357120"]}]}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.43463294946875*^9}]
}, Closed]],

Cell[BoxData[
RowBox[{" ",
RowBox[{"M1cont", "=",
RowBox[{"MBcontinue", "[",
RowBox[{"F1", ",",
RowBox[{"ep", "\[Rule]", "0"}], ",", "F1rules"}], "]"}]}]}]], "Input"],

Cell[BoxData[
InterpretationBox[
RowBox[{"2200", "\[InvisibleSpace]", "\"\< integral(s) found\>\""}],
SequenceForm[2200, " integral(s) found"],
Editable->False]], "Input"]
},
WindowSize->{692, 720},
WindowMargins->{{Automatic, 213}, {Automatic, 44}},
FrontEndVersion->"6.0 for Microsoft Windows (32-bit) (April 28, 2007)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[590, 23, 319, 7, 52, "Input"],
Cell[CellGroupData[{
Cell[934, 34, 132, 2, 23, "Print"],
Cell[1069, 38, 139, 2, 23, "Print"],
Cell[1211, 42, 153, 2, 23, "Print"],
Cell[1367, 46, 147, 2, 23, "Print"],
Cell[1517, 50, 137, 2, 23, "Print"],
Cell[1657, 54, 146, 2, 23, "Print"],
Cell[1806, 58, 148, 2, 23, "Print"]
}, Open ]]
}, Open ]],
Cell[1981, 64, 4309, 117, 258, "Input"],
Cell[CellGroupData[{
Cell[6315, 185, 180, 4, 31, "Input"],
Cell[6498, 191, 160, 4, 39, "Print"]
}, Open ]],
Cell[CellGroupData[{
Cell[6695, 200, 64, 1, 31, "Input"],
Cell[6762, 203, 72, 1, 30, "Output"]
}, Open ]],
Cell[6849, 207, 387, 11, 31, "Input"],
Cell[7239, 220, 85, 1, 52, "Input"],
Cell[CellGroupData[{
Cell[7349, 225, 314, 8, 31, "Input"],
Cell[7666, 235, 269, 7, 21, "Message"],
Cell[7938, 244, 261, 6, 21, "Message"],
Cell[8202, 252, 223, 6, 21, "Message"],
Cell[8428, 260, 221, 6, 21, "Message"],
Cell[8652, 268, 223, 6, 21, "Message"],
Cell[8878, 276, 458, 9, 21, "Message"],
Cell[9339, 287, 280, 7, 21, "Message"],
Cell[9622, 296, 460, 9, 21, "Message"],
Cell[10085, 307, 1204, 39, 79, "Output"]
}, Closed]],
Cell[CellGroupData[{
Cell[11326, 351, 435, 12, 25, "Input"],
Cell[11764, 365, 267, 7, 21, "Message"],
Cell[12034, 374, 259, 6, 21, "Message"],
Cell[12296, 382, 220, 6, 21, "Message"],
Cell[12519, 390, 223, 6, 21, "Message"],
Cell[12745, 398, 223, 6, 21, "Message"],
Cell[12971, 406, 457, 9, 21, "Message"],
Cell[13431, 417, 281, 7, 21, "Message"],
Cell[13715, 426, 458, 9, 21, "Message"],
Cell[14176, 437, 1303, 39, 113, "Output"]
}, Closed]],
Cell[15494, 479, 185, 5, 25, "Input"],
Cell[15682, 486, 178, 4, 31, "Input"]
}
]
*)

(* End of internal cache information *)