New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 6105 for branches/2015/dev_merge_2015 – NEMO

Ignore:
Timestamp:
2015-12-17T18:04:16+01:00 (8 years ago)
Author:
acc
Message:

Branch 2015/dev_MERGE_2015. Update sette_rpt to check tracer.stat and solver.stat files for ORCA2LIMPIS tests.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/2015/dev_merge_2015/NEMOGCM/SETTE/sette_rpt

    r5836 r6105  
    9090    set f1o = ./WORCA2LIMPIS_LONG/{$mach}/{$dorv}/LONG/ocean.output 
    9191    set f1s = ./WORCA2LIMPIS_LONG/{$mach}/{$dorv}/LONG/solver.stat 
     92    set f1t = ./WORCA2LIMPIS_LONG/{$mach}/{$dorv}/LONG/tracer.stat 
    9293    set f2o = ./WORCA2LIMPIS_LONG/{$mach}/{$dorv}/SHORT/ocean.output 
    9394    set f2s = ./WORCA2LIMPIS_LONG/{$mach}/{$dorv}/SHORT/solver.stat 
    94    
    95     set nl = `wc -l $f2s` 
    96     tail -$nl[1] $f1s > f1.tmp$$ 
    97     cmp -s f1.tmp$$ $f2s 
    98     if ( $status == 0 ) then 
    99       echo "ORCA2LIMPIS restartability  passed" 
    100     else 
    101       echo "ORCA2LIMPIS restartability  FAILED" 
    102       if ( $pass == 1 ) then 
    103         echo "<return> to view solver.stat differences" 
    104         set y = $< 
    105         sdiff f1.tmp$$ $f2s 
    106         echo "<return> to view ocean.output differences" 
    107         set y = $< 
    108         sdiff $f1o $f2o | grep "|" 
    109         echo "<return> to continue" 
    110         set y = $< 
    111       endif 
     95    set f2t = ./WORCA2LIMPIS_LONG/{$mach}/{$dorv}/SHORT/tracer.stat 
     96 
     97    set stato = 0 
     98    set nl = `wc -l $f2s` 
     99    tail -$nl[1] $f1s > f1.tmp$$ 
     100    cmp -s f1.tmp$$ $f2s 
     101    if ( $status == 0 ) then 
     102      echo "ORCA2LIMPIS solver.stat restartability  passed" 
     103    else 
     104      set stato = 1 
     105      echo "ORCA2LIMPIS solver.stat restartability  FAILED" 
     106      if ( $pass == 1 ) then 
     107        echo "<return> to view solver.stat differences" 
     108        set y = $< 
     109        sdiff f1.tmp$$ $f2s 
     110      endif 
     111    endif 
     112 
     113    set nl = `wc -l $f2t` 
     114    tail -$nl[1] $f1t > f1.tmp$$ 
     115    cmp -s f1.tmp$$ $f2t 
     116    if ( $status == 0 ) then 
     117      echo "ORCA2LIMPIS tracer.stat restartability  passed" 
     118    else 
     119      set stato = 1 
     120      echo "ORCA2LIMPIS tracer.stat restartability  FAILED" 
     121      if ( $pass == 1 ) then 
     122        echo "<return> to view tracer.stat differences" 
     123        set y = $< 
     124        sdiff f1.tmp$$ $f2t 
     125      endif 
     126    endif 
     127    if ( $stato == 1 ) then 
     128      if ( $pass == 1 ) then 
     129        echo "<return> to view ocean.output differences" 
     130        set y = $< 
     131        sdiff $f1o $f2o | grep "|" 
     132        echo "<return> to continue" 
     133        set y = $< 
     134      endif 
     135      set stato = 0 
    112136    endif 
    113137    rm f1.tmp$$ 
    … …  
    293317    set f1o = ./WORCA2LIMPIS_16/{$mach}/{$dorv}/REPRO_2_8/ocean.output 
    294318    set f1s = ./WORCA2LIMPIS_16/{$mach}/{$dorv}/REPRO_2_8/solver.stat 
     319    set f1t = ./WORCA2LIMPIS_16/{$mach}/{$dorv}/REPRO_2_8/tracer.stat 
    295320    set f2o = ./WORCA2LIMPIS_16/{$mach}/{$dorv}/REPRO_4_4/ocean.output 
    296321    set f2s = ./WORCA2LIMPIS_16/{$mach}/{$dorv}/REPRO_4_4/solver.stat 
    297    
    298     cmp -s $f1s $f2s 
    299     if ( $status == 0 ) then 
    300       echo "ORCA2LIMPIS reproducibility passed" 
    301     else 
    302       echo "ORCA2LIMPIS reproducibility FAILED" 
    303       if ( $pass == 1 ) then 
    304         echo "<return> to view solver.stat differences" 
    305         set y = $< 
    306         sdiff $f1s $f2s 
    307         echo "<return> to view ocean.output differences" 
    308         set y = $< 
    309         sdiff $f1o $f2o | grep "|" 
    310         echo "<return> to continue" 
    311         set y = $< 
    312       endif 
     322    set f2t = ./WORCA2LIMPIS_16/{$mach}/{$dorv}/REPRO_4_4/tracer.stat 
     323 
     324    set stato = 0 
     325    cmp -s $f1s $f2s 
     326    if ( $status == 0 ) then 
     327      echo "ORCA2LIMPIS solver.stat reproducibility  passed" 
     328    else 
     329      set stato = 1 
     330      echo "ORCA2LIMPIS solver.stat reproducibility  FAILED" 
     331      if ( $pass == 1 ) then 
     332        echo "<return> to view solver.stat differences" 
     333        set y = $< 
     334        sdiff $f1s $f2s 
     335      endif 
     336    endif 
     337 
     338    cmp -s $f1t $f2t 
     339    if ( $status == 0 ) then 
     340      echo "ORCA2LIMPIS tracer.stat reproducibility  passed" 
     341    else 
     342      set stato = 1 
     343      echo "ORCA2LIMPIS tracer.stat reproducibility  FAILED" 
     344      if ( $pass == 1 ) then 
     345        echo "<return> to view tracer.stat differences" 
     346        set y = $< 
     347        sdiff $f1t $f2t 
     348      endif 
     349    endif 
     350    if ( $stato == 1 ) then 
     351      if ( $pass == 1 ) then 
     352        echo "<return> to view ocean.output differences" 
     353        set y = $< 
     354        sdiff $f1o $f2o | grep "|" 
     355        echo "<return> to continue" 
     356        set y = $< 
     357      endif 
     358      set stato = 0 
    313359    endif 
    314360  endif 
Note: See TracChangeset for help on using the changeset viewer.