Merge pull request #2858 from kilavvy/main

Fix Typos in Comments and Log Messages for Flexural and Crushing Ice Failure Initialization

Author: andrew-platt

modules/icefloe/src/icefloe/IceFlexIEC.f90

@@ -46,7 +46,7 @@ subroutine initFlexIEC (iceInput, myIceParams, iceLog)
       real(ReKi)     :: freq     ! frequency of sinusoidal load
       integer(IntKi) :: nL !err, 
 
-!  initialize the common parmeters for flexural ice failure
+!  initialize the common parameters for flexural ice failure
       call initIceFlex(iceInput, inParams, myIceParams, iceLog)
 
       call logMessage(iceLog, newLine//' Setting up flexural failure by Ralston method ')

modules/icefloe/src/icefloe/lockInISO.F90

@@ -41,10 +41,10 @@ subroutine initLockInCrushingISO (iceInput, myIceParams, iceLog)
       real(ReKi)     :: fallTime, maxLoad
       integer(IntKi) :: nL ! err, 
 
-!  initialize the common parmeters
+!  initialize the common parameters
       call initIceCrushISO(iceInput, inParams, myIceParams, iceLog)
 
-      call logMessage(iceLog, newLine//' Setting ice crushing loads with frequency lock-in parameteres per ISO')
+      call logMessage(iceLog, newLine//' Setting ice crushing loads with frequency lock-in parameters per ISO')
 
       call getIceInput(iceInput, 'towerFrequency', inParams%twr%freq, iceLog, 0.01_ReKi, 10.0_ReKi)
       call logMessage(iceLog, ' Tower fundamental frequency = '//TRIM(Num2LStr(inParams%twr%freq))//' Hz')