Gabriele Cosmo
129 lines
3.9 KiB
C++
129 lines
3.9 KiB
C++
//
|
|
// ********************************************************************
|
|
// * DISCLAIMER *
|
|
// * *
|
|
// * The following disclaimer summarizes all the specific disclaimers *
|
|
// * of contributors to this software. The specific disclaimers,which *
|
|
// * govern, are listed with their locations in: *
|
|
// * http://cern.ch/geant4/license *
|
|
// * *
|
|
// * Neither the authors of this software system, nor their employing *
|
|
// * institutes,nor the agencies providing financial support for this *
|
|
// * work make any representation or warranty, express or implied, *
|
|
// * regarding this software system or assume any liability for its *
|
|
// * use. *
|
|
// * *
|
|
// * This code implementation is the intellectual property of the *
|
|
// * GEANT4 collaboration. *
|
|
// * By copying, distributing or modifying the Program (or any work *
|
|
// * based on the Program) you indicate your acceptance of this *
|
|
// * statement, and all its terms. *
|
|
// ********************************************************************
|
|
//
|
|
//
|
|
// $Id: G4UIcmdWithADoubleAndUnit.cc,v 1.3 2001/07/11 10:01:16 gunter Exp $
|
|
// GEANT4 tag $Name: geant4-04-00 $
|
|
//
|
|
//
|
|
|
|
#include "G4UIcmdWithADoubleAndUnit.hh"
|
|
#include "g4std/strstream"
|
|
|
|
G4UIcmdWithADoubleAndUnit::G4UIcmdWithADoubleAndUnit
|
|
(const char * theCommandPath,G4UImessenger * theMessenger)
|
|
:G4UIcommand(theCommandPath,theMessenger)
|
|
{
|
|
G4UIparameter * dblParam = new G4UIparameter('d');
|
|
SetParameter(dblParam);
|
|
G4UIparameter * untParam = new G4UIparameter('s');
|
|
SetParameter(untParam);
|
|
untParam->SetParameterName("Unit");
|
|
}
|
|
|
|
G4double G4UIcmdWithADoubleAndUnit::GetNewDoubleValue(G4String paramString)
|
|
{
|
|
G4double vl;
|
|
char unts[30];
|
|
|
|
const char* t = paramString;
|
|
G4std::istrstream is((char*)t);
|
|
is >> vl >> unts;
|
|
G4String unt = unts;
|
|
|
|
return (vl*ValueOf(unt));
|
|
}
|
|
|
|
G4double G4UIcmdWithADoubleAndUnit::GetNewDoubleRawValue(G4String paramString)
|
|
{
|
|
G4double vl;
|
|
char unts[30];
|
|
|
|
const char* t = paramString;
|
|
G4std::istrstream is((char*)t);
|
|
is >> vl >> unts;
|
|
|
|
return vl;
|
|
}
|
|
|
|
G4double G4UIcmdWithADoubleAndUnit::GetNewUnitValue(G4String paramString)
|
|
{
|
|
G4double vl;
|
|
char unts[30];
|
|
|
|
const char* t = paramString;
|
|
G4std::istrstream is((char*)t);
|
|
is >> vl >> unts;
|
|
G4String unt = unts;
|
|
|
|
return ValueOf(unt);
|
|
}
|
|
|
|
G4String G4UIcmdWithADoubleAndUnit::ConvertToString
|
|
(G4double dblValue,const char * unitName)
|
|
{
|
|
G4String unt = unitName;
|
|
G4double uv = ValueOf(unitName);
|
|
|
|
char st[50];
|
|
G4std::ostrstream os(st,50);
|
|
os << dblValue/uv << " " << unitName << '\0';
|
|
G4String vl = st;
|
|
return vl;
|
|
}
|
|
|
|
void G4UIcmdWithADoubleAndUnit::SetParameterName
|
|
(const char * theName,G4bool omittable,G4bool currentAsDefault)
|
|
{
|
|
G4UIparameter * theParam = GetParameter(0);
|
|
theParam->SetParameterName(theName);
|
|
theParam->SetOmittable(omittable);
|
|
theParam->SetCurrentAsDefault(currentAsDefault);
|
|
}
|
|
|
|
void G4UIcmdWithADoubleAndUnit::SetDefaultValue(G4double defVal)
|
|
{
|
|
G4UIparameter * theParam = GetParameter(0);
|
|
theParam->SetDefaultValue(defVal);
|
|
}
|
|
|
|
void G4UIcmdWithADoubleAndUnit::SetUnitCategory(const char * unitCategory)
|
|
{
|
|
SetUnitCandidates(UnitsList(unitCategory));
|
|
}
|
|
|
|
void G4UIcmdWithADoubleAndUnit::SetUnitCandidates(const char * candidateList)
|
|
{
|
|
G4UIparameter * untParam = GetParameter(1);
|
|
G4String canList = candidateList;
|
|
untParam->SetParameterCandidates(canList);
|
|
}
|
|
|
|
void G4UIcmdWithADoubleAndUnit::SetDefaultUnit(const char * defUnit)
|
|
{
|
|
G4UIparameter * untParam = GetParameter(1);
|
|
untParam->SetOmittable(true);
|
|
untParam->SetDefaultValue(defUnit);
|
|
SetUnitCategory(CategoryOf(defUnit));
|
|
}
|
|
|