Commit 9b419162 authored by ofgeorg's avatar ofgeorg

! $Log: tool_symmatrix_mod.f90,v $

      !  Revision 1.2  2008/03/14 18:49:03  paulb
      !  Corrected wrong datatype in MPI_BCAST, split up variables of cmaesRun into
      !  modules to keep code readable
      !
	  !
parent 113c215b
#include "define.h"
!-------------------------------------------------------------------------
! Module : tool_symmatrix_mod
!-------------------------------------------------------------------------
!
! Purpose : This module handles the call of the tool_symmatrix
! Subroutine for single or double precision
!
! Remarks :
!
! References :
!
! Revisions :
!-------------------------------------------------------------------------
!-------------------------------------------------------------------------
! Covariance Matrix Adaption Library (LIBCMA)
! Benedikt Baumgartner
! Computational Biophysics Lab, ETH Zurich, Switzerland
!-------------------------------------------------------------------------
MODULE tool_symmatrix_mod
INTERFACE tool_symmatrix
MODULE PROCEDURE tool_symmatrix_s
MODULE PROCEDURE tool_symmatrix_d
END INTERFACE
CONTAINS
#define __KIND __SINGLE_PRECISION
#include "tool_symmatrix.f90"
#undef __KIND
#define __KIND __DOUBLE_PRECISION
#include "tool_symmatrix.f90"
#undef __KIND
END MODULE tool_symmatrix_mod
\ No newline at end of file
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment