--- MITgcm/pkg/dic/fe_chem.F 2007/12/06 22:24:34 1.11 +++ MITgcm/pkg/dic/fe_chem.F 2008/04/07 20:31:16 1.13 @@ -1,8 +1,7 @@ -C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/dic/fe_chem.F,v 1.11 2007/12/06 22:24:34 stephd Exp $ +C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/dic/fe_chem.F,v 1.13 2008/04/07 20:31:16 dfer Exp $ C $Name: $ #include "DIC_OPTIONS.h" -#include "GCHEM_OPTIONS.h" CStartOfInterFace SUBROUTINE Fe_CHEM( @@ -22,7 +21,7 @@ #include "EEPARAMS.h" #include "PARAMS.h" #include "GRID.h" -#include "DIC_BIOTIC.h" +#include "DIC_VARS.h" C == Routine arguments == C bi, bj, iMin, iMax, jMin, jMax - Range of points for which calculation