|
integer(kind=ip_intwp_p), parameter | mod_oasis_namcouple::jpeighty = 5000 |
| max number of characters to be read in each line of the file namcouple More...
|
|
character(len= *), parameter | mod_oasis_namcouple::rform = '(A5000)' |
| formatted line read format More...
|
|
character(len= *), parameter | mod_oasis_namcouple::nmapdec_default = 'decomp_1d' |
|
character(len= *), parameter | mod_oasis_namcouple::nmatxrd_default = 'ceg' |
|
character(len= *), parameter | mod_oasis_namcouple::nwgtopt_default = 'abort_on_bad_index' |
|
integer(kind=ip_i4_p), public | mod_oasis_namcouple::nnamcpl |
| number of namcouple inputs More...
|
|
integer(kind=ip_i4_p), public | mod_oasis_namcouple::namruntim |
| namcouple runtime More...
|
|
integer(kind=ip_i4_p), public | mod_oasis_namcouple::namlogprt |
| namcouple nlogprt value More...
|
|
integer(kind=ip_i4_p), public | mod_oasis_namcouple::namtlogprt |
| namcouple ntlogprt value More...
|
|
integer(kind=ip_i4_p), public | mod_oasis_namcouple::namuntmin |
| namcouple min IO unit value More...
|
|
integer(kind=ip_i4_p), public | mod_oasis_namcouple::namuntmax |
| namcouple max IO unit value More...
|
|
logical, public | mod_oasis_namcouple::namnorest |
| namcouple allow no restarts More...
|
|
character(len=ic_med), public | mod_oasis_namcouple::nammapdec |
| namcouple map decomp value More...
|
|
character(len=ic_med), public | mod_oasis_namcouple::nammatxrd |
| namcouple matrix read option More...
|
|
character(len=ic_med), public | mod_oasis_namcouple::namwgtopt |
| namcouple weights handling option More...
|
|
character(len=jpeighty), dimension(:), pointer, public | mod_oasis_namcouple::namsrcfld |
| list of src fields More...
|
|
character(len=jpeighty), dimension(:), pointer, public | mod_oasis_namcouple::namdstfld |
| list of dst fields More...
|
|
character(len=ic_lvar), dimension(:), pointer, public | mod_oasis_namcouple::namsrcgrd |
| src grid name More...
|
|
integer(kind=ip_i4_p), dimension(:), pointer, public | mod_oasis_namcouple::namsrc_nx |
| src nx grid size More...
|
|
integer(kind=ip_i4_p), dimension(:), pointer, public | mod_oasis_namcouple::namsrc_ny |
| src ny grid size More...
|
|
character(len=ic_lvar), dimension(:), pointer, public | mod_oasis_namcouple::namdstgrd |
| dst grid name More...
|
|
integer(kind=ip_i4_p), dimension(:), pointer, public | mod_oasis_namcouple::namdst_nx |
| dst nx grid size More...
|
|
integer(kind=ip_i4_p), dimension(:), pointer, public | mod_oasis_namcouple::namdst_ny |
| dst ny grid size More...
|
|
integer(kind=ip_i4_p), dimension(:), pointer, public | mod_oasis_namcouple::namfldseq |
| SEQ value. More...
|
|
integer(kind=ip_i4_p), dimension(:), pointer, public | mod_oasis_namcouple::namfldops |
| operation, ip_expout,... More...
|
|
integer(kind=ip_i4_p), dimension(:), pointer, public | mod_oasis_namcouple::namflddti |
| coupling period (secs) More...
|
|
integer(kind=ip_i4_p), dimension(:), pointer, public | mod_oasis_namcouple::namfldlag |
| coupling lag (secs) More...
|
|
integer(kind=ip_i4_p), dimension(:), pointer, public | mod_oasis_namcouple::namfldtrn |
| fields transform, ip_instant,... More...
|
|
integer(kind=ip_i4_p), dimension(:), pointer, public | mod_oasis_namcouple::namfldcon |
| conserv fld operation More...
|
|
character(len=ic_med), dimension(:), pointer, public | mod_oasis_namcouple::namfldcoo |
| conserv fld option (bfb, opt) More...
|
|
character(len=ic_long), dimension(:), pointer, public | mod_oasis_namcouple::nammapfil |
| mapping file name More...
|
|
character(len=ic_med), dimension(:), pointer, public | mod_oasis_namcouple::nammaploc |
| mapping location (src or dst pes) More...
|
|
character(len=ic_med), dimension(:), pointer, public | mod_oasis_namcouple::nammapopt |
| mapping option (bfb, sum, or opt) More...
|
|
character(len=ic_med), dimension(:), pointer, public | mod_oasis_namcouple::namrstfil |
| restart file name More...
|
|
character(len=ic_med), dimension(:), pointer, public | mod_oasis_namcouple::naminpfil |
| input file name More...
|
|
logical, dimension(:), pointer, public | mod_oasis_namcouple::namchecki |
| checkin flag More...
|
|
logical, dimension(:), pointer, public | mod_oasis_namcouple::namchecko |
| checkout flag More...
|
|
real(kind=ip_realwp_p), dimension(:), pointer, public | mod_oasis_namcouple::namfldsmu |
| src multiplier term More...
|
|
real(kind=ip_realwp_p), dimension(:), pointer, public | mod_oasis_namcouple::namfldsad |
| src additive term More...
|
|
real(kind=ip_realwp_p), dimension(:), pointer, public | mod_oasis_namcouple::namflddmu |
| dst multipler term More...
|
|
real(kind=ip_realwp_p), dimension(:), pointer, public | mod_oasis_namcouple::namflddad |
| dst additive term More...
|
|
character(len=ic_med), dimension(:), pointer, public | mod_oasis_namcouple::namscrmet |
| scrip method (CONSERV, DISTWGT, BILINEAR, BICUBIC, GAUSWGT) More...
|
|
character(len=ic_med), dimension(:), pointer, public | mod_oasis_namcouple::namscrnor |
| scrip conserv normalization (FRACAREA, DESTAREA, FRACNNEI) More...
|
|
character(len=ic_med), dimension(:), pointer, public | mod_oasis_namcouple::namscrtyp |
| scrip mapping type (SCALAR, VECTOR) More...
|
|
character(len=ic_med), dimension(:), pointer, public | mod_oasis_namcouple::namscrord |
| scrip conserve order (FIRST, SECOND) More...
|
|
character(len=ic_med), dimension(:), pointer, public | mod_oasis_namcouple::namscrres |
| scrip search restriction (LATLON, LATITUDE) More...
|
|
real(kind=ip_realwp_p), dimension(:), pointer, public | mod_oasis_namcouple::namscrvam |
| scrip gauss weight distance weighting for GAUSWGT More...
|
|
integer(kind=ip_i4_p), dimension(:), pointer, public | mod_oasis_namcouple::namscrnbr |
| scrip number of neighbors for GAUSWGT and DISTWGT More...
|
|
integer(kind=ip_i4_p), dimension(:), pointer, public | mod_oasis_namcouple::namscrbin |
| script number of search bins More...
|
|
integer(kind=ip_i4_p), dimension(:), pointer, public | mod_oasis_namcouple::namsort2nn |
| sorted namcpl for sort, define nn order, computed later More...
|
|
integer(kind=ip_i4_p), dimension(:), pointer, public | mod_oasis_namcouple::namnn2sort |
| sorted namcpl for nn, define sort number, computed later More...
|
|
integer(kind=ip_i4_p) | mod_oasis_namcouple::nulin |
|
character(len= *), parameter | mod_oasis_namcouple::cl_namcouple = 'namcouple' |
|
integer(kind=ip_intwp_p) | mod_oasis_namcouple::il_err |
|
logical | mod_oasis_namcouple::lncdfgrd |
|
logical | mod_oasis_namcouple::lncdfrst |
|
character(len=5), parameter | mod_oasis_namcouple::cgrdnam = 'grids' |
|
character(len=5), parameter | mod_oasis_namcouple::cmsknam = 'masks' |
|
character(len=5), parameter | mod_oasis_namcouple::csurnam = 'areas' |
|
character(len=5), parameter | mod_oasis_namcouple::crednam = 'maskr' |
|
character(len=4), parameter | mod_oasis_namcouple::cglonsuf = '.lon' |
|
character(len=4), parameter | mod_oasis_namcouple::cglatsuf = '.lat' |
|
character(len=4), parameter | mod_oasis_namcouple::crnlonsuf = '.clo' |
|
character(len=4), parameter | mod_oasis_namcouple::crnlatsuf = '.cla' |
|
character(len=4), parameter | mod_oasis_namcouple::cmsksuf = '.msk' |
|
character(len=4), parameter | mod_oasis_namcouple::csursuf = '.srf' |
|
character(len=4), parameter | mod_oasis_namcouple::cangsuf = '.ang' |
|
logical, dimension(:), allocatable | mod_oasis_namcouple::lmapp |
|
logical, dimension(:), allocatable | mod_oasis_namcouple::lsubg |
|
integer(kind=ip_intwp_p) | mod_oasis_namcouple::nfcoast |
|
logical | mod_oasis_namcouple::lcoast |
|
integer(kind=ip_intwp_p) | mod_oasis_namcouple::ntime |
|
integer(kind=ip_intwp_p) | mod_oasis_namcouple::niter |
|
integer(kind=ip_intwp_p) | mod_oasis_namcouple::nitfn |
|
integer(kind=ip_intwp_p) | mod_oasis_namcouple::nstep |
|
integer(kind=ip_intwp_p) | mod_oasis_namcouple::ig_nfield |
|
integer(kind=ip_intwp_p) | mod_oasis_namcouple::ig_direct_nfield |
|
integer(kind=ip_intwp_p) | mod_oasis_namcouple::ig_total_nfield |
|
integer(kind=ip_intwp_p) | mod_oasis_namcouple::ig_final_nfield |
|
logical | mod_oasis_namcouple::lg_oasis_field |
|
integer(kind=ip_intwp_p) | mod_oasis_namcouple::ig_maxcomb |
|
integer(kind=ip_intwp_p) | mod_oasis_namcouple::ig_maxnoa |
|
integer(kind=ip_intwp_p) | mod_oasis_namcouple::ig_maxnfg |
|
integer(kind=ip_intwp_p) | mod_oasis_namcouple::nlogprt |
|
integer(kind=ip_intwp_p) | mod_oasis_namcouple::ntlogprt |
|
integer(kind=ip_intwp_p) | mod_oasis_namcouple::nuntmin |
|
integer(kind=ip_intwp_p) | mod_oasis_namcouple::nuntmax |
|
logical | mod_oasis_namcouple::nnorest |
|
character(len=ic_med) | mod_oasis_namcouple::nmapdec |
|
character(len=ic_med) | mod_oasis_namcouple::nmatxrd |
|
character(len=ic_med) | mod_oasis_namcouple::nwgtopt |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::numlab |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::ig_numlab |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nfexch |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::ig_ntrans |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::ig_total_ntrans |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nlonbf |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nlatbf |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nlonaf |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nlataf |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nseqn |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::ig_total_nseqn |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::ig_freq |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::ig_lag |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nlagn |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::ig_invert |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::ig_reverse |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::ig_number_field |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::ig_no_rstfile |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::ig_total_state |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::ig_local_trans |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::ig_grid_nbrbf |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::ig_grid_nbraf |
|
integer(kind=ip_intwp_p) | mod_oasis_namcouple::ig_nbr_rstfile |
|
integer(kind=ip_intwp_p) | mod_oasis_namcouple::ig_total_frqmin |
|
logical, dimension(:), allocatable | mod_oasis_namcouple::lg_state |
|
character(len=jpeighty), dimension(:), allocatable | mod_oasis_namcouple::cnaminp |
|
character(len=jpeighty), dimension(:), allocatable | mod_oasis_namcouple::cnamout |
|
character(len=8), dimension(:,:), allocatable | mod_oasis_namcouple::canal |
|
character(len=8) | mod_oasis_namcouple::cg_c |
|
character(len=32), dimension(:), allocatable | mod_oasis_namcouple::cg_name_rstfile |
|
character(len=32), dimension(:), allocatable | mod_oasis_namcouple::cg_restart_file |
|
character(len=32), dimension(:), allocatable | mod_oasis_namcouple::cficinp |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cficout |
|
character(len=32), dimension(:), allocatable | mod_oasis_namcouple::cg_input_file |
|
character(len=jpeighty), dimension(:), allocatable | mod_oasis_namcouple::cg_input_field |
|
character(len=jpeighty), dimension(:), allocatable | mod_oasis_namcouple::cg_output_field |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cficbf |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cficaf |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cstate |
|
character(len=4), dimension(:), allocatable | mod_oasis_namcouple::cga_locatorbf |
|
character(len=4), dimension(:), allocatable | mod_oasis_namcouple::cga_locatoraf |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::neighbor |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::ntronca |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::ncofld |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::neighborg |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nbofld |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nbnfld |
|
integer(kind=ip_intwp_p), dimension(:,:), allocatable | mod_oasis_namcouple::nludat |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nlufil |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nlumap |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nmapfl |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nmapvoi |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nlusub |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nsubfl |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nsubvoi |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nluext |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nextfl |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nosper |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::notper |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nbins |
|
integer(kind=ip_intwp_p) | mod_oasis_namcouple::nlucor |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nscripvoi |
|
real(kind=ip_realwp_p), dimension(:), allocatable | mod_oasis_namcouple::amskval |
|
real(kind=ip_realwp_p), dimension(:), allocatable | mod_oasis_namcouple::amskvalnew |
|
real(kind=ip_realwp_p), dimension(:,:), allocatable | mod_oasis_namcouple::acocoef |
|
real(kind=ip_realwp_p), dimension(:,:), allocatable | mod_oasis_namcouple::abocoef |
|
real(kind=ip_realwp_p), dimension(:,:), allocatable | mod_oasis_namcouple::abncoef |
|
real(kind=ip_realwp_p), dimension(:), allocatable | mod_oasis_namcouple::afldcoef |
|
real(kind=ip_realwp_p), dimension(:), allocatable | mod_oasis_namcouple::afldcobo |
|
real(kind=ip_realwp_p), dimension(:), allocatable | mod_oasis_namcouple::afldcobn |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cxordbf |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cyordbf |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cxordaf |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cyordaf |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cextmet |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cintmet |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cgrdtyp |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cfldtyp |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cfilfic |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cfilmet |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cconmet |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cconopt |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cfldcoa |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cfldfin |
|
character(len=8), dimension(:,:), allocatable | mod_oasis_namcouple::ccofld |
|
character(len=8), dimension(:,:), allocatable | mod_oasis_namcouple::cbofld |
|
character(len=8), dimension(:,:), allocatable | mod_oasis_namcouple::cbnfld |
|
character(len=8), dimension(:,:), allocatable | mod_oasis_namcouple::ccofic |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cdqdt |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cgrdmap |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cmskrd |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cgrdsub |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::ctypsub |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cgrdext |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::csper |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::ctper |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cmap_method |
|
character(len=ic_long), dimension(:), allocatable | mod_oasis_namcouple::cmap_file |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cmaptyp |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cmapopt |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::corder |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cnorm_opt |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::cfldtype |
|
character(len=8), dimension(:), allocatable | mod_oasis_namcouple::crsttype |
|
character(len=8) | mod_oasis_namcouple::cfldcor |
|
logical, dimension(:), allocatable | mod_oasis_namcouple::lsurf |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::naismfl |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::naisgfl |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::naismvoi |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::naisgvoi |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::niwtm |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::niwtg |
|
real(kind=ip_realwp_p), dimension(:), allocatable | mod_oasis_namcouple::varmul |
|
logical, dimension(:), allocatable | mod_oasis_namcouple::linit |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::niwtn |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nninnfl |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::niwtng |
|
integer(kind=ip_intwp_p), dimension(:), allocatable | mod_oasis_namcouple::nninnflg |
|
logical, dimension(:), allocatable | mod_oasis_namcouple::lextra |
|
logical, dimension(:), allocatable | mod_oasis_namcouple::lweight |
|
character *9, parameter | mod_oasis_namcouple::clfield = '$NFIELDS ' |
|
character *9, parameter | mod_oasis_namcouple::clchan = '$CHANNEL ' |
|
character *9, parameter | mod_oasis_namcouple::clstring = '$STRINGS ' |
|
character *9, parameter | mod_oasis_namcouple::clmod = '$NBMODEL ' |
|
character *9, parameter | mod_oasis_namcouple::cljob = '$JOBNAME ' |
|
character *9, parameter | mod_oasis_namcouple::cltime = '$RUNTIME ' |
|
character *9, parameter | mod_oasis_namcouple::clseq = '$SEQMODE ' |
|
character *9, parameter | mod_oasis_namcouple::cldate = '$INIDATE ' |
|
character *9, parameter | mod_oasis_namcouple::clhead = '$MODINFO ' |
|
character *9, parameter | mod_oasis_namcouple::clprint = '$NLOGPRT ' |
|
character *9, parameter | mod_oasis_namcouple::clmapdec = '$NMAPDEC ' |
|
character *9, parameter | mod_oasis_namcouple::clmatxrd = '$NMATXRD ' |
|
character *9, parameter | mod_oasis_namcouple::clwgtopt = '$NWGTOPT ' |
|
character *9, parameter | mod_oasis_namcouple::clunit = '$NUNITNO ' |
|
character *9, parameter | mod_oasis_namcouple::clrest = '$NNOREST ' |
|
character *9, parameter | mod_oasis_namcouple::clcal = '$CALTYPE ' |
|
character *9, parameter | mod_oasis_namcouple::clend = '$END ' |
|
integer(kind=ip_intwp_p), parameter | mod_oasis_namcouple::nkeywords = 17 |
|
character *9, dimension(nkeywords), parameter | mod_oasis_namcouple::keyword_list = (/clfield, clchan, clstring, clmod, cljob, cltime, clseq, cldate, clhead, clprint, clmapdec, clmatxrd, clunit, clrest, clcal, clend, clwgtopt /) |
|
character *512 | mod_oasis_namcouple::tmpstr1 |
|
character *512 | mod_oasis_namcouple::tmpstr2 |
|
character *512 | mod_oasis_namcouple::tmpstr3 |
|
character *512 | mod_oasis_namcouple::tmpstr4 |
|