#!/bin/csh

# Skript mtree - dir tree
if ($#argv == 0) then
  set ind = 0
else
  set ind = $argv[1]
endif
set str = ''
set j = 0
while ($j < $ind)
#  echo $j
  set str = "\040"$str
  @ j++
end
@ ind++
foreach i  (*)
  if (-d $i) then
    echo $str $i
    cd $i
    mtree $ind
    cd ..
  endif
end
