Changeset 8040


Ignore:
Timestamp:
2017-05-18T11:43:08+02:00 (3 years ago)
Author:
jwhile
Message:

Further merge of r5518_add_var_to_assim

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/dev_r5518_GO6_package_inc_asm/NEMOGCM/NEMO/OPA_SRC/ASM/asmbkg.F90

    r8015 r8040  
    119119            CALL iom_rstput( kt, nitbkg_r, inum, 'en'     , en                ) 
    120120#endif 
    121             CALL iom_rstput( kt, nitbkg_r, inum, 'gcx'    , gcx               ) 
     121!            CALL iom_rstput( kt, nitbkg_r, inum, 'gcx'    , gcx               ) 
     122            CALL iom_rstput( kt, nitbkg_r, inum, 'avt'    , avt               ) 
    122123            CALL iom_rstput( kt, nitbkg_r, inum, 'avt'    , avt               ) 
    123124            ! 
     
    154155            CALL iom_rstput( kt, nitdin_r, inum, 'tn'     , tsn(:,:,:,jp_tem) ) 
    155156            CALL iom_rstput( kt, nitdin_r, inum, 'sn'     , tsn(:,:,:,jp_sal) ) 
     157            CALL iom_rstput( kt, nitdin_r, inum, 'avt'    , avt     ) 
    156158            CALL iom_rstput( kt, nitdin_r, inum, 'sshn'   , sshn              ) 
    157159#if defined key_lim2 || defined key_lim3 
Note: See TracChangeset for help on using the changeset viewer.