28 lines
1.1 KiB
C
28 lines
1.1 KiB
C
{
|
|
|
|
// reduced temperature table
|
|
Double_t tt[] = {1, 0.98, 0.96, 0.94, 0.92, 0.9, 0.88, 0.86, 0.84, 0.82,
|
|
0.8, 0.78, 0.76, 0.74, 0.72, 0.7, 0.68, 0.66, 0.64, 0.62,
|
|
0.6, 0.58, 0.56, 0.54, 0.52, 0.5, 0.48, 0.46, 0.44, 0.42,
|
|
0.4, 0.38, 0.36, 0.34, 0.32, 0.3, 0.28, 0.26, 0.24, 0.22,
|
|
0.2, 0.18, 0.16, 0.14};
|
|
|
|
// gap table from Muehlschlegel
|
|
Double_t ee[] = {0, 0.2436, 0.3416, 0.4148, 0.4749, 0.5263, 0.5715, 0.6117,
|
|
0.648, 0.681, 0.711, 0.7386, 0.764, 0.7874, 0.8089, 0.8288,
|
|
0.8471, 0.864, 0.8796, 0.8939, 0.907, 0.919, 0.9299, 0.9399,
|
|
0.9488, 0.9569, 0.9641, 0.9704, 0.976, 0.9809, 0.985, 0.9885,
|
|
0.9915, 0.9938, 0.9957, 0.9971, 0.9982, 0.9989, 0.9994, 0.9997,
|
|
0.9999, 1, 1, 1, 1};
|
|
|
|
TF1 *userFunc = new TF1("User Func", "[0]*pow(1.0-pow(x,[1]),[2])", 0.0, 1.0);
|
|
userFunc->SetParName(0, "A");
|
|
userFunc->SetParName(1, "p1");
|
|
userFunc->SetParName(2, "p2");
|
|
|
|
userFunc->SetParameters(1.0, 2.0, 0.5);
|
|
|
|
TGraph *gr = new TGraph(45, tt, ee);
|
|
gr->Draw("ap");
|
|
}
|