/[MITgcm]/MITgcm/verification/testreport
ViewVC logotype

Diff of /MITgcm/verification/testreport

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.52 by edhill, Wed Dec 1 16:59:42 2004 UTC revision 1.63 by jmc, Wed Jan 26 00:24:06 2005 UTC
# Line 450  linkdata() Line 450  linkdata()
450              if test "x$ADM" = x ; then              if test "x$ADM" = x ; then
451                  files=`( cd ../input ; ls -1 | grep -v CVS )`                  files=`( cd ../input ; ls -1 | grep -v CVS )`
452                  for i in $files ; do                  for i in $files ; do
453                      if test ! -d "../input/"$i ; then                      if test ! -d "../input/"$i -a ! -f $i ; then
454                          ln -sf "../input/"$i $i                          ln -sf "../input/"$i $i
455                      fi                      fi
456                  done                  done
# Line 520  createcodelet() Line 520  createcodelet()
520  int main( int argc, char** argv )  {  int main( int argc, char** argv )  {
521    int linnum,best,lncnt;    int linnum,best,lncnt;
522    double a,b,abave,relerr;    double a,b,abave,relerr;
523    best = -16;    best = -22;
524    lncnt = 0;    lncnt = 0;
525    while( 1 & (lncnt+=1) < 999 )  {    while( 1 & (lncnt+=1) < 999 )  {
526      scanf("%d", &linnum);      scanf("%d", &linnum);
# Line 529  int main( int argc, char** argv )  { Line 529  int main( int argc, char** argv )  {
529      abave = 0.5*(fabs(a)+fabs(b));      abave = 0.5*(fabs(a)+fabs(b));
530      if (abave > 0.0) {      if (abave > 0.0) {
531        relerr=fabs(a-b)/abave;        relerr=fabs(a-b)/abave;
532        if (relerr > 0.0) {        if (relerr > 0.0) { linnum = (int)lrint(log10(relerr)); }
533          linnum = (int)log10(relerr);        else { linnum = -16 ; }
534          best = (best > linnum) ? best : linnum;        best = (best > linnum) ? best : linnum;
       }  
     }  
     else {  
       if (best == -16 && abave != 0)  best = -22;  
535      }      }
536    }    }
537    if (lncnt == 999) best=-29;    if (lncnt == 999) best=-29;
# Line 543  int main( int argc, char** argv )  { Line 539  int main( int argc, char** argv )  {
539    return 0;    return 0;
540  }  }
541  EOF  EOF
542      cc -o tmp_cmpnum tmp_cmpnum.c -lm      $CC -o tmp_cmpnum tmp_cmpnum.c -lm
543    
544      if [ -x ./tmp_cmpnum ]; then      if [ -x ./tmp_cmpnum ]; then
545          echo "OK"          echo "OK"
546          return 0          return 0
547      else      else
548          echo          echo
549          echo "ERROR: failed to compile comparison code"          echo "ERROR: failed to compile comparison code -- please specify"
550            echo "  a C compiler using the CC environment variable."
551          exit 1          exit 1
552      fi      fi
553  }  }
# Line 639  MPACKDIR="../tools/mpack-1.6" Line 636  MPACKDIR="../tools/mpack-1.6"
636  HAVE_MPACK=  HAVE_MPACK=
637  MPACK="$MPACKDIR/mpack"  MPACK="$MPACKDIR/mpack"
638  COMMAND=  COMMAND=
639  MAKE=make  if test "x$MAKE" = x ; then
640        MAKE=make
641    fi
642    if test "x$CC" = x ; then
643        CC=cc
644    fi
645  JOBS=  JOBS=
646  MPI=f  MPI=f
647  DELDIR=  DELDIR=
# Line 873  for dir in $TESTDIRS ; do Line 875  for dir in $TESTDIRS ; do
875          if test -r $dir/input/Makefile ; then          if test -r $dir/input/Makefile ; then
876              ( cd $dir/input ; make CLEAN )              ( cd $dir/input ; make CLEAN )
877          fi          fi
878            (
879                cd $dir
880                rm -rf tr_run.*
881            )
882          continue          continue
883      fi      fi
884    
# Line 881  for dir in $TESTDIRS ; do Line 887  for dir in $TESTDIRS ; do
887      fout=      fout=
888      if test "x$ADM" = x ; then      if test "x$ADM" = x ; then
889          fout=$dir"/results/output.txt"          fout=$dir"/results/output.txt"
         check_for_add_mon_output  $fout  
890      else      else
891          fout=$dir"/results_ad/output.txt_adm"          fout=$dir"/results_ad/output.txt_adm"
892      fi      fi
# Line 889  for dir in $TESTDIRS ; do Line 894  for dir in $TESTDIRS ; do
894          echo "can't read \"$fout\" -- skipping $dir"          echo "can't read \"$fout\" -- skipping $dir"
895          continue          continue
896      fi      fi
897        if test "x$ADM" = x ; then
898            check_for_add_mon_output  $fout
899        fi
900    
901      # Check for additional types of monitor output      # Check for additional types of monitor output
902    
# Line 966  for dir in $TESTDIRS ; do Line 974  for dir in $TESTDIRS ; do
974          echo "DATE='$DATE'" >> $CDIR"/summary.txt"          echo "DATE='$DATE'" >> $CDIR"/summary.txt"
975          echo "tdir='$dir'" >> $CDIR"/summary.txt"          echo "tdir='$dir'" >> $CDIR"/summary.txt"
976    
         OLD_COMMAND=$COMMAND  
         COMMAND="./mitgcmuv > output.txt"  
977          for ex in $extra_runs ; do          for ex in $extra_runs ; do
978              test -e "$dir/tr_run.$ex" && rm -rf "$dir/tr_run.$ex"              test ! -e "$dir/tr_run.$ex" && mkdir "$dir/tr_run.$ex"
979              mkdir "$dir/tr_run.$ex"              for ldir in input.$ex input ; do
980              links=`( cd "$dir/input" > /dev/null 2>&1 ; ls -1 | grep -v CVS )`                  (
981                        cd "$dir/$ldir" > /dev/null 2>&1
982                        ls -1 2>/dev/null \
983                            | sed -e 's|^CVS$||g' | sed -e 's|^output.txt$||g'
984                    ) > tr_exrun_links
985                    (
986                        cd "$dir/tr_run.$ex"
987                        cat ../../tr_exrun_links | while read i ; do
988                            if test ! "x$i" = x ; then
989                                test ! -r $i  &&  ln -s "../"$ldir"/"$i $i
990                            fi
991                        done
992                    )
993                    test -e tr_exrun_links  &&  rm -f tr_exrun_links
994                done
995                ldir=build
996                (
997                    cd "$dir/$ldir" > /dev/null 2>&1
998                    ls -1 Makefile *.[fFhco] mitgcmuv  2>/dev/null \
999                        | sed -e 's|^CVS$||g' | sed -e 's|^output.txt$||g'
1000                ) > tr_exrun_links
1001              (              (
1002                  cd "$dir/tr_run.$ex"                  cd "$dir/tr_run.$ex"
1003                  for i in $links; do                      cat ../../tr_exrun_links | while read i ; do
1004                      ln -s ../input/$i $i                          if test ! "x$i" = x ; then
1005                  done                              test ! -r $i  &&  ln -s "../"$ldir"/"$i $i
1006              )                          fi
1007              links=`( cd "$dir/input.$ex" > /dev/null 2>&1 ; ls -1 | grep -v CVS )`                      done
             (  
                 cd "$dir/tr_run.$ex"  
                 for i in $links; do  
                     test -e $i  &&  rm -f $i  
                     ln -s ../input.$ex/$i $i  
                 done  
                 ln -s ../$builddir/mitgcmuv mitgcmuv  
1008              )              )
1009                test -e tr_exrun_links  &&  rm -f tr_exrun_links
1010              runmodel $dir/tr_run.$ex && run=Y \              runmodel $dir/tr_run.$ex && run=Y \
1011                  && results=`testoutput $dir tr_run.$ex "."$ex`                  && results=`testoutput $dir tr_run.$ex "."$ex`
1012              fres=`printf '%s %s %s %s' ${genmake:-N} ${makedepend:-N} ${make:-N} ${run:-N}`              fres=`printf '%s %s %s %s' ${genmake:-N} ${makedepend:-N} ${make:-N} ${run:-N}`
# Line 1000  for dir in $TESTDIRS ; do Line 1020  for dir in $TESTDIRS ; do
1020              echo "DATE='$DATE'" >> $CDIR"/summary.txt"              echo "DATE='$DATE'" >> $CDIR"/summary.txt"
1021              echo "tdir='$dir'" >> $CDIR"/summary.txt"              echo "tdir='$dir'" >> $CDIR"/summary.txt"
1022          done          done
         COMMAND=$OLD_COMMAND  
1023      else      else
1024          fres=`printf '%s %s %s %s' ${genmake:-N} ${makedepend:-N} ${make:-N} ${run:-N}`          fres=`printf '%s %s %s %s' ${genmake:-N} ${makedepend:-N} ${make:-N} ${run:-N}`
1025          fres=$fres"$results   $dir"          fres=$fres"$results   $dir"
Legend:
Removed from v.1.52  
changed lines
  Added in v.1.63
  ViewVC Help
Powered by ViewVC 1.1.22