diff --git a/definitions/grib2/template.4.horizontal.def b/definitions/grib2/template.4.horizontal.def
index 4e58946dd..e6b1aec13 100755
--- a/definitions/grib2/template.4.horizontal.def
+++ b/definitions/grib2/template.4.horizontal.def
@@ -74,7 +74,7 @@ if (extraDim) {
             alias mars.levelist = level;
         }
     }
-    concept mars.levtype (unknown,"marsLevtypeConcept.def",conceptsDir2,conceptsDir1):no_copy;
+    concept mars.levtype (unknown,"marsLevtypeConcept.def",conceptsDir2,conceptsDir1):no_copy,read_only;
     # GRIB-372: levelist alias does not pertain to surface parameters
     if (levtype is "sfc") {
         unalias mars.levelist;
diff --git a/tests/grib_set.sh b/tests/grib_set.sh
index ce208f44f..f41ed572d 100755
--- a/tests/grib_set.sh
+++ b/tests/grib_set.sh
@@ -39,7 +39,7 @@ outfile=${data_dir}/set.grib2
 
 rm -f $outfile
 
-${tools_dir}/grib_set -v -p levtype:l,centre:s  -s levtype=pl,centre:s=cnmc $infile $outfile >$REDIRECT
+${tools_dir}/grib_set -v -p levtype:l,centre:s  -s typeOfLevel=isobaricInhPa,centre:s=cnmc $infile $outfile >$REDIRECT
 
 levtype=`${tools_dir}/grib_get -p levtype $outfile`
 [ $levtype = "pl" ]