cancel data/all
cancel view

use "skt_daily.($1).($3).nc"
use "sstk_daily.($1).($3).nc"

let sst = if sstk[d=2] then sstk[d=2] else skt[d=1]
!!!shade sst[l=1]-skt[d=1,l=1]; go land

save/file=sst_($4).($1).nc sst[l=1]
repeat/l=2:($2) (save/append/file=sst_($4).($1).nc sst[l=`l`])
quit
exit