FTNCHEK Version 3.3 November 2004 File dec-parameter.f: 1 C IMPLICIT INTEGER(a-z) 2 3 PARAMETER shipmoves=3 ^ "dec-parameter.f", line 3 col 17: Warning: Nonstandard syntax: PARAMETER implicitly typed differently from default type ^ "dec-parameter.f", line 3 col 7: Warning: Nonstandard syntax : PARAMETER declaration without parentheses 4 PARAMETER fightermoves=8 ^ "dec-parameter.f", line 4 col 17: Warning: Nonstandard syntax: PARAMETER implicitly typed differently from default type ^ "dec-parameter.f", line 4 col 7: Warning: Nonstandard syntax : PARAMETER declaration without parentheses 5 PARAMETER (stdparam = 7) 6 INTEGER g2(100) 7 INTEGER hits(15),tipe(15),crahit(15),craloc(15) 8 9 BYTE specal,pass ^ "dec-parameter.f", line 9 col 7: Warning: Nonstandard syntax 10 BYTE ab,ac,ad,ao,e,own1,own2,own !AVOID WORD REFERENCES TO THESE ^ "dec-parameter.f", line 10 col 7: Warning: Nonstandard syntax ^ "dec-parameter.f", line 10 col 50: Warning: Nonstandard syntax: inline comment 11 INTEGER rlmap(3000) 12 LOGICAL automv,autosave,savedone 13 14 COMMON/AB9/ab9,prior,nshprf 15 COMMON/ARMTOT/armtot 16 end "dec-parameter.f", near line 16: Warning: Module contains no executable statements Module %MAIN: prog Common blocks referenced: AB9 ARMTOT Variables: Name Type Dims Name Type Dims Name Type Dims Name Type Dims AB intg1 AB9 real* AC intg1 AD intg1 AO intg1 ARMTOT real* AUTOMV logl AUTOSAVE logl CRAHIT intg 1 CRALOC intg 1 E intg1 FIGHTERMOVES intg G2 intg 1 HITS intg 1 NSHPRF intg* OWN intg1 OWN1 intg1 OWN2 intg1 PASS intg1 PRIOR real* RLMAP intg 1 SAVEDONE logl SHIPMOVES intg SPECAL intg1 STDPARAM real* TIPE intg 1 * Variable not declared. Type has been implicitly defined. "dec-parameter.f", line 10: Warning in module %MAIN: Variables declared but never referenced: "dec-parameter.f", line 10: AB declared "dec-parameter.f", line 10: AC declared "dec-parameter.f", line 10: AD declared "dec-parameter.f", line 10: AO declared "dec-parameter.f", line 12: AUTOMV declared "dec-parameter.f", line 12: AUTOSAVE declared "dec-parameter.f", line 7: CRAHIT declared "dec-parameter.f", line 7: CRALOC declared "dec-parameter.f", line 10: E declared "dec-parameter.f", line 6: G2 declared "dec-parameter.f", line 7: HITS declared "dec-parameter.f", line 10: OWN declared "dec-parameter.f", line 10: OWN1 declared "dec-parameter.f", line 10: OWN2 declared "dec-parameter.f", line 9: PASS declared "dec-parameter.f", line 11: RLMAP declared "dec-parameter.f", line 12: SAVEDONE declared "dec-parameter.f", line 9: SPECAL declared "dec-parameter.f", line 7: TIPE declared "dec-parameter.f", line 4: Warning in module %MAIN: Variables set but never used: "dec-parameter.f", line 4: FIGHTERMOVES set "dec-parameter.f", line 3: SHIPMOVES set "dec-parameter.f", line 5: STDPARAM set "dec-parameter.f", line 12: Warning in module %MAIN: Names longer than 6 chars (nonstandard): "dec-parameter.f", line 12: AUTOSAVE declared "dec-parameter.f", line 4: FIGHTERMOVES declared "dec-parameter.f", line 12: SAVEDONE declared "dec-parameter.f", line 3: SHIPMOVES declared "dec-parameter.f", line 5: STDPARAM first occurrence 0 syntax errors detected in file dec-parameter.f 12 warnings issued in file dec-parameter.f "dec-parameter.f", line 14: Warning: Common block AB9 unused anywhere "dec-parameter.f", line 15: Warning: Common block ARMTOT unused anywhere