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

Ignore:
Timestamp:
2014-11-28T18:24:01+01:00 (9 years ago)
Author:
mathiot
Message:

UKM02_ice_shelves merged and SETTE tested with revision 4879 of trunk

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/2014/dev_r4650_UKMO2_ice_shelves/NEMOGCM/SETTE/sette_rpt

    r3725 r4924  
    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  
     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 
     181    set nl = `wc -l $f2s` 
     182    tail -$nl[1] $f1s > f1.tmp$$ 
     183    cmp -s f1.tmp$$ $f2s 
     184    if ( $status == 0 ) then 
     185      echo "ORCA2LIM3       restartability  passed" 
     186    else 
     187      echo "ORCA2LIM3       restartability  FAILED" 
     188      if ( $pass == 1 ) then 
     189        echo "<return> to view solver.stat differences" 
     190        set y = $< 
     191        sdiff f1.tmp$$ $f2s 
     192        echo "<return> to view ocean.output differences" 
     193        set y = $< 
     194        sdiff $f1o $f2o | grep "|" 
     195        echo "<return> to continue" 
     196        set y = $< 
     197      endif 
     198    endif 
     199    rm f1.tmp$$ 
     200  endif 
     201NEXT0: 
     202  if ( -d ./WSAS_LONG ) then 
     203    set dorv = `ls -1rtd ./WSAS_LONG/{$mach}/* | tail -1l ` 
     204    set dorv = $dorv:t 
     205    set f1o = ./WSAS_LONG/{$mach}/{$dorv}/LONG/ocean.output 
     206    set f1s = ./WSAS_LONG/{$mach}/{$dorv}/LONG/solver.stat 
     207    set f2o = ./WSAS_LONG/{$mach}/{$dorv}/SHORT/ocean.output 
     208    set f2s = ./WSAS_LONG/{$mach}/{$dorv}/SHORT/solver.stat 
     209 
     210    foreach f ( $f1o $f1s $f2o $f2s ) 
     211     if ( ! -f $f ) then 
     212      echo 'SAS         restartability  inconclusive ( ' $f:t ' not found )' 
     213      goto NEXT 
     214     endif 
     215    end 
     216 
     217    set nl = `wc -l $f2s` 
     218    tail -$nl[1] $f1s > f1.tmp$$ 
     219    cmp -s f1.tmp$$ $f2s 
     220    if ( $status == 0 ) then 
     221      echo "SAS         restartability  passed" 
     222    else 
     223      echo "SAS         restartability  FAILED" 
     224      if ( $pass == 1 ) then 
     225        echo "<return> to view solver.stat differences" 
     226        set y = $< 
     227        sdiff f1.tmp$$ $f2s 
     228        echo "<return> to view ocean.output differences" 
     229        set y = $< 
     230        sdiff $f1o $f2o | grep "|" 
     231        echo "<return> to continue" 
     232        set y = $< 
     233      endif 
     234    endif 
     235    rm f1.tmp$$ 
     236  endif 
     237 
     238NEXT: 
    139239echo 
    140240   
    141241  if ( -d ./WGYRE_4 ) then 
     242    set dorv = `ls -1rtd ./WGYRE_4/{$mach}/* | tail -1l ` 
     243    set dorv = $dorv:t 
    142244    set f1o = ./WGYRE_4/{$mach}/{$dorv}/REPRO_1_4/ocean.output 
    143245    set f1s = ./WGYRE_4/{$mach}/{$dorv}/REPRO_1_4/solver.stat 
    … …  
    147249    cmp -s $f1s $f2s 
    148250    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    
     251      echo "GYRE        reproducibility passed" 
     252    else 
     253      echo "GYRE        reproducibility FAILED" 
     254      if ( $pass == 1 ) then 
     255        echo "<return> to view solver.stat differences" 
     256        set y = $< 
     257        sdiff $f1s $f2s 
     258        echo "<return> to view ocean.output differences" 
     259        set y = $< 
     260        sdiff $f1o $f2o | grep "|" 
     261        echo "<return> to continue" 
     262        set y = $< 
     263      endif 
     264    endif 
     265  endif 
     266 
     267  if ( -d ./WISOMIP_4 ) then 
     268    set dorv = `ls -1rtd ./WISOMIP_4/{$mach}/* | tail -1l ` 
     269    set dorv = $dorv:t 
     270    set f1o = ./WISOMIP_4/{$mach}/{$dorv}/REPRO_1_4/ocean.output 
     271    set f1s = ./WISOMIP_4/{$mach}/{$dorv}/REPRO_1_4/solver.stat 
     272    set f2o = ./WISOMIP_4/{$mach}/{$dorv}/REPRO_2_2/ocean.output 
     273    set f2s = ./WISOMIP_4/{$mach}/{$dorv}/REPRO_2_2/solver.stat 
     274 
     275    cmp -s $f1s $f2s 
     276    if ( $status == 0 ) then 
     277      echo "ISOMIP      reproducibility passed" 
     278    else 
     279      echo "ISOMIP      reproducibility FAILED" 
     280      if ( $pass == 1 ) then 
     281        echo "<return> to view solver.stat differences" 
     282        set y = $< 
     283        sdiff $f1s $f2s 
     284        echo "<return> to view ocean.output differences" 
     285        set y = $< 
     286        sdiff $f1o $f2o | grep "|" 
     287        echo "<return> to continue" 
     288        set y = $< 
     289      endif 
     290    endif 
     291  endif 
     292  
    165293  if ( -d ./WORCA2LIMPIS_16 ) then 
     294    set dorv = `ls -1rtd ./WORCA2LIMPIS_16/{$mach}/* | tail -1l ` 
     295    set dorv = $dorv:t 
    166296    set f1o = ./WORCA2LIMPIS_16/{$mach}/{$dorv}/REPRO_2_8/ocean.output 
    167297    set f1s = ./WORCA2LIMPIS_16/{$mach}/{$dorv}/REPRO_2_8/solver.stat 
    … …  
    188318 
    189319  if ( -d ./WORCA2OFFPIS_16 ) then 
     320    set dorv = `ls -1rtd ./WORCA2OFFPIS_16/{$mach}/* | tail -1l ` 
     321    set dorv = $dorv:t 
    190322    set f1o = ./WORCA2OFFPIS_16/{$mach}/{$dorv}/REPRO_2_8/ocean.output 
    191323    set f1s = ./WORCA2OFFPIS_16/{$mach}/{$dorv}/REPRO_2_8/tracer.stat 
    … …  
    212344   
    213345  if ( -d ./WAMM12_32 ) then 
     346    set dorv = `ls -1rtd ./WAMM12_32/{$mach}/* | tail -1l ` 
     347    set dorv = $dorv:t 
    214348    set f1o = ./WAMM12_32/{$mach}/{$dorv}/REPRO_4_8/ocean.output 
    215349    set f1s = ./WAMM12_32/{$mach}/{$dorv}/REPRO_4_8/solver.stat 
    … …  
    234368    endif 
    235369  endif 
     370  if ( -d ./WORCA2LIM3_16 ) then 
     371    set dorv = `ls -1rtd ./WORCA2LIM3_16/{$mach}/* | tail -1l ` 
     372    set dorv = $dorv:t 
     373    set f1o = ./WORCA2LIM3_16/{$mach}/{$dorv}/REPRO_2_8/ocean.output 
     374    set f1s = ./WORCA2LIM3_16/{$mach}/{$dorv}/REPRO_2_8/solver.stat 
     375    set f2o = ./WORCA2LIM3_16/{$mach}/{$dorv}/REPRO_4_4/ocean.output 
     376    set f2s = ./WORCA2LIM3_16/{$mach}/{$dorv}/REPRO_4_4/solver.stat 
     377 
     378    cmp -s $f1s $f2s 
     379    if ( $status == 0 ) then 
     380      echo "ORCA2LIM3   reproducibility passed" 
     381    else 
     382      echo "ORCA2LIM3   reproducibility FAILED" 
     383      if ( $pass == 1 ) then 
     384        echo "<return> to view solver.stat differences" 
     385        set y = $< 
     386        sdiff $f1s $f2s 
     387        echo "<return> to view ocean.output differences" 
     388        set y = $< 
     389        sdiff $f1o $f2o | grep "|" 
     390        echo "<return> to continue" 
     391        set y = $< 
     392      endif 
     393    endif 
     394  endif 
     395 
     396 
     397  if ( -d ./WSAS_32 ) then 
     398    set dorv = `ls -1rtd ./WSAS_32/{$mach}/* | tail -1l ` 
     399    set dorv = $dorv:t 
     400    set f1o = ./WSAS_32/{$mach}/{$dorv}/REPRO_4_8/ocean.output 
     401    set f1s = ./WSAS_32/{$mach}/{$dorv}/REPRO_4_8/solver.stat 
     402    set f2o = ./WSAS_32/{$mach}/{$dorv}/REPRO_8_4/ocean.output 
     403    set f2s = ./WSAS_32/{$mach}/{$dorv}/REPRO_8_4/solver.stat 
     404 
     405    foreach f ( $f1o $f1s $f2o $f2s ) 
     406     if ( ! -f $f ) then 
     407      echo 'SAS         reproducibility inconclusive ( ' $f:t ' not found )' 
     408      goto NEXT1 
     409     endif 
     410    end 
     411 
     412    cmp -s $f1s $f2s 
     413    if ( $status == 0 ) then 
     414      echo "SAS reproducibility passed" 
     415    else 
     416      echo "SAS reproducibility FAILED" 
     417      if ( $pass == 1 ) then 
     418        echo "<return> to view solver.stat differences" 
     419        set y = $< 
     420        sdiff $f1s $f2s 
     421        echo "<return> to view ocean.output differences" 
     422        set y = $< 
     423        sdiff $f1o $f2o | grep "|" 
     424        echo "<return> to continue" 
     425        set y = $< 
     426      endif 
     427    endif 
     428  endif 
     429NEXT1: 
    236430 
    237431  if ( -d ./WORCA2AGUL_1_2 ) then 
     432    set dorv = `ls -1rtd ./WORCA2AGUL_1_2/{$mach}/* | tail -1l ` 
     433    set dorv = $dorv:t 
    238434    set f1o = ./WORCA2AGUL_1_2/{$mach}/{$dorv}/SHORT/ocean.output 
    239435    set f1s = ./WORCA2AGUL_1_2/{$mach}/{$dorv}/SHORT/solver.stat 
Note: See TracChangeset for help on using the changeset viewer.