blob: 2ea28a316e3e1c174c39b7a25905294fc1c82067 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
//Function to standardize the dimensions
funcprot(0)
function stddim(x)
x=x*(10^3)
std=[1 2 3 4 5 6 8 10 12 15 18 20 24 26 30:5:400]
n=length(std)
for i=1:n
if (x<std(i)) then
y=std(i)
break
else
continue
end
end
y=y*(10^-3)
endfunction
|
