+ //FIXME : either you consider than US, UL, SS, SL *are* string representable
+ // and you have to add FD and FL
+ // or you consider they are not, and you have to remove them
+ // (I cannot guess your point, reading gdcmDataEntry code :-( ) JPR
+
+ return tested == "AE" ||
+ tested == "AS" ||
+ tested == "CS" ||
+ tested == "DA" ||
+ tested == "DS" ||
+ tested == "IS" ||
+ tested == "LO" ||
+ tested == "LT" ||
+ tested == "PN" ||
+ tested == "SH" ||
+ tested == "SL" ||
+ tested == "SS" ||
+ tested == "ST" ||
+ tested == "TM" ||
+ tested == "UI" ||
+ tested == "UL" ||
+ tested == "US" ||
+ tested == "UT";
+
+ // Should be quicker --> But it doesn't work : revert to old code
+/*
+ return tested != "FL" &&
+ tested != "FD" &&
+ tested != "OB" &&
+ tested != "OW" &&
+ tested != "AT" && // Attribute Tag ?!?
+ tested != "UN" && // UN is an actual VR !
+ tested != "SQ" ;
+*/
+}
+/// \brief returns the length of a elementary elem whose VR is passed
+unsigned short VR::GetAtomicElementLength(VRKey const &tested)
+{
+ // Unsigned & signed short
+ if( tested == "US" || tested == "SS" )
+ return 2;
+ // Unsigned & signed long
+ if( tested == "UL" || tested == "SL" )
+ return 4;
+ // Float
+ if( tested == "FL" )
+ return 4;
+ // Double
+ if( tested == "FD" )
+ return 8;
+ // Word string
+ if( tested == "OW" )
+ return 2;
+ return 1;
+}