--- MITgcm/optim/optim_writedata.F 2002/12/06 01:42:25 1.3 +++ MITgcm/optim/optim_writedata.F 2003/03/07 05:20:50 1.4 @@ -149,7 +149,9 @@ write( funit ) (nWetcGlobal(k), k=1,nr) write( funit ) (nWetsGlobal(k), k=1,nr) write( funit ) (nWetwGlobal(k), k=1,nr) +#ifdef ALLOW_CTRL_WETV write( funit ) (nWetvGlobal(k), k=1,nr) +#endif cgg( Add OBCS Mask information into the header section for optimization. #ifdef ALLOW_OBCSN_CONTROL