#==============================================================================
# 		fichier de D'INSTRUCTIONS de référence
#Julien Brajard
#==============================================================================
#script faisant l'assimilation de référence
#paramètres à régler : TA=50 (48 pdt effectifs)
#NX=32,NY=22,NZ=31
#paramères de contrôle : sa_c
#obs (3D a t=48 Yt=50) : sshb, tb, sb,ub,vb
#
#Pour l'init on choisit le résultat de sinobad.i qui a assimilé uniquement la température.'

##INITIALISATION
xistate_init 1 ../data_in/file_rest/GYRE_00000424_restart.nc
true_target_in_tab sa_c
xinitnc ../data_out/exp_TS.nc

xwriteout 0 true ../data_out/exp_TS.nc

print_time OFF
set_modeltime 0
FORWARD


##OBSERVATION
xwriteout 50 obs_48 ../data_out/exp_TS.nc
#savestate sshb  1   ij   50    A       1       ../data_out/sshb_obs_48.dat   
#savestate tb  1   ijk   50    A       1       ../data_out/tb_obs_48.dat   
#savestate sb  1   ijk   50    A       1       ../data_out/sb_obs_48.dat   
#savestate ub  1   ijk   50    A       1       ../data_out/ub_obs_48.dat   
#savestate vb  1   ijk   50    A       1       ../data_out/vb_obs_48.dat   

#loadobs sshb  1   ij   50    A       1       ../data_out/sshb_obs_48.dat D   
#loadobs tb  1   ijk   50    A       1       ../data_out/tb_obs_48.dat D   
loadobs sb  1   ijk   50    A       1       ../data_out/sb_obs_48.dat D   
#loadobs ub  1   ijk   50    A       1       ../data_out/ub_obs_48.dat D   
#loadobs vb  1   ijk   50    A       1       ../data_out/vb_obs_48.dat D   


#goto FINRUN

##INITIALISATION DE L'ASSIMILATION'
xistate_init 1 ../data_in/file_rest/GYRE_00000400_restart_CONTROL_T.nc
set_modeltime 0
print_time OFF
FORWARD

xwriteout 0 init ../data_out/exp_TS.nc
xwriteout 50 forw0_48 ../data_out/exp_TS.nc

##TEST DE LA FONCTION OBJECTIVE
goto FINTEST
testof 1.e+00 0.5e-01 2. 10 1
goto FINRUN
FINTEST
##DEBUT DE L'ASSIMILATION'

set_modeltime 0
!echo "RUN OPTIMIZATION WITH M1QN3 ......."
setm_impres  5
setm_io      6
setm_mode    1
set_nbiter   100
setm_nsim    100
setm_dxmin   1.0e-4
setm_epsg    1.0e-10
setm_ddf1    1
runm
##SAUVEGARDE
xwriteout 0 fin ../data_out/exp_TS.nc
xwriteout 50 forwfin_48 ../data_out/exp_TS.nc

xrst_save ../data_in/file_rest/GYRE_00000400_restart_CONTROL_TS.nc



goto FINRUN


FINRUN