--- MITgcm/pkg/autodiff/autodiff_ini_model_io.F 2005/08/31 00:04:32 1.9 +++ MITgcm/pkg/autodiff/autodiff_ini_model_io.F 2005/09/02 23:21:22 1.10 @@ -1,4 +1,4 @@ -C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/autodiff/autodiff_ini_model_io.F,v 1.9 2005/08/31 00:04:32 heimbach Exp $ +C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/autodiff/autodiff_ini_model_io.F,v 1.10 2005/09/02 23:21:22 heimbach Exp $ C $Name: $ C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----| @@ -217,6 +217,24 @@ CALL MNC_CW_ADD_VATTR_TEXT('adswdown', & 'coordinates','XC YC RC iter', myThid) # endif +# ifdef ALLOW_CLIMSST_RELAXATION + CALL MNC_CW_ADD_VNAME('adclimsst', 'Cen_xy_Hn__-__t', 3,4, myThid) + CALL MNC_CW_ADD_VATTR_TEXT('adclimsst', + & 'units','[cost]/[degC]', myThid) + CALL MNC_CW_ADD_VATTR_TEXT('adclimsst','long_name', + & 'adjoint sea surface temperature', myThid) + CALL MNC_CW_ADD_VATTR_TEXT('adclimsst', + & 'coordinates','XC YC RC iter', myThid) +# endif +# ifdef ALLOW_CLIMSSS_RELAXATION + CALL MNC_CW_ADD_VNAME('adclimsss', 'Cen_xy_Hn__-__t', 3,4, myThid) + CALL MNC_CW_ADD_VATTR_TEXT('adclimsss', + & 'units','[cost]/[ppt]', myThid) + CALL MNC_CW_ADD_VATTR_TEXT('adclimsss','long_name', + & 'adjoint sea surface salinity', myThid) + CALL MNC_CW_ADD_VATTR_TEXT('adclimsss', + & 'coordinates','XC YC RC iter', myThid) +# endif c #endif