212 |
<tr bgcolor="#bbddff"> <td> Intel P4 Mosix Cluster </td> <td>"sea"</td> |
<tr bgcolor="#bbddff"> <td> Intel P4 Mosix Cluster </td> <td>"sea"</td> |
213 |
<td>Red Hat v7.2</td> </tr> |
<td>Red Hat v7.2</td> </tr> |
214 |
|
|
215 |
<tr bgcolor="#bbddff"> <td> AMD Athlon </td> <td>"eddy"</td> |
<tr bgcolor="#bbffdd"> <td> AMD Athlon </td> <td>"eddy"</td> |
216 |
<td>Red Hat 9</td> </tr> |
<td>Red Hat 9</td> </tr> |
217 |
|
<tr bgcolor="#bbddff"> <td> AMD Opteron cluster </td> <td>"dolphin"</td> |
218 |
|
<td>SuSE SLES v8.1</td> </tr> |
219 |
|
|
220 |
<!-- |
<!-- |
221 |
<tr bgcolor="#bbddff"> <td> </td> <td>""</td> |
<tr bgcolor="#bbddff"> <td> </td> <td>""</td> |
242 |
EOF |
EOF |
243 |
|
|
244 |
color="#bbffdd" |
color="#bbffdd" |
245 |
|
ncolor="#bbddff" |
246 |
res_url="http://mitgcm.org/testing/" |
res_url="http://mitgcm.org/testing/" |
247 |
|
|
248 |
MACHINES="faulks shelley myrinet eaps halem hopper lomax orion bf bs slough sea eddy adams" |
MACHINES="faulks shelley myrinet eaps halem hopper lomax orion bf bs slough sea" |
249 |
|
MACHINES="$MACHINES eddy adams dolphin" |
250 |
|
|
251 |
( cd $INDIR ; ls -1 ) > ./dir_all |
( cd $INDIR ; ls -1 ) > ./dir_all |
252 |
|
|
253 |
for mname in $MACHINES ; do |
for mname in $MACHINES ; do |
254 |
|
|
255 |
echo " $mname" |
echo " $mname" |
|
if test "x$color" = x#bbffdd ; then |
|
|
color="#bbddff" |
|
|
else |
|
|
color="#bbffdd" |
|
|
fi |
|
256 |
|
|
257 |
dir_list=`grep $mname ./dir_all` |
dir_list=`grep $mname ./dir_all` |
258 |
echo -n "" > ./mlist |
echo -n "" > ./mlist |
336 |
# Do we have any data? If so, create the latest pointer. |
# Do we have any data? If so, create the latest pointer. |
337 |
num=`wc -l ./mlist | awk '{print $1}'` |
num=`wc -l ./mlist | awk '{print $1}'` |
338 |
if test $num -gt 0 ; then |
if test $num -gt 0 ; then |
339 |
|
|
340 |
|
# swap colors |
341 |
|
ctmp=$color |
342 |
|
color=$ncolor |
343 |
|
ncolor=$ctmp |
344 |
|
|
345 |
keys=`cat ./mlist | cut -d " " -f 1 | sort | uniq` |
keys=`cat ./mlist | cut -d " " -f 1 | sort | uniq` |
346 |
|
|
347 |
for key in $keys ; do |
for key in $keys ; do |