GrADS code for drawing Hoffmullers diagram

prompt 'Enter the keyword: '
pull key
'!mkdir hoff_'key
lat=0
while lat<90


'reinit'
'sdfopen monmeandata/'key'.mon.mean.nc'
'q file'
'set lat 'lat
'set lon 0 180'
'set t 1 12'
'd 'key
'draw xlab Longitude'
'draw ylab Time'



'printim hoff_'key'/'lat'.jpg white'

lat=lat+1
endwhile