--- MITgcm/pkg/seaice/SEAICE_TRACER.h 2011/06/09 19:37:01 1.3 +++ MITgcm/pkg/seaice/SEAICE_TRACER.h 2011/06/24 01:30:25 1.5 @@ -1,4 +1,4 @@ -C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/seaice/SEAICE_TRACER.h,v 1.3 2011/06/09 19:37:01 gforget Exp $ +C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/seaice/SEAICE_TRACER.h,v 1.5 2011/06/24 01:30:25 jmc Exp $ C $Name: $ CBOP @@ -25,7 +25,7 @@ C units of ICEAGEVOL are seconds * meters C and actual ice age is ICEAGEVOL / HEFF seconds C IceAgeTr(3), IceAgeTr(4) - effective sea ice age -C t.b.d. (poor-man's multi-category) +C t.b.d. (poor-man s multi-category) C \ev CEOP @@ -46,11 +46,16 @@ #if (defined SEAICE_AGE)||(defined ALLOW_SITRACER) C IceAgeTrFile - File containing initial sea ice age C SItrName - tracer name ('salinity', 'age', 'one', etc.) +C SItrNameLong - tracer long name +C SItrUnit - tracer unit ('psu','s','kg/kg', etc.) C SItrMate - variable to which the tracer is associated ('HEFF','AREA',etc.) CHARACTER*(MAX_LEN_FNAM) IceAgeTrFile(SEAICE_num) CHARACTER*(MAX_LEN_FNAM) SItrName(SItrMaxNum) - CHARACTER*(MAX_LEN_FNAM) SItrMate(SItrMaxNum) - COMMON /SEAICE_AGE_C/ IceAgeTrFile, SItrName, SItrMate + CHARACTER*(MAX_LEN_FNAM) SItrNameLong(SItrMaxNum) + CHARACTER*(MAX_LEN_FNAM) SItrUnit(SItrMaxNum) + CHARACTER*(4) SItrMate(SItrMaxNum) + COMMON /SEAICE_AGE_C/ IceAgeTrFile, SItrName, SItrMate, + & SItrNameLong, SItrUnit #endif CEH3 ;;; Local Variables: ***