2 calls to
SFCDIF3

VEGE_FLUX
BARE_FLUX