1 // Copyright (c) 1998-1999 Matra Datavision
2 // Copyright (c) 1999-2014 OPEN CASCADE SAS
3 //
4 // This file is part of Open CASCADE Technology software library.
5 //
6 // This library is free software; you can redistribute it and/or modify it under
7 // the terms of the GNU Lesser General Public License version 2.1 as published
8 // by the Free Software Foundation, with special exception defined in the file
9 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
10 // distribution for complete text of the license and disclaimer of any warranty.
11 //
12 // Alternatively, this file may be used under the terms of Open CASCADE
13 // commercial license or contractual agreement.
14
15
16 #include <OSD_Environment.hxx>
17 #include <Resource_Manager.hxx>
18 #include <Standard_NoSuchObject.hxx>
19 #include <TCollection_AsciiString.hxx>
20 #include <Units.hxx>
21 #include <Units_Dimensions.hxx>
22 #include <Units_Quantity.hxx>
23 #include <Units_Unit.hxx>
24 #include <Units_UnitsSystem.hxx>
25 #include <UnitsAPI.hxx>
26
27 static Handle(Resource_Manager) CurrentUnits,SICurrentUnits,MDTVCurrentUnits;
28 static Units_UnitsSystem LocalSystemUnits,SILocalSystemUnits,MDTVLocalSystemUnits;
29 static TCollection_AsciiString rstring;
30 static UnitsAPI_SystemUnits localSystem = UnitsAPI_SI;
31 static UnitsAPI_SystemUnits currentSystem = UnitsAPI_DEFAULT;
32
33 //=======================================================================
34 //function : CheckLoading
35 //purpose :
36 //=======================================================================
37
CheckLoading(const UnitsAPI_SystemUnits aSystemUnits)38 void UnitsAPI::CheckLoading (const UnitsAPI_SystemUnits aSystemUnits)
39 {
40 if( currentSystem != aSystemUnits || CurrentUnits.IsNull()) {
41 switch (aSystemUnits) {
42 case UnitsAPI_DEFAULT :
43 if( !CurrentUnits.IsNull() ) break;
44 Standard_FALLTHROUGH
45 case UnitsAPI_SI :
46 currentSystem = UnitsAPI_SI;
47 if( SICurrentUnits.IsNull() ) {
48 #ifdef _WIN32
49 OSD_Environment env3("CSF_CurrentUnits");
50 TCollection_AsciiString csfcurrent (env3.Value());
51 if( csfcurrent.Length() > 0 )
52 SICurrentUnits = new Resource_Manager(csfcurrent.ToCString());
53 else
54 SICurrentUnits = new Resource_Manager("CurrentUnits");
55 #else
56 SICurrentUnits = new Resource_Manager("CurrentUnits");
57 #endif
58 }
59 CurrentUnits = SICurrentUnits;
60 LocalSystemUnits = SILocalSystemUnits;
61 break;
62 case UnitsAPI_MDTV :
63 currentSystem = UnitsAPI_MDTV;
64 if( MDTVCurrentUnits.IsNull() ) {
65 #ifdef _WIN32
66 OSD_Environment env4("CSF_MDTVCurrentUnits");
67 TCollection_AsciiString csfmdtvcurrent (env4.Value());
68 if( csfmdtvcurrent.Length() > 0 )
69 MDTVCurrentUnits = new Resource_Manager(csfmdtvcurrent.ToCString());
70 else
71 MDTVCurrentUnits = new Resource_Manager("MDTVCurrentUnits");
72 #else
73 MDTVCurrentUnits = new Resource_Manager("MDTVCurrentUnits");
74 #endif
75 }
76 CurrentUnits = MDTVCurrentUnits;
77 if( MDTVLocalSystemUnits.IsEmpty() ) {
78 MDTVLocalSystemUnits.Specify("LENGTH","mm");
79 MDTVLocalSystemUnits.Specify("AREA","mm\xB2");
80 MDTVLocalSystemUnits.Specify("VOLUME","mm\xB3");
81 MDTVLocalSystemUnits.Specify("INERTIA","mm**4");
82 MDTVLocalSystemUnits.Specify("SPEED","mm/s");
83 MDTVLocalSystemUnits.Specify("ACCELERATION","mm/s\xB2");
84 MDTVLocalSystemUnits.Specify("VOLUMIC MASS","kg/mm\xB3");
85 MDTVLocalSystemUnits.Specify("VOLUME FLOW","mm\xB3/s");
86 MDTVLocalSystemUnits.Specify("CONSUMPTION","mm\xB2");
87 MDTVLocalSystemUnits.Specify("QUANTITY OF MOVEMENT","kg*mm/s");
88 MDTVLocalSystemUnits.Specify("KINETIC MOMENT","kg*mm\xB2/s");
89 MDTVLocalSystemUnits.Specify("MOMENT OF INERTIA","kg*mm\xB2");
90 MDTVLocalSystemUnits.Specify("FORCE","kg*mm/s\xB2");
91 MDTVLocalSystemUnits.Specify("LINEIC FORCE","kg/s\xB2");
92 MDTVLocalSystemUnits.Specify("MOMENT OF A FORCE","kg*mm\xB2/s\xB2");
93 MDTVLocalSystemUnits.Specify("PRESSURE","kg/(mm*s\xB2)");
94 MDTVLocalSystemUnits.Specify("DYNAMIC VISCOSITY","kg/(mm*s)");
95 MDTVLocalSystemUnits.Specify("KINETIC VISCOSITY","mm\xB2/s");
96 MDTVLocalSystemUnits.Specify("TENSION SUPERFICIELLE","mm/s\xB2");
97 MDTVLocalSystemUnits.Specify("ENERGY","kg*mm\xB2/s\xB2");
98 MDTVLocalSystemUnits.Specify("POWER","kg*mm\xB2/s\xB3");
99 MDTVLocalSystemUnits.Specify("LINEIC POWER","kg*mm/s\xB3");
100 MDTVLocalSystemUnits.Specify("SURFACIC POWER","kg/s\xB3");
101 MDTVLocalSystemUnits.Specify("VOLUMIC POWER","kg/(mm*s\xB3)");
102 MDTVLocalSystemUnits.Specify("THERMICAL CONDUCTIVITY","kg*mm/(s\xB3*\xB0K)");
103 MDTVLocalSystemUnits.Specify("THERMICAL CONVECTIVITY","kg/(s\xB3*\xB0K)");
104 MDTVLocalSystemUnits.Specify("THERMICAL MASSIC CAPACITY","mm\xB2/(s\xB2*\xB0K)");
105 MDTVLocalSystemUnits.Specify("ENTROPY","kg*mm\xB2/(s\xB2*\xB0K)");
106 MDTVLocalSystemUnits.Specify("ENTHALPY","kg*mm\xB2/s\xB2");
107 MDTVLocalSystemUnits.Specify("LUMINANCE","cd/mm\xB2");
108 MDTVLocalSystemUnits.Specify("LUMINOUS EFFICACITY","s\xB3*Lu/(kg*mm\xB2)");
109 MDTVLocalSystemUnits.Specify("ELECTRIC FIELD","V/mm");
110 MDTVLocalSystemUnits.Specify("ELECTRIC CAPACITANCE","s**4*A\xB2/(kg*mm\xB2)");
111 MDTVLocalSystemUnits.Specify("MAGNETIC FIELD","A/mm");
112 MDTVLocalSystemUnits.Specify("MAGNETIC FLUX","kg*mm\xB2/(s\xB2*A)");
113 MDTVLocalSystemUnits.Specify("INDUCTANCE","kg*mm\xB2/(s\xB2*A\xB2)");
114 MDTVLocalSystemUnits.Specify("RELUCTANCE","s\xB2*A\xB2/(kg*mm\xB2)");
115 MDTVLocalSystemUnits.Specify("RESISTIVITY","O*mm");
116 MDTVLocalSystemUnits.Specify("CONDUCTIVITY","S/mm");
117 MDTVLocalSystemUnits.Specify("MOLAR MASS","kg/mol");
118 MDTVLocalSystemUnits.Specify("MOLAR VOLUME","mm\xB3/mol");
119 MDTVLocalSystemUnits.Specify("CONCENTRATION","kg/mm\xB3");
120 MDTVLocalSystemUnits.Specify("MOLAR CONCENTRATION","mol/mm\xB3");
121 MDTVLocalSystemUnits.Specify("ACOUSTIC INTENSITY","mm/A\xB2");
122 MDTVLocalSystemUnits.Specify("DOSE EQUIVALENT","mm\xB2/s\xB2");
123 MDTVLocalSystemUnits.Specify("ABSORBED DOSE","mm\xB2/s\xB2");
124 MDTVLocalSystemUnits.Specify("FLUX OF MAGNETIC INDUCTION","kg*mm\xB2/(s\xB2*A)");
125 MDTVLocalSystemUnits.Specify("ROTATION ACCELERATION","rad/s\xB2");
126 MDTVLocalSystemUnits.Specify("TRANSLATION STIFFNESS","kg/s\xB2");
127 MDTVLocalSystemUnits.Specify("ROTATION STIFFNESS","kg*mm\xB2/(s\xB2*rad)");
128 MDTVLocalSystemUnits.Activates();
129 }
130 LocalSystemUnits = MDTVLocalSystemUnits;
131 break;
132 }
133 }
134 }
135
136
137 //=======================================================================
138 //function : CurrentToLS
139 //purpose :
140 //=======================================================================
141
CurrentToLS(const Standard_Real aData,const Standard_CString aQuantity)142 Standard_Real UnitsAPI::CurrentToLS(const Standard_Real aData,
143 const Standard_CString aQuantity)
144 {
145 Standard_Real aValue = aData;
146 CheckLoading (localSystem);
147 if( CurrentUnits->Find(aQuantity) ) {
148 TCollection_AsciiString current(CurrentUnits->Value(aQuantity));
149 aValue = Units::ToSI(aData,current.ToCString());
150 aValue = LocalSystemUnits.ConvertSIValueToUserSystem(aQuantity,aValue);
151 }
152 #ifdef OCCT_DEBUG
153 else {
154 std::cout <<"Warning: UnitsAPI,the quantity '" << aQuantity << "' does not exist in the current units system" << std::endl;
155 }
156 #endif
157
158 return aValue;
159 }
160
161
162 //=======================================================================
163 //function : CurrentToSI
164 //purpose :
165 //=======================================================================
166
CurrentToSI(const Standard_Real aData,const Standard_CString aQuantity)167 Standard_Real UnitsAPI::CurrentToSI(const Standard_Real aData,
168 const Standard_CString aQuantity)
169 {
170 Standard_Real aValue = aData;
171 CheckLoading (UnitsAPI_DEFAULT);
172 if( CurrentUnits->Find(aQuantity) ) {
173 TCollection_AsciiString current(CurrentUnits->Value(aQuantity));
174 aValue = Units::ToSI(aData,current.ToCString());
175 }
176 #ifdef OCCT_DEBUG
177 else {
178 std::cout<<"Warning: UnitsAPI,the quantity '" << aQuantity << "' does not exist in the current units system" << std::endl;
179 }
180 #endif
181
182 return aValue;
183 }
184
185
186 //=======================================================================
187 //function : CurrentFromLS
188 //purpose :
189 //=======================================================================
190
CurrentFromLS(const Standard_Real aData,const Standard_CString aQuantity)191 Standard_Real UnitsAPI::CurrentFromLS(const Standard_Real aData,
192 const Standard_CString aQuantity)
193 {
194 Standard_Real aValue = aData;
195 CheckLoading (localSystem);
196 if( CurrentUnits->Find(aQuantity) ) {
197 TCollection_AsciiString current(CurrentUnits->Value(aQuantity));
198 aValue = LocalSystemUnits.ConvertUserSystemValueToSI(aQuantity,aData);
199 aValue = Units::FromSI(aValue,current.ToCString());
200 }
201 #ifdef OCCT_DEBUG
202 else {
203 std::cout<<"Warning: UnitsAPI,the quantity '" << aQuantity << "' does not exist in the current units system" << std::endl;
204 }
205 #endif
206
207 return aValue;
208 }
209
210
211 //=======================================================================
212 //function : CurrentFromSI
213 //purpose :
214 //=======================================================================
215
CurrentFromSI(const Standard_Real aData,const Standard_CString aQuantity)216 Standard_Real UnitsAPI::CurrentFromSI(const Standard_Real aData,
217 const Standard_CString aQuantity)
218 {
219 Standard_Real aValue = aData;
220 CheckLoading (UnitsAPI_DEFAULT);
221 if( CurrentUnits->Find(aQuantity) ) {
222 TCollection_AsciiString current(CurrentUnits->Value(aQuantity));
223 aValue = Units::FromSI(aData,current.ToCString());
224 }
225 #ifdef OCCT_DEBUG
226 else {
227 std::cout<<"Warning: UnitsAPI,the quantity '" << aQuantity << "' does not exist in the current units system" << std::endl;
228 }
229 #endif
230
231 return aValue;
232 }
233
234
235 //=======================================================================
236 //function : CurrentToAny
237 //purpose :
238 //=======================================================================
239
CurrentToAny(const Standard_Real aData,const Standard_CString aQuantity,const Standard_CString aUnit)240 Standard_Real UnitsAPI::CurrentToAny(const Standard_Real aData,
241 const Standard_CString aQuantity,
242 const Standard_CString aUnit) {
243 Standard_Real aValue = aData;
244 CheckLoading (UnitsAPI_DEFAULT);
245 if( CurrentUnits->Find(aQuantity) ) {
246 TCollection_AsciiString current(CurrentUnits->Value(aQuantity));
247 aValue = AnyToAny(aData,current.ToCString(),aUnit);
248 }
249 #ifdef OCCT_DEBUG
250 else {
251 std::cout<<"Warning: UnitsAPI,the quantity '" << aQuantity << "' does not exist in the current units system" << std::endl;
252 }
253 #endif
254
255 return aValue;
256 }
257
258
259 //=======================================================================
260 //function : CurrentFromAny
261 //purpose :
262 //=======================================================================
263
CurrentFromAny(const Standard_Real aData,const Standard_CString aQuantity,const Standard_CString aUnit)264 Standard_Real UnitsAPI::CurrentFromAny(const Standard_Real aData,
265 const Standard_CString aQuantity,
266 const Standard_CString aUnit)
267 {
268 Standard_Real aValue = aData;
269 CheckLoading (UnitsAPI_DEFAULT);
270 if( CurrentUnits->Find(aQuantity) ) {
271 TCollection_AsciiString current(CurrentUnits->Value(aQuantity));
272 aValue = AnyToAny(aData,aUnit,current.ToCString());
273 }
274 #ifdef OCCT_DEBUG
275 else {
276 std::cout<<"Warning: UnitsAPI,the quantity '" << aQuantity << "' does not exist in the current units system" << std::endl;
277 }
278 #endif
279
280 return aValue;
281 }
282
283
284 //=======================================================================
285 //function : AnyToLS
286 //purpose :
287 //=======================================================================
288
AnyToLS(const Standard_Real aData,const Standard_CString aUnit)289 Standard_Real UnitsAPI::AnyToLS(const Standard_Real aData,
290 const Standard_CString aUnit)
291 {
292 Standard_Real aValue = aData;
293 CheckLoading (localSystem);
294 Handle(Units_Dimensions) aDim;
295 aValue = Units::ToSI(aValue,aUnit,aDim);
296 if(aDim.IsNull())
297 return aValue;
298 Standard_CString quantity = aDim->Quantity();
299 if( quantity ) {
300 aValue = LocalSystemUnits.ConvertSIValueToUserSystem(quantity,aValue);
301 }
302 #ifdef OCCT_DEBUG
303 else
304 std::cout<<"Warning: BAD Quantity returns in UnitsAPI::AnyToLS(" << aData << "," << aUnit << ")" << std::endl;
305 #endif
306 return aValue;
307 }
308
309
310 //=======================================================================
311 //function : AnyToLS
312 //purpose :
313 //=======================================================================
314
AnyToLS(const Standard_Real aData,const Standard_CString aUnit,Handle (Units_Dimensions)& aDim)315 Standard_Real UnitsAPI::AnyToLS(const Standard_Real aData,
316 const Standard_CString aUnit,
317 Handle(Units_Dimensions) &aDim)
318 {
319 Standard_Real aValue = aData;
320 CheckLoading (localSystem);
321 aValue = Units::ToSI(aValue,aUnit,aDim);
322 Standard_CString quantity = aDim->Quantity();
323 if(aDim.IsNull())
324 return aValue;
325 if( quantity ) {
326 aValue = LocalSystemUnits.ConvertSIValueToUserSystem(quantity,aValue);
327 }
328 #ifdef OCCT_DEBUG
329 else
330 std::cout<<"Warning: BAD Quantity returns in UnitsAPI::AnyToLS(" << aData << "," << aUnit << "," << aDim.get() << ")" << std::endl;
331 #endif
332 return aValue;
333 }
334
335
336 //=======================================================================
337 //function : AnyToSI
338 //purpose :
339 //=======================================================================
340
AnyToSI(const Standard_Real aData,const Standard_CString aUnit)341 Standard_Real UnitsAPI::AnyToSI(const Standard_Real aData,
342 const Standard_CString aUnit)
343 {
344 Standard_Real aValue;
345 CheckLoading (UnitsAPI_DEFAULT);
346 aValue = Units::ToSI(aData,aUnit);
347 return aValue;
348 }
349
350
351 //=======================================================================
352 //function : AnyToSI
353 //purpose :
354 //=======================================================================
355
AnyToSI(const Standard_Real aData,const Standard_CString aUnit,Handle (Units_Dimensions)& aDim)356 Standard_Real UnitsAPI::AnyToSI(const Standard_Real aData,
357 const Standard_CString aUnit,
358 Handle(Units_Dimensions) &aDim)
359 {
360 Standard_Real aValue;
361 CheckLoading (UnitsAPI_DEFAULT);
362 aValue = Units::ToSI(aData,aUnit,aDim);
363 return aValue;
364 }
365
366
367 //=======================================================================
368 //function : AnyFromLS
369 //purpose :
370 //=======================================================================
371
AnyFromLS(const Standard_Real aData,const Standard_CString aUnit)372 Standard_Real UnitsAPI::AnyFromLS(const Standard_Real aData,
373 const Standard_CString aUnit)
374 {
375 Standard_Real aValue = aData;
376 CheckLoading (localSystem);
377 Handle(Units_Dimensions) aDim;
378 aValue = Units::FromSI(aValue,aUnit,aDim);
379 Standard_CString quantity = aDim->Quantity();
380 if( quantity ) {
381 aValue = LocalSystemUnits.ConvertUserSystemValueToSI(quantity,aValue);
382 }
383 #ifdef OCCT_DEBUG
384 else
385 std::cout<<"Warning: BAD Quantity returns in UnitsAPI::AnyToLS(" << aData << "," << aUnit << ")" << std::endl;
386 #endif
387
388 return aValue;
389 }
390
391
392 //=======================================================================
393 //function : AnyFromSI
394 //purpose :
395 //=======================================================================
396
AnyFromSI(const Standard_Real aData,const Standard_CString aUnit)397 Standard_Real UnitsAPI::AnyFromSI(const Standard_Real aData,
398 const Standard_CString aUnit)
399 {
400 Standard_Real aValue;
401 CheckLoading (UnitsAPI_DEFAULT);
402 aValue = Units::FromSI(aData,aUnit);
403 return aValue;
404 }
405
406
407 //=======================================================================
408 //function : AnyToAny
409 //purpose :
410 //=======================================================================
411
AnyToAny(const Standard_Real aData,const Standard_CString aUnit1,const Standard_CString aUnit2)412 Standard_Real UnitsAPI::AnyToAny(const Standard_Real aData,
413 const Standard_CString aUnit1,
414 const Standard_CString aUnit2)
415 {
416 Standard_Real aValue = aData;
417 CheckLoading (UnitsAPI_DEFAULT);
418 aValue = Units::Convert(aValue,aUnit1,aUnit2);
419 return aValue;
420 }
421
422
423 //=======================================================================
424 //function : LSToSI
425 //purpose :
426 //=======================================================================
427
LSToSI(const Standard_Real aData,const Standard_CString aQuantity)428 Standard_Real UnitsAPI::LSToSI(const Standard_Real aData,
429 const Standard_CString aQuantity)
430 {
431 Standard_Real aValue = aData;
432 CheckLoading (localSystem);
433 if( CurrentUnits->Find(aQuantity) ) {
434 aValue = LocalSystemUnits.ConvertUserSystemValueToSI(aQuantity,aData);
435 }
436 #ifdef OCCT_DEBUG
437 else {
438 std::cout<<"Warning: UnitsAPI,the quantity '" << aQuantity << "' does not exist in the current units system" << std::endl;
439 }
440 #endif
441
442 return aValue;
443 }
444
445
446 //=======================================================================
447 //function : SIToLS
448 //purpose :
449 //=======================================================================
450
SIToLS(const Standard_Real aData,const Standard_CString aQuantity)451 Standard_Real UnitsAPI::SIToLS(const Standard_Real aData,
452 const Standard_CString aQuantity)
453 {
454 Standard_Real aValue = aData;
455 CheckLoading (localSystem);
456 if( CurrentUnits->Find(aQuantity) ) {
457 aValue = LocalSystemUnits.ConvertSIValueToUserSystem(aQuantity,aValue);
458 }
459 #ifdef OCCT_DEBUG
460 else {
461 std::cout<<"Warning: UnitsAPI,the quantity '" << aQuantity << "' does not exist in the current units system" << std::endl;
462 }
463 #endif
464
465 return aValue;
466 }
467
468
469 //=======================================================================
470 //function : SetLocalSystem
471 //purpose :
472 //=======================================================================
473
SetLocalSystem(const UnitsAPI_SystemUnits aSystemUnits)474 void UnitsAPI::SetLocalSystem(const UnitsAPI_SystemUnits aSystemUnits)
475 {
476 CheckLoading (aSystemUnits);
477 localSystem = currentSystem;
478 }
479
480
481 //=======================================================================
482 //function : LocalSystem
483 //purpose :
484 //=======================================================================
485
LocalSystem()486 UnitsAPI_SystemUnits UnitsAPI::LocalSystem()
487 {
488 return localSystem;
489 }
490
491
492 //=======================================================================
493 //function : SetCurrentUnit
494 //purpose :
495 //=======================================================================
496
SetCurrentUnit(const Standard_CString aQuantity,const Standard_CString anUnit)497 void UnitsAPI::SetCurrentUnit(const Standard_CString aQuantity,
498 const Standard_CString anUnit)
499 {
500 CheckLoading(localSystem);
501 CurrentUnits->SetResource(aQuantity,anUnit);
502 }
503
504
505 //=======================================================================
506 //function : Save
507 //purpose :
508 //=======================================================================
509
Save()510 void UnitsAPI::Save()
511 {
512 CheckLoading(localSystem);
513 CurrentUnits->Save();
514 }
515
516
517 //=======================================================================
518 //function : Reload
519 //purpose :
520 //=======================================================================
521
Reload()522 void UnitsAPI::Reload()
523 {
524 currentSystem = UnitsAPI_DEFAULT;
525 CheckLoading(localSystem);
526 }
527
528
529 //=======================================================================
530 //function : CurrentUnit
531 //purpose :
532 //=======================================================================
533
534 static TCollection_AsciiString astring;
CurrentUnit(const Standard_CString aQuantity)535 Standard_CString UnitsAPI::CurrentUnit(const Standard_CString aQuantity)
536 {
537 CheckLoading(localSystem);
538 astring = CurrentUnits->Value(aQuantity);
539 return astring.ToCString();
540 }
541
542
543 //=======================================================================
544 //function : Dimensions
545 //purpose :
546 //=======================================================================
547
Handle(Units_Dimensions)548 Handle(Units_Dimensions) UnitsAPI::Dimensions(const Standard_CString aType)
549 {
550 return Units::Dimensions(aType);
551 }
552
553
554 //=======================================================================
555 //function : DimensionLess
556 //purpose :
557 //=======================================================================
558
Handle(Units_Dimensions)559 Handle(Units_Dimensions) UnitsAPI::DimensionLess()
560 {
561 return Units_Dimensions::ALess();
562 }
563
564
565 //=======================================================================
566 //function : DimensionMass
567 //purpose :
568 //=======================================================================
569
Handle(Units_Dimensions)570 Handle(Units_Dimensions) UnitsAPI::DimensionMass()
571 {
572 return Units_Dimensions::AMass();
573 }
574
575
576 //=======================================================================
577 //function : DimensionLength
578 //purpose :
579 //=======================================================================
580
Handle(Units_Dimensions)581 Handle(Units_Dimensions) UnitsAPI::DimensionLength()
582 {
583 return Units_Dimensions::ALength();
584 }
585
586
587 //=======================================================================
588 //function : DimensionTime
589 //purpose :
590 //=======================================================================
591
Handle(Units_Dimensions)592 Handle(Units_Dimensions) UnitsAPI::DimensionTime()
593 {
594 return Units_Dimensions::ATime() ;
595 }
596
597
598 //=======================================================================
599 //function : DimensionElectricCurrent
600 //purpose :
601 //=======================================================================
602
Handle(Units_Dimensions)603 Handle(Units_Dimensions) UnitsAPI::DimensionElectricCurrent()
604 {
605 return Units_Dimensions::AElectricCurrent() ;
606 }
607
608
609 //=======================================================================
610 //function : DimensionThermodynamicTemperature
611 //purpose :
612 //=======================================================================
613
Handle(Units_Dimensions)614 Handle(Units_Dimensions) UnitsAPI::DimensionThermodynamicTemperature()
615 {
616 return Units_Dimensions::AThermodynamicTemperature();
617 }
618
619
620 //=======================================================================
621 //function : DimensionAmountOfSubstance
622 //purpose :
623 //=======================================================================
624
Handle(Units_Dimensions)625 Handle(Units_Dimensions) UnitsAPI::DimensionAmountOfSubstance()
626 {
627 return Units_Dimensions::AAmountOfSubstance();
628 }
629
630
631 //=======================================================================
632 //function : DimensionLuminousIntensity
633 //purpose :
634 //=======================================================================
635
Handle(Units_Dimensions)636 Handle(Units_Dimensions) UnitsAPI::DimensionLuminousIntensity()
637 {
638 return Units_Dimensions::ALuminousIntensity();
639 }
640
641
642 //=======================================================================
643 //function : DimensionPlaneAngle
644 //purpose :
645 //=======================================================================
646
Handle(Units_Dimensions)647 Handle(Units_Dimensions) UnitsAPI::DimensionPlaneAngle()
648 {
649 return Units_Dimensions::APlaneAngle();
650 }
651
652
653 //=======================================================================
654 //function : DimensionSolidAngle
655 //purpose :
656 //=======================================================================
657
Handle(Units_Dimensions)658 Handle(Units_Dimensions) UnitsAPI::DimensionSolidAngle()
659 {
660 return Units_Dimensions::ASolidAngle();
661 }
662
663
664 //=======================================================================
665 //function : Check
666 //purpose :
667 //=======================================================================
668
Check(const Standard_CString aQuantity,const Standard_CString)669 Standard_Boolean UnitsAPI::Check(const Standard_CString aQuantity,
670 const Standard_CString /*aUnit*/)
671 {
672 Standard_Boolean status = Standard_False;
673 CheckLoading (UnitsAPI_DEFAULT);
674 if( CurrentUnits->Find(aQuantity) ) {
675 TCollection_AsciiString current(CurrentUnits->Value(aQuantity));
676 // aValue = AnyToAny(aData,current.ToCString(),aUnit);
677 // aValue = Units::Convert(aValue,aUnit1,aUnit2);
678 }
679
680 return status;
681 }
682