2 calls to
FC_GATHERVR4

GATHER_CHUNK_TO_FIELD4
WRTOUT_R4