--- freem/mlib/%SYSINIT.m	2025/05/02 12:44:48	1.6
+++ freem/mlib/%SYSINIT.m	2025/05/05 04:46:35	1.8
@@ -1,7 +1,7 @@
 %SYSINIT ;VCL/SNW-FREEM STARTUP ROUTINE; 5/1/2025 11:00 AM
     ;0.0;FreeM;****FREEM**;Serena Willis @2020
     ;
-    ;   $Id: %SYSINIT.m,v 1.6 2025/05/02 12:44:48 snw Exp $
+    ;   $Id: %SYSINIT.m,v 1.8 2025/05/05 04:46:35 snw Exp $
     ;    FreeM Startup Routine
     ;
     ;  
@@ -26,6 +26,12 @@
     ;   along with FreeM.  If not, see <https://www.gnu.org/licenses/>.
     ;
     ;   $Log: %SYSINIT.m,v $
+    ;   Revision 1.8  2025/05/05 04:46:35  snw
+    ;   Documentation fixes; make FreeM more standards compliant
+    ;
+    ;   Revision 1.7  2025/05/03 04:05:23  snw
+    ;   Fix %SYSINIT
+    ;
     ;   Revision 1.6  2025/05/02 12:44:48  snw
     ;   Documentation updates
     ;
@@ -43,16 +49,16 @@
     ; SPDX-License-Identifier: AGPL-3.0-or-later    
     S %DIA=$DIALECT
     S $DIALECT="FREEM"
-    CONST %MATH("PI")==3.141592653589793238462
-    CONST %MATH("E")=2.71828182845904523536
-    CONST %MATH("GAMMA")=0.57721566490153286060
-    CONST %MATH("DEGPERRAD")=57.29577951308232087680
-    CONST %MATH("PHI")=1.61803398874989484820
-    CONST %IO("CRLF")=$C(13,10)
-    CONST %SYS("SIGNAL","HUP")=1
-    CONST %SYS("SIGNAL","INIT")=2
-    CONST %SYS("SIGNAL","KILL")=9
-    CONST %SYS("SIGNAL","TERM")=15
+    ZCONST %MATH("PI")=3.141592653589793238462
+    ZCONST %MATH("E")=2.71828182845904523536
+    ZCONST %MATH("GAMMA")=0.57721566490153286060
+    ZCONST %MATH("DEGPERRAD")=57.29577951308232087680
+    ZCONST %MATH("PHI")=1.61803398874989484820
+    ZCONST %IO("CRLF")=$C(13,10)
+    ZCONST %SYS("SIGNAL","HUP")=1
+    ZCONST %SYS("SIGNAL","INIT")=2
+    ZCONST %SYS("SIGNAL","KILL")=9
+    ZCONST %SYS("SIGNAL","TERM")=15
     ASTART "TRIGGER"
     S $ZTRAP="NOLS^%SYSINIT"
     D ^LCLINIT