Changeset 421


Ignore:
Timestamp:
Oct 17, 2002, 11:44:13 AM (22 years ago)
Author:
lmdzadmin
Message:

Les appels bidons a clim_ avaient disparu
LF

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ.3.3/branches/rel-LF/libf/phylmd/oasis.F

    r397 r421  
    4040#include "mpiclim.h"
    4141c
    42 #include "oasis.h"      ! contains the name of communication technique. Here
     42#include "oasis.h"     
     43                        ! contains the name of communication technique. Here
    4344                        ! cchan=CLIM only is possible.
    4445c                       ! ctype=MPI2
     
    554555      END
    555556
     557      SUBROUTINE halte
     558      print *, 'Attention dans oasis.F, halte est non defini'
     559      RETURN
     560      END
     561
     562      SUBROUTINE locread
     563      print *, 'Attention dans oasis.F, locread est non defini'
     564      RETURN
     565      END
     566
     567      SUBROUTINE locwrite
     568      print *, 'Attention dans oasis.F, locwrite est non defini'
     569      RETURN
     570      END
     571
    556572      SUBROUTINE pipe_model_define
    557573      print*,'Attention dans oasis.F, pipe_model_define est non defini'
     
    574590      END
    575591
     592      SUBROUTINE clim_stepi
     593      print *, 'Attention dans oasis.F, clim_stepi est non defini'
     594      RETURN
     595      END
     596
     597      SUBROUTINE clim_start
     598      print *, 'Attention dans oasis.F, clim_start est non defini'
     599      RETURN
     600      END
     601
     602      SUBROUTINE clim_import
     603      print *, 'Attention dans oasis.F, clim_import est non defini'
     604      RETURN
     605      END
     606
     607      SUBROUTINE clim_export
     608      print *, 'Attention dans oasis.F, clim_export est non defini'
     609      RETURN
     610      END
     611
     612      SUBROUTINE clim_init
     613      print *, 'Attention dans oasis.F, clim_init est non defini'
     614      RETURN
     615      END
     616
     617      SUBROUTINE clim_define
     618      print *, 'Attention dans oasis.F, clim_define est non defini'
     619      RETURN
     620      END
     621
     622      SUBROUTINE clim_quit
     623      print *, 'Attention dans oasis.F, clim_quit est non defini'
     624      RETURN
     625      END
     626
     627      SUBROUTINE svipc_write
     628      print *, 'Attention dans oasis.F, svipc_write est non defini'
     629      RETURN
     630      END
     631
     632      SUBROUTINE svipc_close
     633      print *, 'Attention dans oasis.F, svipc_close est non defini'
     634      RETURN
     635      END
     636
     637      SUBROUTINE svipc_read
     638      print *, 'Attention dans oasis.F, svipc_read est non defini'
     639      RETURN
     640      END
     641
    576642      SUBROUTINE quitcpl
    577643      print *, 'Attention dans oasis.F, quitcpl est non defini'
Note: See TracChangeset for help on using the changeset viewer.