I have a problem with my code. I keep getting these errors and I can't quite figure out what's going wrong.

Error in file "IncreasingCheck.hla" at line $43[$errid:$3888/$hlaparse$.$bsn$]$:

Identifier must match program name.

Near: $<<$ main $>>$

Error in file "IncreasingCheck.hla" at line $46[$errid:$98726/$hlaparse$.$c$]$:

syntax error, unexpected varTkn.

Near: $<<$ var $>>$

Here's the full code:

program IncreasingCheck;

#include$("$stdlib$.$hhf$")$

procedure increasing$($w: int$8$; x: int$8$; y: int$8$; z: int$8)$; @nodisplay; @noframe;

begin increasing;

$//$Preserve AX register

push$($ax$)$;

$//$Load parameters from the stack in reverse order $($z$,$ y$,$ x$,$ w$)$

mov$([$ebp$+12],$ al$)$; $//$ z in AL

mov$([$ebp$+8],$ bl$)$; $//$ y in BL

mov$([$ebp$+4],$ cl$)$; $//$ x in CL

mov$([$ebp$],$ dl$)$; $//$ w in DL

$//$ Check if w $<$ x

cmp$($dl$,$ cl$)$; $//$DL holds w$,$ CL holds x

jnl not$\_$increasing; $//$ If w$>=$x$,$ jump to not$\_$increasing

$//$ Check if x $<$ y

cmp$($cl$,$ bl$)$; $//$CL holds x$,$ BL holds y

jnl not$\_$increasing; $//$If x$>=$y$,$ jump to not$\_$increasing

$//$Check if y $<$ z

cmp$($bl$,$ al$)$; $//$BL holds y$,$ AL holds z

jnl not$\_$increasing; $//$ If y $>=$ z$,$ jump to not$\_$increasing

$//$All conditions met, set AL to $1$

mov$(1,$ al$)$;

jmp done;

not$\_$increasing:

$//$ Set AL to $0$ if any condition fails

mov$(0,$ al$)$;

done:

$//$Restore AX register

pop$($ax$)$;

end increasing;

begin main;

$//$ Declare local variables

var

w: int$8$;

x: int$8$;

y: int$8$;

z: int$8$;

$//$ Code to get input values

stdout.put$("$Feed Me W: $")$;

stdin.get$($w$)$;

stdout.put$("$Feed Me X: $")$;

stdin.get$($x$)$;

stdout.put$("$Feed Me Y: $")$;

stdin.get$($y$)$;

stdout.put$("$Feed Me Z: $")$;

stdin.get$($z$)$;

$//$ Call the increasing function

push$($z$)$;

push$($y$)$;

push$($x$)$;

push$($w$)$;

call increasing;

add$(16,$ esp$)$; $//$ Clean up stack $(4$ parameters $*4$ bytes each$)$

$//$ Output result

if$($al $=1)$ then

stdout.put$("$Increasing$.$ AL$=1",$ nl$)$;

else

stdout.put$("$Not Increasing. AL$=0",$ nl$)$;

endif;

end main;