
function cams = auto_position1(num_cam,space,level,row,passo)

if nargin<1
    num_cam=5;
end
if nargin<2
    %di default prendo uno spazio 5 x 5 metri (espressi in cm) per meglio
    %visualizzare le telecamere
    latox=5;
    latoy=5;
    latoz=5;
    space=[latox,latoy,latoz]';
end
if nargin<3
    level=1;             %se inserite 2 avrete telecamere solo lungo il 
end                     %perimetro
if nargin<4
    if space(1) == space(2) & level==1
        row= floor(sqrt(num_cam));
    elseif space(1) == space(2) 
        row = floor(sqrt(num_cam));
    else
        row = 5; %numero di righe in cui posizionare le telecamere
    end    
end
if nargin<5
    if space(1) == space(2) & row>1
        passo= [space(1)/row,space(1)/row,1]' ;
    else
        passo=[.5,1,1]';  %rispettivamente la distanza tra telecamere 
                     % lungo l'asse x y e z
    end    
end

%[cams r]=camera2(5,[5,5,5]',[.5,5,1]')
[cams r]=camera1(num_cam,space,[passo(1),row,level]'); 
level=level+1;

while r ~= 0 & level*passo(3) <= space(3)
    
    space_temp=[space(1),space(2),space(3)-(level-1)*(passo(3))]';
    [cams1 r]=camera1(r,space_temp,[passo(1),row,level]');
    cams=[cams cams1];
    level=level+1;
end

cams = rotatmatrix(cams);