--- MITgcm_contrib/plumes/do_plumes.F	2004/05/05 18:19:35	1.1
+++ MITgcm_contrib/plumes/do_plumes.F	2004/05/13 22:20:26	1.2
@@ -1,6 +1,6 @@
-       subroutine do_plumes(uplume,vplume,thplume,splume,
+       subroutine do_plumes(uplume,vplume,thplume,
      .    idim,jdim,Nr,Nsx,Nsy,bi,bj,nxperdyn,nyperdyn,
-     .    duplume,dvplume,dthplume,dsplume)
+     .    duplume,dvplume,dthplume)
 c-----------------------------------------------------------------------
 c Dummy routine to calculate plumes increments - here set them to whatever
 c