charstrings.F90

Go to the documentation of this file.

 
 
module charstrings
 
  use gengrid_kinds, only : cl,cm,cs
 
  implicit none
 
  character(len=CL) :: dirsrc
  character(len=CL) :: dirout
  character(len=CL) :: fv3dir
  character(len=CS) :: res
  character(len=CS) :: atmres
  character(len=CL) :: logmsg
 
  character(len=CL) :: maskfile  = 'ocean_mask.nc'
  character(len=CS) :: maskname  = 'mask'
  character(len=CL) :: editsfile
 
  character(len=CL) :: topofile
  character(len=CS) :: toponame  = 'depth'
 
  character(len=CL) :: history
  character(len=CS) :: cdate
 
  character(len= 2), dimension(4) :: staggerlocs = (/'Ct','Cu','Cv','Bu'/)
 
end module charstrings