diff --git a/src/NWints/auxil/spcartP.fh b/src/NWints/auxil/spcartP.fh
index 089f774bbb..23bf1f33e9 100644
--- a/src/NWints/auxil/spcartP.fh
+++ b/src/NWints/auxil/spcartP.fh
@@ -23,7 +23,7 @@
       logical active_sp2c_lindx    ! active ma array sp2c_lindx ?
       logical active_invsp2c_lindx ! active ma array sp2c_lindx ?
       logical active_cart_norm_scale ! active ma array cart_norm_scale ?
-      logical trust_dgemm          ! is dgemm okay
+      logical trust_dgemm          ! is _dgemm_ okay
 *
       parameter (sph_cart_init_value = 1731)
 *
diff --git a/src/driver/coptopt.fh b/src/driver/coptopt.fh
index deb31dcae6..55b5abe490 100644
--- a/src/driver/coptopt.fh
+++ b/src/driver/coptopt.fh
@@ -73,7 +73,7 @@ c
      $     ostress2,            ! include lattice gradients
      $     ocheckgrad,          ! verify the gradient
      $     diagonal_hessian,    ! tells the code to use a diagonal hessian
-     $     ofast_diag      ,    ! use dsyev instead of jacobi eigensolver
+     $     ofast_diag      ,    ! use _dsyev_ instead of jacobi eigensolver
      $     oactive(max_cent)    ! active atom flags
 c
       character*8