@@ -0,0 +1,11 @@
+Copyright <YEAR> <COPYRIGHT HOLDER>
+
+Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met:
+
+1. Redistributions of source code must retain the above copyright notice, this list of conditions and the following disclaimer.
+
+2. Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution.
+
+3. Neither the name of the copyright holder nor the names of its contributors may be used to endorse or promote products derived from this software without specific prior written permission.
+
+THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
@@ -0,0 +1,59 @@
+# A simple makefile for creating the CCSI Pulverization distribution
+VERSION := 2014.10.00
+PRODUCT := Pulverization
+LICENSE := CCSI_TE_LICENSE_$(PRODUCT).txt
+PKG_DIR := CCSI_$(PRODUCT)_$(VERSION)
+PACKAGE := $(PKG_DIR).tgz
+
+# Where Jenkins should checkout ^/projects/common/trunk/
+COMMON := .ccsi_common
+
+LEGAL_DOCS := LEGAL \
+           CCSI_TE_LICENSE.txt
+
+PAYLOAD := model \
+     results \
+     test \
+     LEGAL \
+     $(LICENSE)
+
+# Get just the top part (not dirname) of each entry so cp -r does the right thing
+PAYLOAD_TOPS := $(foreach v,$(PAYLOAD),$(shell echo $v | cut -d'/' -f1))
+# And the payload with the PKG_DIR prepended
+PKG_PAYLOAD := $(addprefix $(PKG_DIR)/, $(PAYLOAD))
+
+# OS detection & changes
+UNAME := $(shell uname)
+ifeq ($(UNAME), Linux)
+  MD5BIN=md5sum
+endif
+ifeq ($(UNAME), Darwin)
+  MD5BIN=md5
+endif
+ifeq ($(UNAME), FreeBSD)
+  MD5BIN=md5
+endif
+
+.PHONY: all clean
+
+all: $(PACKAGE)
+
+$(PACKAGE): $(PAYLOAD)
+	@mkdir $(PKG_DIR)
+	@cp -r $(PAYLOAD_TOPS) $(PKG_DIR)
+	@tar -cf - $(PKG_PAYLOAD) | gzip -n > $(PACKAGE)
+	@$(MD5BIN) $(PACKAGE)
+	@rm -rf $(PKG_DIR) $(LICENSE) $(LEGAL_DOCS)
+
+$(LICENSE): CCSI_TE_LICENSE.txt
+	@sed "s/\[SOFTWARE NAME \& VERSION\]/$(PRODUCT) v.$(VERSION)/" < CCSI_TE_LICENSE.txt > $(LICENSE)
+
+$(LEGAL_DOCS):
+	@if [ -d $(COMMON) ]; then \
+	  cp $(COMMON)/$@ .; \
+	else \
+	  svn -q export ^/projects/common/trunk/$@; \
+	fi
+
+clean:
+	@rm -rf $(PACKAGE) $(PKG_DIR) $(LICENSE) $(LEGAL_DOCS)
@@ -0,0 +1,37 @@
+# Pulverization
+**DEM Based Pulverization.**
+A mfix pulverization model that simulates the crack propagation and ultimate break-down within an aggregate particle (assembly of a number of sub-particles) under compression.
+
+## Development Practices
+
+* Code development will be peformed in a forked copy of the repo. Commits will not be 
+  made directly to the ngt-archive repo. Developers will submit a pull 
+  request that is then merged by another team member, if another team member is available.
+* Each pull request should contain only related modifications to a feature or bug fix.  
+* Sensitive information (secret keys, usernames etc) and configuration data 
+  (e.g database host port) should not be checked in to the repo.
+* A practice of rebasing with the main repo should be used rather that merge commmits.
+
+## Getting Started
+
+TBD
+
+## Authors
+
+* Wesley Xu
+* Brett Okhuysen
+
+See also the list of [contributors](https://github.com/CCSI-Toolset/Pulverization/contributors) who participated in this project.
+
+## Versioning
+
+We use [SemVer](http://semver.org/) for versioning. For the versions available, 
+see the [tags on this repository](https://github.com/Pulverization/tags). 
+
+## License
+
+See [LICENSE.md](LICENSE.md) file for details
+
+## Copyright Notice
+
+TBD
@@ -0,0 +1,19 @@
+DEM Based Pulverization.<br/>
+A mfix pulverization model that simulates the crack propagation and ultimate break-down within an aggregate particle (assembly of a number of sub-particles) under compression.<br/>
+<br/>
+<table style="width:50%">
+  <tr>
+    <td>Product Team:</td>
+    <td>PT3</td></tr>
+  <tr>
+    <td>Developers:</td>
+    <td><a href="mailto:Wesley Xu &lt;wei.xu@pnnl.gov&gt;">Wesley Xu</a>,
+        <a href="mailto:Brett Okhuysen &lt;bretto@lanl.gov&gt;">Brett Okhuysen</a>
+    </td></tr>
+  <tr>
+    <td>Drupal:</td>
+    <td><a href="https://www.acceleratecarboncapture.org/product/pulverization">pulverization</a></td></tr>
+  <tr>
+    <td>Jira:</td>
+    <td><a href="https://svn.acceleratecarboncapture.org/jira/browse/PM">PM</a></td></tr>
+</table>
@@ -0,0 +1,65 @@
+!vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvC
+!                                                                      C
+!  Module name: ADD_PART_TO_LINK_LIST(I,J)                             C
+!  Purpose: Module to Add particles to their                           C
+!           respective linked lists ("linked" particles have           C
+!           overlapping square-wells)                                  C
+!                                                                      C
+!   Author: Mike Weber                              Date: 9/30/04      C
+!   Reviewer:                                       Date:              C
+!                                                                      C
+!                                                                      C
+!^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^C
+
+
+
+      SUBROUTINE ADD_PART_TO_LINK_LIST(I,J)
+
+
+!-----MODULES USED
+      USE discretelement
+      IMPLICIT NONE
+
+!-----LOCAL DUMMY VARIABLES
+      INTEGER I,J,JJ,II
+      LOGICAL ALREADY_EXISTS
+
+      IF(COHESION_DEBUG.gt.0)THEN
+         PRINT *,'**START ADD LINK'
+      END IF 
+
+      IF(I.gt.MAX_PIP)THEN 
+        PRINT *, 'STOPPED FROM inside add_part_to_link_list'
+        PRINT *, 'I=',I
+        PRINT *, 'J=',J
+        STOP
+      END IF 
+
+      IF(J.gt.MAX_PIP)THEN 
+        PRINT *, 'STOPPED FROM inside add_part_to_link_list' 
+        PRINT *, 'I=',I
+        PRINT *, 'J=',J
+        STOP
+      END IF 
+
+
+!-----Add particle J to the list of particle I
+      IF(I.le.MAX_PIP)THEN
+         LINKS(I,LINKS(I,1)+2)=J
+         LINKS(I,1)=LINKS(I,1)+1
+         IS_LINKED(I)=1
+      END IF
+
+!-----Add particle I to the list of particle J
+      IF(J.le.MAX_PIP)THEN
+         LINKS(J,LINKS(J,1)+2)=I
+         LINKS(J,1)=LINKS(J,1)+1
+         IS_LINKED(J)=1
+      END IF
+
+
+      IF(COHESION_DEBUG.gt.0)THEN
+         PRINT *,'**END ADD LINK'
+      END IF 
+
+      END SUBROUTINE ADD_PART_TO_LINK_LIST
@@ -0,0 +1,35 @@
+!vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvC
+!                                                                      C
+!  Module name: FUNCTION CHECK_LINK(I,J)                               C
+!  Purpose: Integer function to check if two particles are             C
+!      linked (ie, their center-to-center distance                     C
+!      is less that the sum of their well widths)                      C
+!                                                                      C
+!   Author: Mike Weber                              Date: 9/30/04      C
+!   Reviewer:                                       Date:              C
+!                                                                      C
+!                                                                      C
+!^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^C
+
+
+      INTEGER FUNCTION CHECK_LINK(I,J)
+
+!-----MODULES USED
+      USE discretelement
+      IMPLICIT NONE
+
+      INTEGER K,I,J
+         
+      CHECK_LINK = 0
+      IF(LINKS(I,1).gt.0)THEN
+        K = 2
+        DO WHILE(LINKS(I,K).gt.0)
+          IF(LINKS(I,K).eq.J)THEN
+            CHECK_LINK=1
+            GO TO 10
+          END IF
+          K = K+1
+        END DO
+      END IF
+10    RETURN
+      END FUNCTION CHECK_LINK
@@ -0,0 +1,38 @@
+!vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvC
+!                                                                      C
+!  Module name: INITIALIZE_COHESION_PARAMETERS                         C
+!  Purpose: This module gives initial values to all                    C
+!           cohesion parameters                                        C
+!                                                                      C
+!   Author: Mike Weber                              Date: 9/30/04      C
+!   Reviewer:                                       Date:              C
+!                                                                      C
+!                                                                      C
+!^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^C
+
+
+      SUBROUTINE INITIALIZE_COHESION_PARAMETERS
+
+!-----MODULES USED
+      USE discretelement
+
+!-----LOCAL DUMMY VARIABLES
+      INTEGER i,j
+
+      IF(COHESION_DEBUG.gt.0)THEN
+        PRINT *, '**START INITIALIZE COHESION PARAMETERS'
+      END IF
+
+    
+!-----INITIALIZATIONS
+      DO i=1, NPARTICLES
+         IS_LINKED(i)=0
+         LINKS(i,1)=0
+         DO j=2,MAXNEIGHBORS
+           LINKS(i,j)=-1
+         END DO
+      END DO
+
+     
+
+      END SUBROUTINE INITIALIZE_COHESION_PARAMETERS
@@ -0,0 +1,83 @@
+!vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvC
+!                                                                      C
+!  Module name: REMOVE_PART_FROM_LINK_LIST(I, J)                       C
+!  Purpose: This function will remove two particles form their         C
+!           respective linked lists                                    C
+!                                                                      C
+!   Author: Mike Weber                              Date: 9/30/04      C
+!   Reviewer:                                       Date:              C
+!                                                                      C
+!                                                                      C
+!^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^C
+
+      SUBROUTINE REMOVE_PART_FROM_LINK_LIST(I, J)
+
+!-----MODULES USED
+      USE discretelement
+      IMPLICIT NONE
+
+!-----LOCAL DUMMY VARIABLES
+      INTEGER K, I, J, JJ
+      INTEGER LINK_PARTNER
+      INTEGER REMOVED
+      LOGICAL ALREADY_EXISTS
+
+
+      IF(COHESION_DEBUG.gt.0)THEN
+         PRINT *,'**START REMOVE LINK'
+      END IF 
+
+
+
+
+!-----Remove particle J from list of particle I
+      IF(I.le.MAX_PIP)THEN
+         REMOVED=0
+         K=2
+         DO WHILE(LINKS(I,K).gt.0)
+           IF(REMOVED.eq.1)THEN
+             LINKS(I,K-1)=LINKS(I,K)
+             LINKS(I,K)=-1
+           ELSE IF(LINKS(I,K).eq.J)THEN
+             LINKS(I,1)=LINKS(I,1)-1
+             REMOVED=1
+             IF(LINKS(I,K+1).lt.0)THEN
+               LINKS(I,K)=-1
+             END IF
+           END IF
+         K=K+1
+         END DO
+
+         IF(LINKS(I,1).eq.0)THEN
+            IS_LINKED(I)=0
+         END IF      
+      END IF
+
+!-----Remove particle I from the list of particle J
+      IF(J.le.MAX_PIP)THEN
+         REMOVED=0
+         K=2
+         DO WHILE(LINKS(J,K).gt.0)
+           IF(REMOVED.eq.1)THEN
+             LINKS(J,K-1)=LINKS(J,K)
+             LINKS(J,K)=-1
+           ELSE IF(LINKS(J,K).eq.I)THEN
+             REMOVED=1
+             LINKS(J,1)=LINKS(J,1)-1
+             IF(LINKS(I,K+1).lt.0)THEN
+               LINKS(J,K)=-1
+             END IF
+           END IF
+         K=K+1
+         END DO      
+
+         IF(LINKS(J,1).eq.0)THEN
+            IS_LINKED(J)=0
+         END IF      
+
+         IF(COHESION_DEBUG.gt.0)THEN
+            PRINT *,'**END REMOVE LINK'
+         END IF
+      END IF
+
+      END SUBROUTINE REMOVE_PART_FROM_LINK_LIST