& stat_freq, stat_phase, stat_region, stat_fields,
stat_fields(m,l) = blkName
diagName = DIAGS_RENAMED( stat_fields(m,l), myThid )
CHARACTER*8 stat_fields(fdimLoc,ldimLoc)