[Mitgcm-support] error

[mitgcm-support at dev.mitgcm.org]

Hi -
In   external_fields_load.F

      IF ( EmPmRfile .NE. ' '  ) THEN
Cfixed CALL READ_REC_XY_RS( EmPmRfile,EmPmR0,intime0,myIter,myThid )
Cfixed CALL READ_REC_XY_RS( EmPmRfile,EmPmR1,intime1,myIter,myThid )
       CALL READ_REC_XY_RS( EmPmRfile,EmPmR0,1,myIter,myThid )
       CALL READ_REC_XY_RS( EmPmRfile,EmPmR1,1,myIter,myThid )
      ENDIF

not a problem as long as one has only climatological E-P,
but problem if you want a periodic forcing....

steph