Added bc_definition and nest_info derived data types for future use

src/module_definitions.f90

@@ -339,4 +339,29 @@ module definitions
         double precision,dimension(:,:),pointer::zisodisp,zisoinc
       end type ziso
 
-end module definitions
+!=====[BC_DEFINITION]===========================================================
\ No newline at end of file
+! type bc_definition is used to store values related to the applied boundary
+! conditions, including the velocity values and certain geometric parameters
+
+      type bc_definition
+        character(len=3) :: bcorder
+        double precision,dimension(:,:),pointer :: zisodisp,zisoinc
+        double precision :: ux0,ux1,vx0,vx1,wx0,wx1,uy0,uy1,vy0,vy1,wy0,wy1
+        double precision :: uz0,uz1,vz0,vz1,wz0,wz1
+        logical :: fixux0,fixux1,fixvx0,fixvx1,fixwx0,fixwx1
+        logical :: fixuy0,fixuy1,fixvy0,fixvy1,fixwy0,fixwy1
+        logical :: fixuz0,fixuz1,fixvz0,fixvz1,fixwz0,fixwz1
+      end type bc_definition
+
+!=====[NEST_INFO]===============================================================
+! type nest_info is used to store information related to the LS model and
+! embedded SS nest
+!
+! sselem[x,y,z]: ratio of ss element size to ls element size (should be 0-1)
+! [x,y,z]minls: location of (0,0,0) in the SS model within the LS model
+
+      type nest_info
+        double precision :: sselemx,sselemy,sselemz,xminls,yminls,zminls
+      end type nest_info
+
+end module definitions