Index: BOL/Replay/replay_equip.sh
===================================================================
--- BOL/Replay/replay_equip.sh	(revision 5459)
+++ BOL/Replay/replay_equip.sh	(revision 5795)
@@ -121,5 +121,5 @@
       thermcell_updown_dq|thermcell_dtke) \
       param_ini=thermcell_ini ; inimod=lmdz_thermcell_ini ; klon=ngrid ; klev=nlay ;;
-   wake|pkupper|wake_popdyn_1|wake_popdyn_2|vdif_kcay|ustarhb) param_ini=wake_ini ; inimod=lmdz_wake_ini ; klon=klon ; klev=klev ;;
+   wpopdynC|wake_popdyn_3|wake|wake2|pkupper|wake_popdyn_1|wake_popdyn_2|vdif_kcay|ustarhb) param_ini=wake_ini ; inimod=lmdz_wake_ini ; klon=klon ; klev=klev ;;
    surf_wind) param_ini=surf_wind_ini ; inimod=lmdz_surf_wind_ini ; klon=klon ; klev=nsurfwind ;;
    ratqs_main|ratqs_inter|ratqs_oro|ratqs_hetero|ratqs_tke) param_ini=ratqs_ini ; inimod=lmdz_ratqs_ini ; klon=klon ; klev=klev ;;
@@ -143,7 +143,10 @@
 
 function get_subroutine_arg(){
-   tmp=tmp_get_subroutine_arg
+   tmp=tmp_get_subroutine_arg$1
    cat $2 | tr '[A-Z]' '[a-z]' > ${tmp}
-   line1=`sed -n -e '/subrou.*'\`echo $1 | tr '[A-Z]' '[a-z]'\`'.*(/=' ${tmp} | head -1 `
+   #line1=`sed -n -e '/subrou.*'\`echo $1 | tr '[A-Z]' '[a-z]'\`'.*(/=' ${tmp} | head -1 `
+   name_min=$( echo $1 | tr '[A-Z]' '[a-z]' )
+   line1=`sed -n -e '/subrou.*'${name_min}'[\ (]/=' ${tmp} | head -1 `
+   echo LINE1 $line1 > tmpline$1
    line2=`tail -n +$line1 ${tmp} | sed -n -e '/)/=' | head -1`
    tail -n +$line1 ${tmp} | sed -n -e 1,${line2}p
@@ -225,5 +228,5 @@
    ( cpp $2 2>/dev/null ) | tr '[A-Z]' '[a-z]' > ${tmp}
    name_min=`echo $1 | tr '[A-Z]' '[a-z]'`
-   line1=`sed -n -e "/subrou.*${name_min}.*(/=" ${tmp} | head -1 `
+   line1=`sed -n -e "/subrou.*${name_min}[\ (]/=" ${tmp} | head -1 `
    tail -n +$line1 ${tmp} > ${tmp}2
    line2=`sed -n -e "/[Rr][Ee][Tt][Uu][Rr][Nn]/=" ${tmp}2 | head -1`