Changeset 1091 in Sophya for trunk/SophyaPI/PIext/basexecut.cc

Timestamp:

Jul 26, 2000, 3:15:43 PM (25 years ago)

Author:

ercodmgr

Message:

Histos/Hprof/Histo2D en r_8 cmv 26/7/00

File:

• trunk/SophyaPI/PIext/basexecut.cc (modified) (4 diffs)

trunk/SophyaPI/PIext/basexecut.cc

@@ -210 +210 @@
 else if (kw == "newh1d") {
   if (tokens.size() < 4) { cout << "Usage: newh1d name xmin xmax nbin" << endl; return(0); }
-  int nbx;
-  float xmin, xmax;
-  nbx = 100;
-  xmin = 0.;  xmax = 1.;
+  int_4 nbx = 100;
+  r_8 xmin = 0., xmax = 1.;
   nbx = atoi(tokens[3].c_str());
   xmin = atof(tokens[1].c_str());   xmax = atof(tokens[2].c_str());
@@ -224 +222 @@
     return(0); 
     }
-  int nbx, nby;
-  float xmin, xmax;
-  float ymin, ymax;
-  nbx = nby = 50;
-  xmin = 0.;  xmax = 1.;
-  ymin = 0.;  ymax = 1.;
+  int_4 nbx = 50, nby = 50;
+  r_8 xmin = 0., xmax = 1.;
+  r_8 ymin = 0., ymax = 1.;
   nbx = atoi(tokens[3].c_str());
   nby = atoi(tokens[6].c_str());
@@ -240 +235 @@
   if (tokens.size() < 4)
     { cout << "Usage: newprof[e] name xmin xmax nbin [ymin ymax]" << endl; return(0); }
-  int nbx;
-  float xmin, xmax, ymin = 1., ymax = -1.;
+  int_4 nbx = 100;
+  r_8 xmin = 0., xmax = 1., ymin = 1., ymax = -1.;
   if(tokens.size() > 5)
     {ymin = atof(tokens[4].c_str());   ymax = atof(tokens[5].c_str());}
-  nbx = 100;
-  xmin = 0.;  xmax = 1.;
   nbx = atoi(tokens[3].c_str());
   xmin = atof(tokens[1].c_str());   xmax = atof(tokens[2].c_str());
@@ -546 +539 @@
   while (tokens.size() < 8) tokens.push_back("");
   srvo->ProjectHProf(tokens[1], tokens[2], tokens[3], tokens[4], tokens[5], tokens[0],
-                    tokens[6], tokens[7] );
+                     tokens[6], tokens[7] );
   }