Improve parameter check script error message

This commit is contained in:
Shahram Najm 2019-05-28 13:54:56 +01:00
parent 10b96260e0
commit e605915cd2
1 changed files with 2 additions and 1 deletions

View File

@ -194,7 +194,8 @@ sub process {
exists($map2{'scaleFactorOfSecondFixedSurface'}) ||
exists($map2{'scaledValueOfSecondFixedSurface'})) )
{
print "File: $filename, line: $lineNum: TypeOfSurface problem (GRIB-229): Please check: $desc\n";
print "File: $filename, line: $lineNum: TypeOfSurface issue: Please check: \"$desc\" ($concept)\n";
print " Make sure the 'typeOfSecondFixedSurface' key comes BEFORE all the scale keys\n";
#print "DUMP,\t", Data::Dumper->Dump([\%map2], [" "]);
$error = 1;
}