source: dynamico_lmdz/aquaplanet/ICOSA_LMDZ/src/wrapper.f90 @ 4028

Last change on this file since 4028 was 3841, checked in by ymipsl, 9 years ago

implement dynamico-LMDZ coupling interface

YM

File size: 332 bytes
Line 
1SUBROUTINE initialize_external_physics
2  USE interface_icosa_lmdz_mod, ONLY: initialize_physics
3  IMPLICIT NONE
4 
5    CALL initialize_physics 
6
7END SUBROUTINE initialize_external_physics
8
9
10SUBROUTINE external_physics
11  USE interface_icosa_lmdz_mod, ONLY: physics
12  IMPLICIT NONE
13 
14  CALL physics
15
16END SUBROUTINE external_physics
Note: See TracBrowser for help on using the repository browser.