@@ -78,7 +78,7 @@ OPTIONS
78
78
-cppdefs <string> A string of user specified CPP defines. Appended to
79
79
Makefile defaults. E.g. -cppdefs '-DVAR1 -DVAR2'
80
80
-cpl Coupling framework [mct | nuopc]. Default: mct.
81
- -dyn <name> Dynamical core option: [eul | fv | se | fv3 | mpas]. Default: fv.
81
+ -dyn <name> Dynamical core option: [fv | se | fv3 | mpas]. Default: fv.
82
82
-edit_chem_mech Invokes CAMCHEM_EDITOR to allow the user to edit the chemistry mechanism file
83
83
-hgrid <name> Specify horizontal grid. Use nlatxnlon for spectral grids;
84
84
dlatxdlon for fv grids (dlat and dlon are the grid cell size
@@ -115,7 +115,6 @@ OPTIONS
115
115
Options relevent to SCAM mode:
116
116
117
117
-camiop Configure CAM to generate an IOP file that can be used to drive SCAM.
118
- This switch only works with the Eulerian dycore.
119
118
-scam <iopname> Compiles model in single column mode and configures for iop
120
119
[ arm95 | arm97 | atex | bomex | cgilsS11 | cgilsS12 | cgilsS6 | dycomsRF01 |
121
120
dycomsRF02 | gateIII | mpace | rico | sparticus | togaII | twp06 | SAS | camfrc ].
@@ -686,14 +685,6 @@ $waccm_phys = $cfg_ref->get('waccm_phys');
686
685
687
686
if ($print >=2) { print " WACCM physics: $waccm_phys$eol " ; }
688
687
689
-
690
- # WACCM physics only runs with FV, SE and FV3 dycores
691
- if ( ($waccm_phys ) and ($dyn_pkg eq ' eul' ) ) {
692
- die <<"EOF" ;
693
- ** ERROR: WACCM physics does not run with the Eulerian spectral dycore.
694
- EOF
695
- }
696
-
697
688
# WACCM includes 4 age of air tracers by default
698
689
if ($chem_pkg =~ / waccm_ma/ or $chem_pkg =~ / waccm_tsmlt/ ) {
699
690
$cfg_ref -> set(' age_of_air_trcs' , 1);
@@ -1107,10 +1098,10 @@ if (defined $opts{'scam'}) {
1107
1098
}
1108
1099
my $scam = $cfg_ref -> get(' scam' ) ? " ON" : " OFF" ;
1109
1100
1110
- # The only dycores supported in SCAM mode are Eulerian and Spectral Elements
1111
- if ($scam eq ' ON' and !($dyn_pkg eq ' eul ' or $dyn_pkg eq ' se' )) {
1101
+ # The only dycore supported in SCAM mode is the Spectral Element
1102
+ if ($scam eq ' ON' and !($dyn_pkg eq ' se' )) {
1112
1103
die <<"EOF" ;
1113
- ** ERROR: SCAM mode only works with Eulerian or SE dycores .
1104
+ ** ERROR: SCAM mode only works with SE dycore .
1114
1105
** Requested dycore is: $dyn_pkg
1115
1106
EOF
1116
1107
}
@@ -1124,10 +1115,10 @@ if (defined $opts{'camiop'}) {
1124
1115
}
1125
1116
my $camiop = $cfg_ref -> get(' camiop' ) ? " ON" : " OFF" ;
1126
1117
1127
- # The only dycores supported in SCAM mode are Eulerian and Spectral Elements
1128
- if ($camiop eq ' ON' and !($dyn_pkg eq ' eul ' or $dyn_pkg eq ' se' )) {
1118
+ # The only dycore supported in SCAM mode is the Spectral Element
1119
+ if ($camiop eq ' ON' and !($dyn_pkg eq ' se' )) {
1129
1120
die <<"EOF" ;
1130
- ** ERROR: CAMIOP mode only works with the Eulerian or Spectral Element dycores .
1121
+ ** ERROR: CAMIOP mode only works with the Spectral Element dycore .
1131
1122
** Requested dycore is: $dyn_pkg
1132
1123
EOF
1133
1124
}
@@ -1141,9 +1132,6 @@ my $hgrid;
1141
1132
if ($dyn_pkg eq ' fv' ) {
1142
1133
$hgrid = ' 1.9x2.5' ;
1143
1134
}
1144
- elsif ($dyn_pkg eq ' eul' ) {
1145
- $hgrid = ' 64x128' ;
1146
- }
1147
1135
elsif ($dyn_pkg eq ' se' ) {
1148
1136
$hgrid = ' ne16np4' ;
1149
1137
}
@@ -1788,12 +1776,6 @@ $cfg_cppdefs .= " -DPLEV=$nlev -DPCNST=$nadv -DPCOLS=$pcols -DPSUBCOLS=$psubcols
1788
1776
# Radiatively active constituent number
1789
1777
$cfg_cppdefs .= " -DN_RAD_CNST=$max_n_rad_cnst " ;
1790
1778
1791
- # Spectral truncation parameters
1792
- my $trm = $cfg_ref -> get(' trm' );
1793
- my $trn = $cfg_ref -> get(' trn' );
1794
- my $trk = $cfg_ref -> get(' trk' );
1795
- $cfg_cppdefs .= " -DPTRM=$trm -DPTRN=$trn -DPTRK=$trk " ;
1796
-
1797
1779
# offline driver for FV dycore
1798
1780
if ($offline_dyn ) { $cfg_cppdefs .= ' -DOFFLINE_DYN' ; }
1799
1781
@@ -2192,11 +2174,6 @@ sub write_filepath
2192
2174
print $fh " $camsrcdir /src/utils/pilgrim\n " ;
2193
2175
}
2194
2176
2195
- # Advective transport
2196
- if ($dyn eq ' eul' ) {
2197
- print $fh " $camsrcdir /src/advection/slt\n " ;
2198
- }
2199
-
2200
2177
print $fh " $camsrcdir /src/cpl/$cpl \n " ;
2201
2178
print $fh " $camsrcdir /src/control\n " ;
2202
2179
print $fh " $camsrcdir /src/utils\n " ;
@@ -2373,9 +2350,9 @@ sub set_horiz_grid
2373
2350
$hgrid =~ m / C(\d +)/ ;
2374
2351
$cfg_ref -> set(' hgrid' , $hgrid );
2375
2352
}
2376
- elsif ($dyn_pkg =~ m / ^eul $ |^ fv/ ) {
2353
+ elsif ($dyn_pkg =~ m / ^fv/ ) {
2377
2354
2378
- # For EUL and FV dycores the parameters are read from an input file,
2355
+ # For FV dycore the parameters are read from an input file,
2379
2356
# and if no dycore/grid matches are found then issue error message.
2380
2357
2381
2358
my $xml = XML::Lite-> new( $hgrid_file );
@@ -2404,26 +2381,7 @@ sub set_horiz_grid
2404
2381
unless ($found ) { die " set_horiz_grid: no match for dycore $dyn_pkg and hgrid $hgrid \n " ; }
2405
2382
2406
2383
# Set parameter values -- dycore specific.
2407
- if ( $dyn_pkg =~ m / eul/ ) {
2408
- $cfg_ref -> set(' nlat' , $a {' nlat' });
2409
- $cfg_ref -> set(' nlon' , $a {' nlon' });
2410
- $cfg_ref -> set(' trm' , $a {' m' });
2411
- $cfg_ref -> set(' trn' , $a {' n' });
2412
- $cfg_ref -> set(' trk' , $a {' k' });
2413
-
2414
- # Override resolution settings to configure for SCAM mode. The override is needed
2415
- # because in SCAM mode the -hgrid option is used to specify the resolution of default
2416
- # datasets from which single data columns are extracted.
2417
- my $scam = $cfg_ref -> get(' scam' );
2418
- if ($scam ) {
2419
- $cfg_ref -> set(' nlat' , 1);
2420
- $cfg_ref -> set(' nlon' , 1);
2421
- $cfg_ref -> set(' trm' , 1);
2422
- $cfg_ref -> set(' trn' , 1);
2423
- $cfg_ref -> set(' trk' , 1);
2424
- }
2425
- }
2426
- elsif ( $dyn_pkg eq ' fv' ) {
2384
+ if ( $dyn_pkg eq ' fv' ) {
2427
2385
$cfg_ref -> set(' nlat' , $a {' nlat' });
2428
2386
$cfg_ref -> set(' nlon' , $a {' nlon' });
2429
2387
}
0 commit comments