source: ICOSA_LMDZ/src/wrapper.f90 @ 4738

Last change on this file since 4738 was 4498, checked in by Laurent Fairhead, 20 months ago

Switching repository for the LMDZ / DYNAMICO interface from HEAT to LMDZ
Initial revision immported is 457

File size: 332 bytes
RevLine 
[4498]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.