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 5086 for branches/2014/dev_r4650_UKMO3_masked_damping/NEMOGCM/SETTE/sette_rpt – NEMO

Ignore:
Timestamp:
2015-02-17T10:06:39+01:00 (9 years ago)
Author:
timgraham
Message:

Merged head of trunk into branch in preparation for putting code back onto the trunk
In working copy ran the command:
svn merge svn+sshtimgraham@…/ipsl/forge/projets/nemo/svn/trunk

Also recompiled NEMO_book.pdf with merged input files

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/2014/dev_r4650_UKMO3_masked_damping/NEMOGCM/SETTE/sette_rpt

    r3725 r5086  
    88# 
    99  set mach = `grep "COMPILER=" ./sette.sh | sed -e 's/COMPILER=//'` 
    10   set NEMO_VALID = ../CONFIG/NEMO_VALIDATION 
     10  set NEMO_VALID = `grep "NEMO_VALIDATION_DIR=" ./param.cfg | sed -e 's/NEMO_VALIDATION_DIR=//'` 
    1111# 
    1212  if ( ! -d $NEMO_VALID ) then 
    … …  
    1717  cd $NEMO_VALID 
    1818# 
    19 # The script also needs the date or revision tag. Currently this is taken from the latest sub-directory 
    20 # found in the WGYRE_LONG directory 
    21 # 
    22   set dorv = `ls -1rtd ./WGYRE_LONG/{$mach}/* | tail -1l ` 
    23   set dorv = $dorv:t 
     19# The script also needs the date or revision tag. Currently this is taken from the latest sub-directory found in each directory 
     20# 
    2421# 
    2522# Now loop through all the test directories. On the second pass the user can optionally examine any mismatched 
    … …  
    3027foreach pass (0 1 ) 
    3128  if ( -d ./WGYRE_LONG ) then 
     29    set dorv = `ls -1rtd ./WGYRE_LONG/{$mach}/* | tail -1l ` 
     30    set dorv = $dorv:t 
    3231    set f1o = ./WGYRE_LONG/{$mach}/{$dorv}/LONG/ocean.output 
    3332    set f1s = ./WGYRE_LONG/{$mach}/{$dorv}/LONG/solver.stat 
    … …  
    3938    cmp -s f1.tmp$$ $f2s 
    4039    if ( $status == 0 ) then 
    41       echo "GYRE     restartability  passed" 
    42     else 
    43       echo "GYRE     restartability  FAILED" 
    44       if ( $pass == 1 ) then 
    45         echo "<return> to view solver.stat differences" 
    46         set y = $< 
    47         sdiff f1.tmp$$ $f2s 
    48         echo "<return> to view ocean.output differences" 
    49         set y = $< 
    50         sdiff $f1o $f2o | grep "|" 
    51         echo "<return> to continue" 
    52         set y = $< 
    53       endif 
    54     endif 
    55     rm f1.tmp$$ 
    56   endif 
     40      echo "GYRE        restartability  passed" 
     41    else 
     42      echo "GYRE        restartability  FAILED" 
     43      if ( $pass == 1 ) then 
     44        echo "<return> to view solver.stat differences" 
     45        set y = $< 
     46        sdiff f1.tmp$$ $f2s 
     47        echo "<return> to view ocean.output differences" 
     48        set y = $< 
     49        sdiff $f1o $f2o | grep "|" 
     50        echo "<return> to continue" 
     51        set y = $< 
     52      endif 
     53    endif 
     54    rm f1.tmp$$ 
     55  endif 
     56 
     57  if ( -d ./WISOMIP_LONG ) then 
     58    set dorv = `ls -1rtd ./WISOMIP_LONG/{$mach}/* | tail -1l ` 
     59    set dorv = $dorv:t 
     60    set f1o = ./WISOMIP_LONG/{$mach}/{$dorv}/LONG/ocean.output 
     61    set f1s = ./WISOMIP_LONG/{$mach}/{$dorv}/LONG/solver.stat 
     62    set f2o = ./WISOMIP_LONG/{$mach}/{$dorv}/SHORT/ocean.output 
     63    set f2s = ./WISOMIP_LONG/{$mach}/{$dorv}/SHORT/solver.stat 
     64 
     65    set nl = `wc -l $f2s` 
     66    tail -$nl[1] $f1s > f1.tmp$$ 
     67    cmp -s f1.tmp$$ $f2s 
     68    if ( $status == 0 ) then 
     69      echo "ISOMIP      restartability  passed" 
     70    else 
     71      echo "ISOMIP      restartability  FAILED" 
     72      if ( $pass == 1 ) then 
     73        echo "<return> to view solver.stat differences" 
     74        set y = $< 
     75        sdiff f1.tmp$$ $f2s 
     76        echo "<return> to view ocean.output differences" 
     77        set y = $< 
     78        sdiff $f1o $f2o | grep "|" 
     79        echo "<return> to continue" 
     80        set y = $< 
     81      endif 
     82    endif 
     83    rm f1.tmp$$ 
     84  endif 
     85 
    5786   
    5887  if ( -d ./WORCA2LIMPIS_LONG ) then 
     88    set dorv = `ls -1rtd ./WORCA2LIMPIS_LONG/{$mach}/* | tail -1l ` 
     89    set dorv = $dorv:t 
    5990    set f1o = ./WORCA2LIMPIS_LONG/{$mach}/{$dorv}/LONG/ocean.output 
    6091    set f1s = ./WORCA2LIMPIS_LONG/{$mach}/{$dorv}/LONG/solver.stat 
    … …  
    84115 
    85116  if ( -d ./WORCA2OFFPIS_LONG ) then 
     117    set dorv = `ls -1rtd ./WORCA2OFFPIS_LONG/{$mach}/* | tail -1l ` 
     118    set dorv = $dorv:t 
    86119    set f1o = ./WORCA2OFFPIS_LONG/{$mach}/{$dorv}/LONG/ocean.output 
    87120    set f1s = ./WORCA2OFFPIS_LONG/{$mach}/{$dorv}/LONG/tracer.stat 
    … …  
    111144   
    112145  if ( -d ./WAMM12_LONG ) then 
     146    set dorv = `ls -1rtd ./WAMM12_LONG/{$mach}/* | tail -1l ` 
     147    set dorv = $dorv:t 
    113148    set f1o = ./WAMM12_LONG/{$mach}/{$dorv}/LONG/ocean.output 
    114149    set f1s = ./WAMM12_LONG/{$mach}/{$dorv}/LONG/solver.stat 
    … …  
    136171    rm f1.tmp$$ 
    137172  endif 
    138  
    139 echo 
     173  if ( -d ./WORCA2LIM3_LONG ) then 
     174    set dorv = `ls -1rtd ./WORCA2LIM3_LONG/{$mach}/* | tail -1l ` 
     175    set dorv = $dorv:t 
     176    set f1o = ./WORCA2LIM3_LONG/{$mach}/{$dorv}/LONG/ocean.output 
     177    set f1s = ./WORCA2LIM3_LONG/{$mach}/{$dorv}/LONG/solver.stat 
     178    set f2o = ./WORCA2LIM3_LONG/{$mach}/{$dorv}/SHORT/ocean.output 
     179    set f2s = ./WORCA2LIM3_LONG/{$mach}/{$dorv}/SHORT/solver.stat 
     180    set nl = `wc -l $f2s` 
     181    tail -$nl[1] $f1s > f1.tmp$$ 
     182    cmp -s f1.tmp$$ $f2s 
     183    if ( $status == 0 ) then 
     184      echo "ORCA2LIM3   restartability  passed" 
     185    else 
     186      echo "ORCA2LIM3   restartability  FAILED" 
     187      if ( $pass == 1 ) then 
     188        echo "<return> to view solver.stat differences" 
     189        set y = $< 
     190        sdiff f1.tmp$$ $f2s 
     191        echo "<return> to view ocean.output differences" 
     192        set y = $< 
     193        sdiff $f1o $f2o | grep "|" 
     194        echo "<return> to continue" 
     195        set y = $< 
     196      endif 
     197    endif 
     198    rm f1.tmp$$ 
     199  endif 
     200 
     201  if ( -d ./WSAS_LONG ) then 
     202    set dorv = `ls -1rtd ./WSAS_LONG/{$mach}/* | tail -1l ` 
     203    set dorv = $dorv:t 
     204    set f1o = ./WSAS_LONG/{$mach}/{$dorv}/LONG/ocean.output 
     205    set f1s = ./WSAS_LONG/{$mach}/{$dorv}/LONG/solver.stat 
     206    set f2o = ./WSAS_LONG/{$mach}/{$dorv}/SHORT/ocean.output 
     207    set f2s = ./WSAS_LONG/{$mach}/{$dorv}/SHORT/solver.stat 
     208    foreach f ( $f1o $f1s $f2o $f2s ) 
     209     if ( ! -f $f ) then 
     210      echo 'SAS         restartability  inconclusive ( ' $f:t ' not found )' 
     211      goto NEXT1 
     212     endif 
     213    end 
     214 
     215    set nl = `wc -l $f2s` 
     216    tail -$nl[1] $f1s > f1.tmp$$ 
     217    cmp -s f1.tmp$$ $f2s 
     218    if ( $status == 0 ) then 
     219      echo "SAS         restartability  passed" 
     220    else 
     221      echo "SAS         restartability  FAILED" 
     222      if ( $pass == 1 ) then 
     223        echo "<return> to view solver.stat differences" 
     224        set y = $< 
     225        sdiff f1.tmp$$ $f2s 
     226        echo "<return> to view ocean.output differences" 
     227        set y = $< 
     228        sdiff $f1o $f2o | grep "|" 
     229        echo "<return> to continue" 
     230        set y = $< 
     231      endif 
     232    endif 
     233    rm f1.tmp$$ 
     234  endif 
     235 
     236NEXT1: 
    140237   
    141238  if ( -d ./WGYRE_4 ) then 
     239    set dorv = `ls -1rtd ./WGYRE_4/{$mach}/* | tail -1l ` 
     240    set dorv = $dorv:t 
    142241    set f1o = ./WGYRE_4/{$mach}/{$dorv}/REPRO_1_4/ocean.output 
    143242    set f1s = ./WGYRE_4/{$mach}/{$dorv}/REPRO_1_4/solver.stat 
    … …  
    147246    cmp -s $f1s $f2s 
    148247    if ( $status == 0 ) then 
    149       echo "GYRE     reproducibility passed" 
    150     else 
    151       echo "GYRE     reproducibility FAILED" 
    152       if ( $pass == 1 ) then 
    153         echo "<return> to view solver.stat differences" 
    154         set y = $< 
    155         sdiff $f1s $f2s 
    156         echo "<return> to view ocean.output differences" 
    157         set y = $< 
    158         sdiff $f1o $f2o | grep "|" 
    159         echo "<return> to continue" 
    160         set y = $< 
    161       endif 
    162     endif 
    163   endif 
    164    
     248      echo "GYRE        reproducibility passed" 
     249    else 
     250      echo "GYRE        reproducibility FAILED" 
     251      if ( $pass == 1 ) then 
     252        echo "<return> to view solver.stat differences" 
     253        set y = $< 
     254        sdiff $f1s $f2s 
     255        echo "<return> to view ocean.output differences" 
     256        set y = $< 
     257        sdiff $f1o $f2o | grep "|" 
     258        echo "<return> to continue" 
     259        set y = $< 
     260      endif 
     261    endif 
     262  endif 
     263 
     264  if ( -d ./WISOMIP_4 ) then 
     265    set dorv = `ls -1rtd ./WISOMIP_4/{$mach}/* | tail -1l ` 
     266    set dorv = $dorv:t 
     267    set f1o = ./WISOMIP_4/{$mach}/{$dorv}/REPRO_1_4/ocean.output 
     268    set f1s = ./WISOMIP_4/{$mach}/{$dorv}/REPRO_1_4/solver.stat 
     269    set f2o = ./WISOMIP_4/{$mach}/{$dorv}/REPRO_2_2/ocean.output 
     270    set f2s = ./WISOMIP_4/{$mach}/{$dorv}/REPRO_2_2/solver.stat 
     271 
     272    cmp -s $f1s $f2s 
     273    if ( $status == 0 ) then 
     274      echo "ISOMIP      reproducibility passed" 
     275    else 
     276      echo "ISOMIP      reproducibility FAILED" 
     277      if ( $pass == 1 ) then 
     278        echo "<return> to view solver.stat differences" 
     279        set y = $< 
     280        sdiff $f1s $f2s 
     281        echo "<return> to view ocean.output differences" 
     282        set y = $< 
     283        sdiff $f1o $f2o | grep "|" 
     284        echo "<return> to continue" 
     285        set y = $< 
     286      endif 
     287    endif 
     288  endif 
     289  
    165290  if ( -d ./WORCA2LIMPIS_16 ) then 
     291    set dorv = `ls -1rtd ./WORCA2LIMPIS_16/{$mach}/* | tail -1l ` 
     292    set dorv = $dorv:t 
    166293    set f1o = ./WORCA2LIMPIS_16/{$mach}/{$dorv}/REPRO_2_8/ocean.output 
    167294    set f1s = ./WORCA2LIMPIS_16/{$mach}/{$dorv}/REPRO_2_8/solver.stat 
    … …  
    188315 
    189316  if ( -d ./WORCA2OFFPIS_16 ) then 
     317    set dorv = `ls -1rtd ./WORCA2OFFPIS_16/{$mach}/* | tail -1l ` 
     318    set dorv = $dorv:t 
    190319    set f1o = ./WORCA2OFFPIS_16/{$mach}/{$dorv}/REPRO_2_8/ocean.output 
    191320    set f1s = ./WORCA2OFFPIS_16/{$mach}/{$dorv}/REPRO_2_8/tracer.stat 
    … …  
    212341   
    213342  if ( -d ./WAMM12_32 ) then 
     343    set dorv = `ls -1rtd ./WAMM12_32/{$mach}/* | tail -1l ` 
     344    set dorv = $dorv:t 
    214345    set f1o = ./WAMM12_32/{$mach}/{$dorv}/REPRO_4_8/ocean.output 
    215346    set f1s = ./WAMM12_32/{$mach}/{$dorv}/REPRO_4_8/solver.stat 
    … …  
    235366  endif 
    236367 
     368  if ( -d ./WORCA2LIM3_16 ) then 
     369    set dorv = `ls -1rtd ./WORCA2LIM3_16/{$mach}/* | tail -1l ` 
     370    set dorv = $dorv:t 
     371    set f1o = ./WORCA2LIM3_16/{$mach}/{$dorv}/REPRO_2_8/ocean.output 
     372    set f1s = ./WORCA2LIM3_16/{$mach}/{$dorv}/REPRO_2_8/solver.stat 
     373    set f2o = ./WORCA2LIM3_16/{$mach}/{$dorv}/REPRO_4_4/ocean.output 
     374    set f2s = ./WORCA2LIM3_16/{$mach}/{$dorv}/REPRO_4_4/solver.stat 
     375 
     376    cmp -s $f1s $f2s 
     377    if ( $status == 0 ) then 
     378      echo "ORCA2LIM3   reproducibility passed" 
     379    else 
     380      echo "ORCA2LIM3   reproducibility FAILED" 
     381      if ( $pass == 1 ) then 
     382        echo "<return> to view solver.stat differences" 
     383        set y = $< 
     384        sdiff $f1s $f2s 
     385        echo "<return> to view ocean.output differences" 
     386        set y = $< 
     387        sdiff $f1o $f2o | grep "|" 
     388        echo "<return> to continue" 
     389        set y = $< 
     390      endif 
     391    endif 
     392  endif 
     393 
     394 
     395  if ( -d ./WSAS_32 ) then 
     396    set dorv = `ls -1rtd ./WSAS_32/{$mach}/* | tail -1l ` 
     397    set dorv = $dorv:t 
     398    set f1o = ./WSAS_32/{$mach}/{$dorv}/REPRO_4_8/ocean.output 
     399    set f1s = ./WSAS_32/{$mach}/{$dorv}/REPRO_4_8/solver.stat 
     400    set f2o = ./WSAS_32/{$mach}/{$dorv}/REPRO_8_4/ocean.output 
     401    set f2s = ./WSAS_32/{$mach}/{$dorv}/REPRO_8_4/solver.stat 
     402 
     403    foreach f ( $f1o $f1s $f2o $f2s ) 
     404     if ( ! -f $f ) then 
     405      echo 'SAS         reproducibility inconclusive ( ' $f:t ' not found )' 
     406      goto NEXT2 
     407     endif 
     408    end 
     409 
     410    cmp -s $f1s $f2s 
     411    if ( $status == 0 ) then 
     412      echo "SAS reproducibility passed" 
     413    else 
     414      echo "SAS reproducibility FAILED" 
     415      if ( $pass == 1 ) then 
     416        echo "<return> to view solver.stat differences" 
     417        set y = $< 
     418        sdiff $f1s $f2s 
     419        echo "<return> to view ocean.output differences" 
     420        set y = $< 
     421        sdiff $f1o $f2o | grep "|" 
     422        echo "<return> to continue" 
     423        set y = $< 
     424      endif 
     425    endif 
     426  endif 
     427NEXT2: 
     428 
    237429  if ( -d ./WORCA2AGUL_1_2 ) then 
     430    set dorv = `ls -1rtd ./WORCA2AGUL_1_2/{$mach}/* | tail -1l ` 
     431    set dorv = $dorv:t 
    238432    set f1o = ./WORCA2AGUL_1_2/{$mach}/{$dorv}/SHORT/ocean.output 
    239433    set f1s = ./WORCA2AGUL_1_2/{$mach}/{$dorv}/SHORT/solver.stat 
Note: See TracChangeset for help on using the changeset viewer.