summaryrefslogtreecommitdiff
path: root/2.3-1/macros/GeneralFunctions/SizeInByte.sci
blob: fa2d4f94d64a9b7176ecd224ebfa6f837f4c21b8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
function SizeIn = SizeInByte(InDataType)
// function SizeIn = SizeInByte(InDataType)
// -----------------------------------------------------------------
// #RNU_RES_B
// Returns the size in bytes of the input data type.
//
// Input data:
// InDataType: input data type. It can be: 
//    'float'   
//    'double'
//    'floatComplex*'
//    'doubleComplex*'
//
// Output data:
// SizeIn: size in bytes of the input data type.
//
// #RNU_RES_E
// Status:
// 12-May-2007 -- Nutricato Raffaele: Author.
//
// Copyright 2007 Raffaele Nutricato.
// Contact: raffaele.nutricato@tiscali.it
// -----------------------------------------------------------------

// ------------------------------
// --- Check input arguments. ---
// ------------------------------
SCI2CNInArgCheck(argn(2),1,1);

if (InDataType == 'float')
   SizeIn = 4;
elseif (InDataType == 'double')
   SizeIn = 8;
elseif (InDataType == 'floatComplex*')
   SizeIn = 8;
elseif (InDataType == 'doubleComplex*')
   SizeIn = 16;
else
   error('Unknown data type: '+InDataType);
end
endfunction