[BACK]Return to rplftypes.inc CVS log [TXT] [DIR] Up to [local] / rpl / src

Diff for /rpl/src/rplftypes.inc between versions 1.44 and 1.69

version 1.44, 2013/09/06 10:30:56 version 1.69, 2023/08/07 17:43:00
Line 1 Line 1
 !===============================================================================  !===============================================================================
 ! RPL/2 (R) version 4.1.16  ! RPL/2 (R) version 4.1.35
 ! Copyright (C) 1989-2013 Dr. BERTRAND Joël  ! Copyright (C) 1989-2023 Dr. BERTRAND Joël
 !  !
 ! This file is part of RPL/2.  ! This file is part of RPL/2.
 !  !
Line 119 Line 119
 #       error "rplconfig.h header not found !"  #       error "rplconfig.h header not found !"
 #   endif  #   endif
   
     module rpl_complex  #   ifdef _RPL_COMPLEX_
         use iso_c_binding          module rpl_complex
         implicit none              use iso_c_binding
               implicit none
         type rpl_complex8  
             sequence              type rpl_complex8
             real(rpl_real4) partie_reelle                  sequence
             real(rpl_real4) partie_imaginaire                  real(rpl_real4) partie_reelle
         end type                  real(rpl_real4) partie_imaginaire
               end type
         type rpl_complex16  
             sequence              type rpl_complex16
             real(rpl_real8) partie_reelle                  sequence
             real(rpl_real8) partie_imaginaire                  real(rpl_real8) partie_reelle
         end type                  real(rpl_real8) partie_imaginaire
     end module              end type
           end module
   #   endif
 #endif  #endif
   
 ! vim: ts=4  ! vim: ts=4
Removed from v.1.44  
changed lines
  Added in v.1.69

CVSweb interface <joel.bertrand@systella.fr>