Changeset 835 for LMDZ4/trunk


Ignore:
Timestamp:
Aug 29, 2007, 10:59:58 AM (17 years ago)
Author:
lmdzadmin
Message:

Petit bug declaration fmagic_omp
AC/IM

Location:
LMDZ4/trunk/libf
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • LMDZ4/trunk/libf/phylmd/conf_phys.F90

    r828 r835  
    8181  INTEGER,SAVE :: top_height_omp,overlap_omp
    8282  REAL,SAVE :: cdmmax_omp,cdhmax_omp,ksta_omp,ksta_ter_omp
    83   LOGICAL,SAVE :: ok_kzmin_omp, fmagic_omp
     83  LOGICAL,SAVE :: ok_kzmin_omp
     84  REAL, SAVE ::  fmagic_omp
    8485  INTEGER,SAVE :: iflag_pbl_omp,lev_histhf_omp,lev_histday_omp,lev_histmth_omp
    8586  CHARACTER*4, SAVE :: type_run_omp

  • LMDZ4/trunk/libf/phytherm/conf_phys.F90

    r833 r835  
    8686  INTEGER,SAVE :: top_height_omp,overlap_omp
    8787  REAL,SAVE :: cdmmax_omp,cdhmax_omp,ksta_omp,ksta_ter_omp
    88   LOGICAL,SAVE :: ok_kzmin_omp, fmagic_omp
     88  LOGICAL,SAVE :: ok_kzmin_omp
     89  REAL, SAVE :: fmagic_omp
    8990  INTEGER,SAVE :: iflag_pbl_omp,lev_histhf_omp,lev_histday_omp,lev_histmth_omp
    9091  CHARACTER*4, SAVE :: type_run_omp
Note: See TracChangeset for help on using the changeset viewer.