/home/uryu/Cocal_svn_checkinout/Cocal/code/Module_interface/interface_source_circ_surf_peos.f90

Go to the documentation of this file.

module interface_source_circ_surf_peos
  implicit none
  interface 
    subroutine source_circ_surf_peos(cline, ia, ib, souf)
      character(len=2), intent(in) :: cline
      integer,          intent(in) :: ia, ib
      real(8),          pointer    :: souf(:,:)
    end subroutine source_circ_surf_peos
  end interface
end module interface_source_circ_surf_peos

---