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 3715 for branches/2012/dev_MERGE_2012/NEMOGCM/SETTE/sette_rpt – NEMO

Ignore:
Timestamp:
2012-11-28T17:06:02+01:00 (11 years ago)
Author:
acc
Message:

Branch dev_MERGE_2012. Tidying of iodef files and tools for SETTE.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/2012/dev_MERGE_2012/NEMOGCM/SETTE/sette_rpt

    r3667 r3715  
    2929#   
    3030foreach pass (0 1 ) 
    31  
    32   if ( -d ./WGYRELOB_LONG ) then 
    33     set f1o = ./WGYRELOB_LONG/{$mach}/{$dorv}/LONG/ocean.output 
    34     set f1s = ./WGYRELOB_LONG/{$mach}/{$dorv}/LONG/solver.stat 
    35     set f2o = ./WGYRELOB_LONG/{$mach}/{$dorv}/SHORT/ocean.output 
    36     set f2s = ./WGYRELOB_LONG/{$mach}/{$dorv}/SHORT/solver.stat 
    37    
    38     set nl = `wc -l $f2s` 
    39     tail -$nl[1] $f1s > f1.tmp$$ 
    40     cmp -s f1.tmp$$ $f2s 
    41     if ( $status == 0 ) then 
    42       echo "GYRELOB     restartability  passed" 
    43     else 
    44       echo "GYRELOB     restartability  FAILED" 
    45       if ( $pass == 1 ) then 
    46         echo "<return> to view solver.stat differences" 
    47         set y = $< 
    48         sdiff -W f1.tmp$$ $f2s 
    49         echo "<return> to view ocean.output differences" 
    50         set y = $< 
    51         sdiff -W $f1o $f2o | grep "|" 
     31  if ( -d ./WGYRE_LONG ) then 
     32    set f1o = ./WGYRE_LONG/{$mach}/{$dorv}/LONG/ocean.output 
     33    set f1s = ./WGYRE_LONG/{$mach}/{$dorv}/LONG/solver.stat 
     34    set f2o = ./WGYRE_LONG/{$mach}/{$dorv}/SHORT/ocean.output 
     35    set f2s = ./WGYRE_LONG/{$mach}/{$dorv}/SHORT/solver.stat 
     36   
     37    set nl = `wc -l $f2s` 
     38    tail -$nl[1] $f1s > f1.tmp$$ 
     39    cmp -s f1.tmp$$ $f2s 
     40    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 "|" 
    5251        echo "<return> to continue" 
    5352        set y = $< 
    … …  
    7372        echo "<return> to view solver.stat differences" 
    7473        set y = $< 
    75         sdiff -W f1.tmp$$ $f2s 
    76         echo "<return> to view ocean.output differences" 
    77         set y = $< 
    78         sdiff -W $f1o $f2o | grep "|" 
     74        sdiff f1.tmp$$ $f2s 
     75        echo "<return> to view ocean.output differences" 
     76        set y = $< 
     77        sdiff $f1o $f2o | grep "|" 
    7978        echo "<return> to continue" 
    8079        set y = $< 
    … …  
    10099        echo "<return> to view tracer.stat differences" 
    101100        set y = $< 
    102         sdiff -W f1.tmp$$ $f2s 
    103         echo "<return> to view ocean.output differences" 
    104         set y = $< 
    105         sdiff -W $f1o $f2o | grep "|" 
     101        sdiff f1.tmp$$ $f2s 
     102        echo "<return> to view ocean.output differences" 
     103        set y = $< 
     104        sdiff $f1o $f2o | grep "|" 
    106105        echo "<return> to continue" 
    107106        set y = $< 
    … …  
    127126        echo "<return> to view solver.stat differences" 
    128127        set y = $< 
    129         sdiff -W f1.tmp$$ $f2s 
    130         echo "<return> to view ocean.output differences" 
    131         set y = $< 
    132         sdiff -W $f1o $f2o | grep "|" 
     128        sdiff f1.tmp$$ $f2s 
     129        echo "<return> to view ocean.output differences" 
     130        set y = $< 
     131        sdiff $f1o $f2o | grep "|" 
    133132        echo "<return> to continue" 
    134133        set y = $< 
    … …  
    140139echo 
    141140   
    142   if ( -d ./WGYRELOB_4 ) then 
    143     set f1o = ./WGYRELOB_4/{$mach}/{$dorv}/REPRO_1_4/ocean.output 
    144     set f1s = ./WGYRELOB_4/{$mach}/{$dorv}/REPRO_1_4/solver.stat 
    145     set f2o = ./WGYRELOB_4/{$mach}/{$dorv}/REPRO_2_2/ocean.output 
    146     set f2s = ./WGYRELOB_4/{$mach}/{$dorv}/REPRO_2_2/solver.stat 
    147    
    148     cmp -s $f1s $f2s 
    149     if ( $status == 0 ) then 
    150       echo "GYRELOB     reproducibility passed" 
    151     else 
    152       echo "GYRELOB     reproducibility FAILED" 
    153       if ( $pass == 1 ) then 
    154         echo "<return> to view solver.stat differences" 
    155         set y = $< 
    156         sdiff -W $f1s $f2s 
    157         echo "<return> to view ocean.output differences" 
    158         set y = $< 
    159         sdiff -W $f1o $f2o | grep "|" 
     141  if ( -d ./WGYRE_4 ) then 
     142    set f1o = ./WGYRE_4/{$mach}/{$dorv}/REPRO_1_4/ocean.output 
     143    set f1s = ./WGYRE_4/{$mach}/{$dorv}/REPRO_1_4/solver.stat 
     144    set f2o = ./WGYRE_4/{$mach}/{$dorv}/REPRO_2_2/ocean.output 
     145    set f2s = ./WGYRE_4/{$mach}/{$dorv}/REPRO_2_2/solver.stat 
     146   
     147    cmp -s $f1s $f2s 
     148    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 "|" 
    160159        echo "<return> to continue" 
    161160        set y = $< 
    … …  
    178177        echo "<return> to view solver.stat differences" 
    179178        set y = $< 
    180         sdiff -W $f1s $f2s 
    181         echo "<return> to view ocean.output differences" 
    182         set y = $< 
    183         sdiff -W $f1o $f2o | grep "|" 
     179        sdiff $f1s $f2s 
     180        echo "<return> to view ocean.output differences" 
     181        set y = $< 
     182        sdiff $f1o $f2o | grep "|" 
    184183        echo "<return> to continue" 
    185184        set y = $< 
    … …  
    202201        echo "<return> to view tracer.stat differences" 
    203202        set y = $< 
    204         sdiff -W $f1s $f2s 
    205         echo "<return> to view ocean.output differences" 
    206         set y = $< 
    207         sdiff -W $f1o $f2o | grep "|" 
     203        sdiff $f1s $f2s 
     204        echo "<return> to view ocean.output differences" 
     205        set y = $< 
     206        sdiff $f1o $f2o | grep "|" 
    208207        echo "<return> to continue" 
    209208        set y = $< 
    … …  
    226225        echo "<return> to view solver.stat differences" 
    227226        set y = $< 
    228         sdiff -W $f1s $f2s 
    229         echo "<return> to view ocean.output differences" 
    230         set y = $< 
    231         sdiff -W $f1o $f2o | grep "|" 
    232         echo "<return> to continue" 
    233         set y = $< 
    234       endif 
     227        sdiff $f1s $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  endif 
     236 
     237  if ( -d ./WORCA2AGUL_1_2 ) then 
     238    set f1o = ./WORCA2AGUL_1_2/{$mach}/{$dorv}/SHORT/ocean.output 
     239    set f1s = ./WORCA2AGUL_1_2/{$mach}/{$dorv}/SHORT/solver.stat 
     240 
     241    if ( -f $f1o && -f  $f1s ) then 
     242      echo "ORCA2_LIM_AGRIF runability passed" 
     243    else 
     244      echo "ORCA2_LIM_AGRIF runability FAILED" 
    235245    endif 
    236246  endif 
Note: See TracChangeset for help on using the changeset viewer.