求问这错误应该怎么修改

white

SUBROUTINE FILM(H,SINK,TEMP,KSTEP,KINC,TIME,NOEL,NPT,
         1 COORDS,JLTYP,FIELD,NFIELD,SNAME,NODE,AREA)

error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: * <IDENTIFIER>       
error #5276: Unbalanced parentheses       

fcode

注意排版，续行格式，自己用的自由格式还是固定格式。固定格式的话，续行符是否在正确的位置。