ChrysaLisp/run_cube.sh at master · vygr/ChrysaLisp · GitHub

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
#!/bin/bash

#common functions
source funcs.sh

#process args defaults
main 4 4 $@

if [ $num_cpu -ne 0 ]
then
	for ((cpu_z=$num_cpu-1; cpu_z>=0; cpu_z--))
	do
		for ((cpu_y=$num_cpu-1; cpu_y>=0; cpu_y--))
		do
			for ((cpu_x=$num_cpu-1; cpu_x>=0; cpu_x--))
			do
				cpu=$(($cpu_z*$num_cpu*$num_cpu + $cpu_y*$num_cpu + $cpu_x))
				links=""
				for ((lcpu_z=$cpu_z-1; lcpu_z<=$cpu_z+1; lcpu_z++))
				do
					wrap $lcpu_z
					add_link $cpu $(($wp*$num_cpu*$num_cpu + $cpu_y*$num_cpu + $cpu_x))
				done
				for ((lcpu_y=$cpu_y-1; lcpu_y<=$cpu_y+1; lcpu_y++))
				do
					wrap $lcpu_y
					add_link $cpu $(($cpu_z*$num_cpu*$num_cpu + $wp*$num_cpu + $cpu_x))
				done
				for ((lcpu_x=$cpu_x-1; lcpu_x<=$cpu_x+1; lcpu_x++))
				do
					wrap $lcpu_x
					add_link $cpu $(($cpu_z*$num_cpu*$num_cpu + $cpu_y*$num_cpu + $wp))
				done
				boot_cpu_gui $cpu "$links"
			done
		done
	done
fi