Sources Esope | Cast3M

hhoc3m
C HHOC3M    SOURCE    OF166741  24/05/06    21:15:08     11082          
 
C======================================================================C
C= INTERFACE ENTRE CAST3M (FORTRAN-ESOPE) ET BIBLIOTHEQUE HHO (C++)   =C
C=                                                                    =C
C= SOUS-PROGRAMME COMPLET ECRIT EN FORTRAN MODERNE 2008 (.F90)        =C
C= ICI VERSION FORTRAN "F77" POUR TEST                                =C
C======================================================================C
 
      SUBROUTINE HHOC3M (charfct, charhho, tabint, maxint,
     &                                     tabflo, maxflo,
     &                                     iret, charerr)
 
      IMPLICIT INTEGER(I-N)
      IMPLICIT REAL*8(A-H,O-Z)
 
      CHARACTER*(*) charfct, charhho, charerr
 
      INTEGER tabint(1:*)
      REAL*8  tabflo(1:*)
 
      WRITE(ioimp,*) 'HHOC3M interface: not implemented'
      CALL ERREUR(5)
 
c      return
      END