Subversion Repositories lagranto.icon

Rev

Rev 3 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3 Rev 10
Line 191... Line 191...
191
 
191
 
192
# Now looking at the vertical grid specifier
192
# Now looking at the vertical grid specifier
193
$cmd = @field[2];
193
$cmd = @field[2];
194
 
194
 
195
# Check for allowed coordinate axes
195
# Check for allowed coordinate axes
196
if ( ($cmd ne "m") && ($cmd ne "m,agl") && ($cmd ne "hPa") && ($cmd ne "K") && ($cmd ne "PVU") && ($cmd ne "INDEX") )
196
if ( ($cmd ne "m") && ($cmd ne "m,agl") && ($cmd ne "hPa")  && ($cmd ne "hPa,agl") && ($cmd ne "K") && ($cmd ne "PVU") && ($cmd ne "INDEX") )
197
    {  die('Invalid vertical axis [allowed: m / m,agl / hPa / hPa / K / PVU / INDEX] ');     }
197
    {  die('Invalid vertical axis [allowed: m / m,agl / hPa / hPa / K / PVU / INDEX] ');     }
198
 
198
 
199
# Write command
199
# Write command
200
print "\"$cmd\"\n";
200
print "\"$cmd\"\n";
201
 
201