Lines Matching refs:LENENT
478 INTEGER LENENP, LENENT, LENENV, LENENA
479 PARAMETER (LENENP = 50, LENENT = 70, LENENV = 50,
480 & LENENA = LENENP + LENENT + LENENV )
580 COMMON /ANER/ CEPROP(LENENP), CETERM(LENENT), CEPRSS(LENENV)
582 COMMON /QENER/ QEPROP(LENENP), QETERM(LENENT), QEPRSS(LENENV)
584 COMMON /ENER/ EPROP(LENENP), ETERM(LENENT), EPRESS(LENENV)
590 COMMON /ENACCM/ EPRPA(LENENP), ETRMA(LENENT), EPRSA(LENENV),
591 & EPRP2A(LENENP),ETRM2A(LENENT),EPRS2A(LENENV),
592 & EPRPP(LENENP), ETRMP(LENENT), EPRSP(LENENV),
593 & EPRP2P(LENENP),ETRM2P(LENENT),EPRS2P(LENENV)
615 REAL(KIND=8) TSMTRM(LENENT),TSMTMP(LENENT)