SUBROUTINE call_param_replay(ngrid,nlay)
   INTEGER,INTENT(IN) :: ngrid,nlay
   stop 'In call_param_replay : You should run replay_equip.sh before runing replay[13]d'
   RETURN
   END