JSOC/proj/rings/apps/ring_pass.f90 - view

Return to ring_pass.f90 CVS log

Up to [Development] / JSOC / proj / rings / apps

File: [Development] / JSOC / proj / rings / apps / ring_pass.f90 (download)
Revision: 1.1, Sat Aug 21 01:17:32 2010 UTC (13 years, 1 month ago) by rick
Branch: MAIN
CVS Tags: Ver_LATEST, Ver_9-5, Ver_9-41, Ver_9-4, Ver_9-3, Ver_9-2, Ver_9-1, Ver_9-0, Ver_8-8, Ver_8-7, Ver_8-6, Ver_8-5, Ver_8-4, Ver_8-3, Ver_8-2, Ver_8-12, Ver_8-11, Ver_8-10, Ver_8-1, Ver_8-0, Ver_7-1, Ver_7-0, Ver_6-4, Ver_6-3, Ver_6-2, Ver_6-1, Ver_6-0, Ver_5-14, Ver_5-13, Ver_5-12, Ver_5-11, Ver_5-10, HEAD

added for 5.9

   module ring_pass
     implicit none
     integer, parameter :: sle = 4
     integer, parameter :: dle = 8
     real(kind=dle) :: dk, dnu
     integer :: istk, iendk, ni, nj, npj, v, ntot
   end module ring_pass

Karen Tian