Ignore:
Timestamp:
Mar 24, 2011, 11:46:27 AM (14 years ago)
Author:
slebonnois
Message:

SL : corrections et modifications dans phytitan correspondant a celles
faites apres compilation Venus. Titan pas encore compile.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/libf/phytitan/heating.F

    r3 r102  
    11       SUBROUTINE heating(dist,rmu0,fract,sol_htg,swnet)
    2 
    3       IMPLICIT NONE
    42
    53
     
    3028c   -------------
    3129
     30      use dimphy
     31      IMPLICIT NONE
    3232#include "dimensions.h"
    33 #include "dimphy.h"
    3433
    3534      INTEGER NLEVEL,NLAYER,NSPECV
Note: See TracChangeset for help on using the changeset viewer.