2 calls to
SETGRD

INIGRD
ARPSSFC20