diff --git a/src/ejecta/module_ejecta.f90 b/src/ejecta/module_ejecta.f90
index a7fc64f3..83c4ada7 100644
--- a/src/ejecta/module_ejecta.f90
+++ b/src/ejecta/module_ejecta.f90
@@ -104,7 +104,7 @@ end subroutine ejecta_table_define
    end interface
 
    interface
-      subroutine ejecta_interpolate(crater,domain,lrad,ejb,ejtble,ebh,vsq,theta,melt)
+      subroutine ejecta_interpolate(crater,domain,lrad,ejb,ejtble,ebh,vsq,theta,erad,melt)
       use module_globals
       implicit none
       type(cratertype),intent(in) :: crater
@@ -114,7 +114,7 @@ subroutine ejecta_interpolate(crater,domain,lrad,ejb,ejtble,ebh,vsq,theta,melt)
       type(ejbtype),dimension(ejtble),intent(in) :: ejb
       real(DP),intent(out) :: ebh
       real(DP),intent(out),optional :: vsq,theta
-      real(DP),intent(out),optional :: melt
+      real(DP),intent(out),optional :: erad,melt
       end subroutine ejecta_interpolate
    end interface