modules_arrs.F90

Go to the documentation of this file.

 
 
module moda_bitbuf
  integer :: maxbyt
  integer, allocatable :: mbay(:,:)
  integer, allocatable :: mbyt(:)
  integer, allocatable :: ibay(:)
  integer :: ibit
end module moda_bitbuf
 
module moda_bitmaps
  integer :: nbtm
  integer :: ntamc
  integer :: lstnod
  integer :: lstnodct
  logical :: linbtm
  integer, allocatable :: inodtamc(:)
  integer, allocatable :: ntco(:)
  character*6, allocatable :: ctco(:,:)
  integer, allocatable :: inodtco(:,:)
  integer, allocatable :: nbtmse(:)
  integer, allocatable :: istbtm(:)
  integer, allocatable :: iszbtm(:)
  integer, allocatable :: ibtmse(:,:)
end module moda_bitmaps
 
module moda_bufrmg
  integer, allocatable :: msglen(:)
  integer, allocatable :: msgtxt(:,:)
end module moda_bufrmg
 
module moda_bufrsr
  integer :: junn = 0
  integer :: jill
  integer :: jimm
  integer, allocatable :: jbay(:)
  integer :: jbit
  integer :: jbyt
  integer :: jmsg
  integer :: jsub
  integer, allocatable :: jsr(:)
end module moda_bufrsr
 
module moda_comprs
  integer :: ncol
  integer*8 :: incr
  integer*8, allocatable :: matx(:,:)
  character*(:), allocatable :: catx(:,:)
end module moda_comprs
 
module moda_comprx
  integer :: nrow
  integer :: lunc
  integer :: kbyt
  logical :: flush
  logical :: writ1
  integer*8, allocatable :: kmin(:)
  integer*8, allocatable :: kmax(:)
  integer*8 :: imiss
  logical, allocatable :: kmis(:)
  integer, allocatable :: kbit(:)
  integer, allocatable :: ityp(:)
  integer, allocatable :: iwid(:)
  character*(:), allocatable :: cstr(:)
  integer, allocatable :: jlnode(:)
end module moda_comprx
 
module moda_dscach
  integer :: ncnem
  character*8, allocatable :: cnem(:)
  integer, allocatable :: ndc(:)
  integer, allocatable :: idcach(:,:)
end module moda_dscach
 
module moda_h4wlc
  integer :: nh4wlc = 0
  integer, allocatable :: luh4wlc(:)
  character*14, allocatable :: sth4wlc(:)
  character*120, allocatable :: chh4wlc(:)
end module moda_h4wlc
 
module moda_idrdm
  integer, allocatable :: idrdm(:)
end module moda_idrdm
 
module moda_ival
  integer*8, allocatable :: ival(:)
end module moda_ival
 
module moda_ivttmp
  character*10, allocatable :: ttmp(:)
  integer, allocatable :: itmp(:)
  real*8, allocatable :: vtmp(:)
end module moda_ivttmp
 
module moda_lushr
  integer, allocatable :: lus(:)
end module moda_lushr
 
module moda_mgwa
  integer, allocatable :: mgwa(:)
end module moda_mgwa
 
module moda_mgwb
  integer, allocatable :: mgwb(:)
end module moda_mgwb
 
module moda_s3list
  integer, allocatable :: ids3(:)
  character*6, allocatable :: cds3(:)
end module moda_s3list
 
module moda_msgcwd
  integer, allocatable :: nmsg(:)
  integer, allocatable :: nsub(:)
  integer, allocatable :: msub(:)
  integer, allocatable :: inode(:)
  integer, allocatable :: idate(:)
end module moda_msgcwd
 
module moda_msglim
  integer, allocatable :: msglim(:)
end module moda_msglim
 
module moda_msgmem
  integer :: munit
  integer :: mlast
  integer :: ldxm
  integer :: ndxm
  integer :: ldxts
  integer :: ndxts
  integer :: mxdxm
  integer :: mxdxw
  integer, allocatable :: msgp(:)
  integer, allocatable :: msgs(:)
  integer, allocatable :: mdx(:)
  integer, allocatable :: ipdxm(:)
  integer, allocatable :: ifdxts(:)
  integer, allocatable :: icdxts(:)
  integer, allocatable :: ipmsgs(:)
end module moda_msgmem
 
module moda_mstabs
  integer :: nmtb
  integer :: nmtd
  integer, allocatable :: ibfxyn(:)
  character, allocatable :: cbscl(:,:)
  character, allocatable :: cbsref(:,:)
  character, allocatable :: cbbw(:,:)
  character, allocatable :: cbunit(:,:)
  character, allocatable :: cbmnem(:,:)
  character, allocatable :: cbelem(:,:)
  integer, allocatable :: idfxyn(:)
  character, allocatable :: cdseq(:,:)
  character, allocatable :: cdmnem(:,:)
  integer, allocatable :: ndelem(:)
  integer, allocatable :: idefxy(:)
end module moda_mstabs
 
module moda_nmikrp
  character*8, allocatable :: nem(:,:)
  integer, allocatable :: irp(:,:)
  integer, allocatable :: krp(:,:)
end module moda_nmikrp
 
module moda_nrv203
  integer :: nnrv
  integer :: ibtnrv
  integer :: ipfnrv
  character*8, allocatable :: tagnrv(:)
  integer, allocatable :: inodnrv(:)
  integer*8, allocatable :: nrv(:)
  integer, allocatable :: isnrv(:)
  integer, allocatable :: ienrv(:)
end module moda_nrv203
 
module moda_tabccc
  integer :: icdw
  integer :: icsc
  integer :: icrv
  integer :: incw
end module moda_tabccc
 
module moda_nulbfr
  integer, allocatable :: null(:)
end module moda_nulbfr
 
module moda_rdmtb
  integer, allocatable :: iefxyn(:,:)
  character*4, allocatable :: cmdscb(:)
  character*4, allocatable :: cmdscd(:)
  character*120, allocatable :: ceelem(:,:)
end module moda_rdmtb
 
module moda_rlccmn
  integer :: nrst
  integer, allocatable :: irnch(:)
  integer, allocatable :: irbit(:)
  character*10, allocatable :: crtag(:)
end module moda_rlccmn
 
module moda_s01cm
  integer, allocatable :: ivmnem(:)
  character*8, allocatable :: cmnem(:)
  integer :: ns01v = 0
end module moda_s01cm
 
module moda_sc3bfr
  integer, allocatable :: isc3(:)
  character*8, allocatable :: tamnem(:)
end module moda_sc3bfr
 
module moda_stbfr
  integer, allocatable :: iolun(:)
  integer, allocatable :: iomsg(:)
end module moda_stbfr
 
module moda_stcode
  integer, allocatable :: iscodes(:)
end module moda_stcode
 
module moda_tababd
  integer, allocatable :: ntba(:)
  integer, allocatable :: ntbb(:)
  integer, allocatable :: ntbd(:)
  integer, allocatable :: mtab(:,:)
  integer, allocatable :: idna(:,:,:)
  Integer, allocatable :: idnb(:,:)
  integer, allocatable :: idnd(:,:)
  character*128, allocatable :: taba(:,:)
  character*128, allocatable :: tabb(:,:)
  character*600, allocatable :: tabd(:,:)
end module moda_tababd
 
module moda_tables
  integer :: ntab
  character*10, allocatable :: tag(:)
  character*3, allocatable :: typ(:)
  integer, allocatable :: knt(:)
  integer, allocatable :: jump(:)
  integer, allocatable :: link(:)
  integer, allocatable :: jmpb(:)
  integer, allocatable :: ibt(:)
  integer, allocatable :: irf(:)
  integer, allocatable :: isc(:)
  integer, allocatable :: itp(:)
  real*8, allocatable :: vali(:)
  integer, allocatable :: knti(:)
  integer, allocatable :: iseq(:,:)
  integer, allocatable :: jseq(:)
end module moda_tables
 
module moda_ufbcpl
  integer, allocatable :: luncpy(:)
end module moda_ufbcpl
 
module moda_unptyp
  integer, allocatable :: msgunp(:)
end module moda_unptyp
 
module moda_usrbit
  integer, allocatable :: nbit(:)
  integer, allocatable :: mbit(:)
end module moda_usrbit
 
module moda_usrint
  integer, allocatable :: nval(:)
  integer, target, allocatable :: inv(:,:)
  integer, allocatable :: nrfelm(:,:)
  real*8, target, allocatable :: val(:,:)
end module moda_usrint
 
module moda_usrtmp
  integer, allocatable :: iutmp(:,:)
  real*8, allocatable :: vutmp(:,:)
end module moda_usrtmp
 
module moda_xtab
  logical, allocatable :: xtab(:)
end module moda_xtab
 
module moda_tnkrcp
  character*1 :: ctrt = 'N'
  integer :: itryr
  integer :: itrmo
  integer :: itrdy
  integer :: itrhr
  integer :: itrmi
end module moda_tnkrcp
 
module moda_msgstd
  character :: csmf = 'N'
end module moda_msgstd
 
module moda_msgcmp
  character :: ccmf = 'N'
end module moda_msgcmp
 
module moda_tablef
  character :: cdmf = 'N'
end module moda_tablef
 
module moda_mrgcom
  integer :: nrpl = 0
  integer :: nmrg = 0
  integer :: namb = 0
  integer :: ntot = 0
end module moda_mrgcom