Logo ROOT  
Reference Guide
mnlsame.cxx
Go to the documentation of this file.
1 // @(#)root/minuit2:$Id$
2 // Authors: M. Winkler, F. James, L. Moneta, A. Zsenei 2003-2005
3 
4 /**********************************************************************
5  * *
6  * Copyright (c) 2005 LCG ROOT Math team, CERN/PH-SFT *
7  * *
8  **********************************************************************/
9 
10 /* lsame.f -- translated by f2c (version 20010320).
11  You must link the resulting object file with the libraries:
12  -lf2c -lm (in that order)
13 */
14 
15 #include <cstring>
16 
17 namespace ROOT {
18 
19 namespace Minuit2 {
20 
21 bool mnlsame(const char *ca, const char *cb)
22 {
23  /* System generated locals */
24  bool ret_val = false;
25 
26  /* Local variables */
27  // integer inta, intb, zcode;
28 
29  /* -- LAPACK auxiliary routine (version 2.0) -- */
30  /* Univ. of Tennessee, Univ. of California Berkeley, NAG Ltd., */
31  /* Courant Institute, Argonne National Lab, and Rice University */
32  /* January 31, 1994 */
33 
34  /* .. Scalar Arguments .. */
35  /* .. */
36 
37  /* Purpose */
38  /* ======= */
39 
40  /* LSAME returns .TRUE. if CA is the same letter as CB regardless of */
41  /* case. */
42 
43  /* Arguments */
44  /* ========= */
45 
46  /* CA (input) CHARACTER*1 */
47  /* CB (input) CHARACTER*1 */
48  /* CA and CB specify the single characters to be compared. */
49 
50  /* ===================================================================== */
51 
52  /* .. Intrinsic Functions .. */
53  /* .. */
54  /* .. Local Scalars .. */
55  /* .. */
56  /* .. Executable Statements .. */
57 
58  /* Test if the characters are equal */
59 
60  int comp = std::strcmp(ca, cb);
61  if (comp == 0)
62  ret_val = true;
63 
64  return ret_val;
65 } /* lsame_ */
66 
67 } // namespace Minuit2
68 
69 } // namespace ROOT
ROOT::Minuit2::mnlsame
bool mnlsame(const char *, const char *)
Definition: mnlsame.cxx:21
ROOT
tbb::task_arena is an alias of tbb::interface7::task_arena, which doesn't allow to forward declare tb...
Definition: EExecutionPolicy.hxx:4