#!/bin/csh -f

#ATENCAO: pesquisa: "caso k = 2"

set listaNos = (1000)
set listaDist = (1000)
set listaD = (3)
set listaR = (2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20)
set seedMax = 50

set directoria3 = "Random"
set directoria1 = "$directoria3/Cyclic/Small/Varia_K/"
#ver linha 27 e 63-67

echo comecou $0 `date` >> ACABOU
echo `hostname` >> ACABOU
echo `pwd` >> ACABOU
grep MAX_ macros* >> ACABOU
#grep rede $0 | grep -v "#echo" | cut -d'#' -f2 >> ACABOU
echo "" >> ACABOU

foreach d ($listaD)
foreach r ($listaR)
foreach nos ($listaNos)
foreach dist ($listaDist)
  set directoria2 = "$directoria1/K_$r"
  mkdir $directoria2/
  set arcos = `expr $nos '*' $d`
echo "nos = $nos, arcos = $arcos, dist = $dist, r = $r, " `date` >> ACABOU

  set seed = 0
  while ( $seed < $seedMax )
    set seed = `echo $seed +1 | bc`

#criar o ficheiro "dados"
    #echo "1 0" > ddados #rede aleat. acicli.
    #echo "1 1 0" > ddados #rede aleat. cicli. nao_orien
    echo "1 1 1" > ddados #rede aleat. cicli. orien
    echo $seed >> ddados
    echo $nos >> ddados
    echo $arcos >> ddados
    echo "1 1" >> ddados
    echo $r >> ddados
    set i = $r
    while ( $i > 0 )
      echo 1 $dist >> ddados
      set i = `expr $i - 1 `
    end
#caso k = 2
echo "1" >> ddados
    ./gerador < ddados >& erros.gerador
    sed ":1,1 s/semente/seed/" rede.dat | sed ":3,3 s/Rede aleatoria ciclica orientada/random cyclic directed network/" | sed ":5,5 s/a c o/r c/" | sed ":7,7 s/N/n/" | sed ":9,9 s/A/m/" | sed ":11,11 s/r	/k	/" > $directoria2/instance$seed.txt

  end
end # foreach r ($listaR) #while ... seed ...
end # foreach d ($listaD)
end # foreach dist ($listaDist)
end # foreach nos ($listaNos)

du -s $directoria1 >> ACABOU
tar -cf $directoria3/smallCycVariaK.tar $directoria1/*
\rm -R $directoria1
gzip $directoria3/smallCycVariaK.tar
mv $directoria3/smallCycVariaK.tar.gz $directoria3/smallCycVariaK.tgz
du -s $directoria3/smallCycVariaK.tgz >> ACABOU
echo acabou `date` >> ACABOU
rm core
#cut -c48- zz | grep '[0-9]

./aleatU.sh
