Ignore:
Timestamp:
2024-04-15T11:23:37+02:00 (3 months ago)
Author:
josefine.ghattas
Message:

Integrated [7912], [7925], [8179] and [8412] done on the trunk to output forcing file that can be used in offline mode. See ticket #899

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/ORCHIDEE_2_2/ORCHIDEE/src_sechiba/sechiba.f90

    r8462 r8531  
    739739    IF (printlev_loc>=3) WRITE(numout,*) 'Start sechiba_main kjpindex =',kjpindex 
    740740 
     741    CALL xios_orchidee_send_field("nav_lat",lalo(:,1)) 
     742    CALL xios_orchidee_send_field("nav_lon",lalo(:,2)) 
     743 
    741744    !! 1. Initialize variables at each time step 
    742745    CALL sechiba_var_init (kjpindex, rau, pb, temp_air)  
    … …  
    10551058    CALL xios_orchidee_send_field("roughheight",roughheight) 
    10561059    CALL xios_orchidee_send_field("lai",lai) 
     1060    CALL xios_orchidee_send_field("u",u) 
     1061    CALL xios_orchidee_send_field("v",v) 
     1062    CALL xios_orchidee_send_field("zlev",zlev) 
     1063 
    10571064    histvar(:)=zero    
    10581065    DO ji = 1, kjpindex 
Note: See TracChangeset for help on using the changeset viewer.