Changeset 5038
- Timestamp:
- Jul 9, 2024, 6:25:19 PM (2 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
BOL/Replay/replay_equip.sh
r5033 r5038 314 314 if (( $# >> 0 )) ; then 315 315 vars=$* 316 echo "if ( abs(gr_index_)>0 ) then" 316 317 for var in $vars ; do 317 318 local vardim=$( var_dims $var ) 318 319 echo "call iotd_ecrit_seq('"$pre$var"',$klev_,'"$pre$var in $param"',' ',"$var$vardim")" 319 320 done 321 echo endif 320 322 fi 321 323 } … … 470 472 endif 471 473 irec=irec+1 472 write(81,rec=irec) $ ( echo $varin | sed -e "s/,$klon/,1/" )474 write(81,rec=irec) $varin 473 475 endif 474 476 first_replay=.false. … … 497 499 if [[ "$lonlat" != "" ]] ; then 498 500 for file in $paraminc1 $paraminc2 ; do sed -i -e "s/1:$klon/gr_index_/g" -e '/rec_l/s/\*('$klon')//g' $file ; done 501 sed -i -e "/(81/s/,$klon/,1/" $paraminc1 499 502 fi 500 503
Note: See TracChangeset
for help on using the changeset viewer.